Время сервера

@4aynik · Регистрация: 17.08.2009

Студворк — интернет-сервис помощи студентам

Кто-нибудь пробовал программно записывать время с сервера???

@Lord_Voodoo · 01.12.2009, 17:20

4aynik, там по идее за последней скобкой в классе надо точку с запятой поставить, а так вроде бы похоже на правду

@4aynik · 02.12.2009, 09:52 **[ТС]**

Ошибки такие:

[C++ Error] Unit1.cpp(31): E2141 Declaration syntax error
в этой строчке
int __fastcall TalkServer(AnsiString Cmd, TStrings* Answer)
{ - вот тут.
-------------------------------------------------------------------------
[C++ Error] Unit1.cpp(49): E2139 Declaration missing ;
[C++ Error] Unit1.cpp(49): E2190 Unexpected }
в этой строчке
return err;
}
}; - тут.
-------------------------------------------------------------------------
[C++ Error] Unit1.cpp(50): E2190 Unexpected }
в этой строчке
return err;
}
};
} - тут.
--------------------------------------------------------------------------
[C++ Error] Unit1.cpp(56): E2316 'Client' is not a member of 'TForm1'
в это строчке
Form1->Client->TalkServer("INFO†SYNC†", Block);

@Lord_Voodoo · 02.12.2009, 09:54

4aynik, неужели ошибки вам ничего не говорят?
разместите TTcpClient* Client; в разделе public TForm1, на счет первых ошибок, покажите весь код

@4aynik · 02.12.2009, 10:59 **[ТС]**

Значит в проекте есть IdTCPClient1 из закладки Indy Clients.

Код Unit1.cpp

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
#include <vcl.h>
#pragma hdrstop
 
#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
TStringList* Block;
 
  int __fastcall TTcpClient::TalkServer(AnsiString Cmd, TStrings* Answer)
  {
    int err = 0;
    try{
      TCPClient->Connect();
      TCPClient->WriteLn(Cmd);
      AnsiString AnswerBlock = TCPClient->ReadLn();
      Answer->Clear();
      //AnalizeAnswer(AnswerBlock, (TStringList*)Answer);
      if(Answer->Strings[0] == "ERROR"){
        err = 3;
      }
      TCPClient->Disconnect();
    }catch(Exception &e){
      TCPClient->Disconnect();
      err = 3;
    }
    return err;
  }
 
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button1Click(TObject *Sender)
{
Form1->Client->TalkServer("INFO†SYNC†", Block);
}
//---------------------------------------------------------------------------

Код Unit1.h

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
//---------------------------------------------------------------------------
 
#ifndef Unit1H
#define Unit1H
//---------------------------------------------------------------------------
#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>
#include <IdBaseComponent.hpp>
#include <IdComponent.hpp>
#include <IdTCPClient.hpp>
#include <IdTCPConnection.hpp>
//---------------------------------------------------------------------------
 
class TTcpClient{
  private:
  TIdTCPClient* TCPClient;
  public:
  TTcpClient(AnsiString host, int port){
    TCPClient = new TIdTCPClient(NULL);
    TCPClient->Host = host;
    TCPClient->Port = port;
  }
  int __fastcall TalkServer(AnsiString Cmd, TStrings* Answer);
  ~TTcpClient(){
    if (TCPClient!=NULL) delete TCPClient;
  }
  };
 
class TForm1 : public TForm
{
__published:     // IDE-managed Components
        TIdTCPClient *IdTCPClient1;
        void __fastcall Button1Click(TObject *Sender);
private:     // User declarations
public:          // User declarations
TTcpClient* Client;
        __fastcall TForm1(TComponent* Owner);
};
//---------------------------------------------------------------------------
extern PACKAGE TForm1 *Form1;
//---------------------------------------------------------------------------
#endif

Теперь компилится без ошибок... Но если не комментить AnalizeAnswer(AnswerBlock, (TStringList*)Answer); то будет ошибка: [C++ Error] Unit1.cpp(19): E2268 Call to undefined function 'AnalizeAnswer'

@Lord_Voodoo · 02.12.2009, 11:05

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
void AnalizeAnswer(AnsiString Text, TStringList* Block, char Delimiter)
{
  AnsiString Str = Text, tmp = "";
  while(!Str.IsEmpty()){
    if(!Str.Pos(AnsiString(Delimiter))) break;
    tmp = ((Str.SubString(1, Str.Pos(AnsiString(Delimiter)) - 1)).TrimLeft()).TrimRight();
    Block->Add(tmp);
    Str.Delete(1, Str.Pos(AnsiString(Delimiter)));
  }
  if(!Str.IsEmpty()){
    tmp = ((Str).TrimLeft()).TrimRight();
    Block->Add(tmp);
  }
}

@Malkom · 02.12.2009, 11:15

уважаемый Lord_Voodoo, 4aynik не просто так назвался так что простите его непонимания куда какой код подставить. 4aynik если у тебя есть дурацкие вопросы лучше обращайся ко мне в асю чем позорится на форуме ). сори за оффтоп

@Lord_Voodoo · 02.12.2009, 11:22

Malkom, все мы чайнике, только в разной степени, а если хочет учиться, меня уже никакие вопросы не смущают, у меня в асе больше сотни разных личностей, некоторые просто убивают, но раз я еще живой, значит иммунитет есть... хотя основные принципы работы в билдере неплохо бы и изучить по какой-нить книге, ну и си++ тоже почитать неплохо бы, 4aynik

@4aynik · 02.12.2009, 13:09 **[ТС]**

Мне интересно на конкретных примерах учиться, а не тупо читать теорию...

sh4d°_°ff · 02.12.2009, 17:11

Не по теме:

Сообщение от 4aynik

Мне интересно на конкретных примерах учиться, а не тупо читать теорию...

поверь, изучать основы по книжкам и тупо читать теорию - это разные вещи =)

@4aynik · 03.12.2009, 15:01 **[ТС]**

Lord_Voodoo, специально в строке

C++
1
AnalizeAnswer(AnswerBlock, (TStringList*)Answer);

не дописал ещё один параметр, чтобы я сам додумал?)

@Lord_Voodoo · 03.12.2009, 15:17

4aynik, нет, просто у меня по умолчанию стоит крест для моего протокола общения клиента с сервером... ну вообще можно же догадаться, что чего-то не хватает... я же куски из рабочего проекта копировал, так уж извини, если что-то упускаю из виду

@4aynik · 03.12.2009, 15:51 **[ТС]**

Этот крест †?

@Lord_Voodoo · 03.12.2009, 15:54

4aynik, ага

Новые блоги и статьи Все статьи Все блоги /
[golang] Двоичная куча, min-heap alhaos 20.05.2026 Двоичная куча Двоичная куча — структура данных, которая всегда держит самый важный элемент наготове. Представьте очередь к хилеру в игре, и очередь из игроков в приоритете те у кого меньше. . .	[golang] Breadth-First Search alhaos 19.05.2026 BFS (Breadth-First Search) — это базовый алгоритм обхода графа в ширину, который поуровнево исследует все связанные вершины. Он начинает с выбранной точки и проверяет всех соседей, прежде чем. . .	[golang] Алгоритм «Хак Госпера» alhaos 17.05.2026 Алгоритм «Хак Госпера» Хак Госпера (Gosper's Hack) — алгоритм нахождения следующего по величине числа с тем же количеством установленных бит. Придуман Биллом Госпером в 1970-х, опубликован в. . .	Рисование бинарного древа до 6-го колена на js, svg. russiannick 17.05.2026 <svg width="335" height="240" viewBox="0 0 335 240" fill="#e5e1bb"> <style> <!]> </ style> <g id="bush"> </ g> </ svg> function fn(){ let rost;/ / высота древа let xx=165,yy=210,w=256;
FSharp: interface of module DevAlt 16.05.2026 Интерфейс модуля F# позволяет управлять доступностью членов, содержащихся в реализации модуля. По-умолчанию все члены модуля доступны: module Foo let x = 10 let boo () = printfn "boo" . . .	Хитросплетение родственных связей пантеона греческих богов. russiannick 14.05.2026 Однооконник, позволяющий узреть и изучить отдельных героев древней Греции. <!DOCTYPE html> <html lang="ru"> <head> <meta charset="UTF-8"> <meta http-equiv="X-UA-Compatible". . .	[golang] Угол между стрелками часов alhaos 12.05.2026 По заданным значениям часа и минуты необходимо определить значение меньшего угла между стрелками аналогового циферблата часов. import "math" func angleClock(hour int, minutes int) float64 { . . .	Debian 13: Установка Lazarus QT5 ВитГо 09.05.2026 Эта инструкция моя компиляция инструкций volvo https:/ / www. cyberforum. ru/ blogs/ 203668/ 10753. html и его же старой инструкции по установке Lazarus с gtk2. . .

@4aynik 0 / 0 / 0 Регистрация: 17.08.2009 Сообщений: 161

	Время сервера 27.11.2009, 15:10. Показов 4811. Ответов 32 Метки нет (Все метки) Кто-нибудь пробовал программно записывать время с сервера??? 0

@Lord_Voodoo Почетный модератор 8785 / 2538 / 144 Регистрация: 07.03.2007 Сообщений: 11,873
	01.12.2009, 17:20
	4aynik, там по идее за последней скобкой в классе надо точку с запятой поставить, а так вроде бы похоже на правду 0

@4aynik 0 / 0 / 0 Регистрация: 17.08.2009 Сообщений: 161
	02.12.2009, 09:52 [ТС]
	Ошибки такие: [C++ Error] Unit1.cpp(31): E2141 Declaration syntax error в этой строчке int __fastcall TalkServer(AnsiString Cmd, TStrings* Answer) { - вот тут. ------------------------------------------------------------------------- [C++ Error] Unit1.cpp(49): E2139 Declaration missing ; [C++ Error] Unit1.cpp(49): E2190 Unexpected } в этой строчке return err; } }; - тут. ------------------------------------------------------------------------- [C++ Error] Unit1.cpp(50): E2190 Unexpected } в этой строчке return err; } }; } - тут. -------------------------------------------------------------------------- [C++ Error] Unit1.cpp(56): E2316 'Client' is not a member of 'TForm1' в это строчке Form1->Client->TalkServer("INFO†SYNC†", Block); 0

@Lord_Voodoo Почетный модератор 8785 / 2538 / 144 Регистрация: 07.03.2007 Сообщений: 11,873
	02.12.2009, 09:54
	4aynik, неужели ошибки вам ничего не говорят? разместите TTcpClient* Client; в разделе public TForm1, на счет первых ошибок, покажите весь код 0

@Malkom 0 / 0 / 0 Регистрация: 02.12.2009 Сообщений: 4
	02.12.2009, 11:15
	уважаемый Lord_Voodoo, 4aynik не просто так назвался так что простите его непонимания куда какой код подставить. 4aynik если у тебя есть дурацкие вопросы лучше обращайся ко мне в асю чем позорится на форуме ). сори за оффтоп 0

@Lord_Voodoo Почетный модератор 8785 / 2538 / 144 Регистрация: 07.03.2007 Сообщений: 11,873
	02.12.2009, 11:22
	Malkom, все мы чайнике, только в разной степени, а если хочет учиться, меня уже никакие вопросы не смущают, у меня в асе больше сотни разных личностей, некоторые просто убивают, но раз я еще живой, значит иммунитет есть... хотя основные принципы работы в билдере неплохо бы и изучить по какой-нить книге, ну и си++ тоже почитать неплохо бы, 4aynik 0

@4aynik 0 / 0 / 0 Регистрация: 17.08.2009 Сообщений: 161
	02.12.2009, 13:09 [ТС]
	Мне интересно на конкретных примерах учиться, а не тупо читать теорию... 0

@Lord_Voodoo Почетный модератор 8785 / 2538 / 144 Регистрация: 07.03.2007 Сообщений: 11,873
	03.12.2009, 15:17
	4aynik, нет, просто у меня по умолчанию стоит крест для моего протокола общения клиента с сервером... ну вообще можно же догадаться, что чего-то не хватает... я же куски из рабочего проекта копировал, так уж извини, если что-то упускаю из виду 0

@4aynik 0 / 0 / 0 Регистрация: 17.08.2009 Сообщений: 161
	03.12.2009, 15:51 [ТС]
	Этот крест †? 0

@Lord_Voodoo Почетный модератор 8785 / 2538 / 144 Регистрация: 07.03.2007 Сообщений: 11,873
	03.12.2009, 15:54
	4aynik, ага 0