![]() |
|
|
|||||||
| Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
|
Опции темы | Поиск в этой теме | Опции просмотра |
|
#1
|
|||
|
|||
|
Доброго всем времени суток!
Почему в этой ветке: Андрюха - тоже ОС (балшой паласатый мух) ... А присказка такова - в ХЕ8 такое: Код:
procedure TForm1.FormShow(Sender: TObject);
var
recievemessage, tmp: string;
begin
try
IdTCPClient1.Connect;
IdTCPClient1.Socket.WriteLn('Get_Data');
recievemessage:= IdTCPClient1.Socket.ReadLn;
IdTCPClient1.Disconnect;
except
on E:Exception do
begin
Showmessage('Не удалось установить соединение');
exit
end;
end;
// как-то обрабатываем recievemessage...
end;З.Ы. И стрелка "назад" не выходит из проги ни в теле, ни в эмуляторе. Заранее благодарен |