Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

проблема с while do


самсамыч ©   (2006-06-15 20:52:00) 

подскажите плиз как реализовать след.
где - то ошибка
if socket.ReceiveText = 'Zzz' then
while form1 do begin
memo1.Lines.Add(socket.ReceiveText);
Socket.SendText('Logiend');
end;


tButton   (2006-06-16 09:27:00) [1]

так к меме из with обратиться можно
а к сокету тем более


Sergey13   (2006-06-16 09:24:00) [2]

Может тут WITH подразумевалось.


Сергей М.   (2006-06-16 09:10:00) [3]

s := socket.ReceiveText;
if s = 'Zzz' then
 begin
   form1.memo1.Lines.Add(s);
   Socket.SendText('Logged');
 end;


Loginov Dmitry   (2006-06-15 21:35:00) [4]

А может while тут и не нужен?


Наверх

Титульная страница Поиск, карта сайта Написать письмо