Показать сообщение отдельно
  #9  
Старый 01.05.2010, 07:47
Аватар для AleD
AleD AleD вне форума
Активный
 
Регистрация: 21.02.2009
Адрес: г.Краснокаменск
Сообщения: 383
Репутация: 91
По умолчанию

Цитата:
Сообщение от JackRu
Решил всё таки перебрать программу через TClientSocket TServerSocket ...
Но вот наткнулся на проблему
Код:
If ComboBox2.ItemIndex = 6 then
  begin
  showmessage('Выбран элемент 7');
  ClientSocket1.Host:=114.101.125.36;
  ClientSocket1.Port := 16781;
  ClientSocket1.Open;
ляляля ...

При сборке выдаёт
[Error] Unit2.pas(231): Record, object or class type required- выдаёт, ругаясь на IP
Правильно компилятор ругается, IP нужно указывать как строку, т.е.
Код:
ClientSocket1.Host:='114.101.125.36';
__________________
TAleD = class(TUser)
public
function HelpMe(ASubject, ARequest: String): String;
function GiveMeExample(ASubject: String): TStringList;
procedure WriteReview(APost: Integer; ADescription: TStringList);
end;
Ответить с цитированием