Вниз
Скачать: CL | DM;

Чем заменить конструкцию использующую Application   Найти похожие ветки 

 
stas ©   (2009-11-13 16:08) [0]

Нужно дождаться пока объект сменит статус:

while smtpclient.State <>smtpReady do Application.ProcessMessages;

у меня нет Application.

Заранее благодарен.


 
Bel ©   (2009-11-13 16:12) [1]

Sleep поможет?


 
stas ©   (2009-11-13 16:17) [2]

не, со Sleep вешается приложение.


 
Юрий Зотов ©   (2009-11-13 16:20) [3]

Подробности нужны. Что за приложение, есть в нем цикл выборки сообщений, кто его крутит и.т.п.


 
stas ©   (2009-11-13 16:29) [4]

Юрий Зотов ©   (13.11.09 16:20) [3]
Есть процедура отправки почты. В ней вызываются по очереди необходимые команды
SmtpClient.Connect;
Между этими командами нужно дождаться пока объект SmtpClient примет определенный статус, для этого я выполняю
while smtpclient.State <>smtpReady do Application.ProcessMessages;
SmtpClient.Helo;
Но процедура может использоваться как в приложении с формами так и без, а включать туда модуль forms и утяжелять в 3 раза нехочется.


 
stas ©   (2009-11-13 16:35) [5]

Вобще вопрос вырос отсюда:
http://delphimaster.net/view/6-1258114919/


 
stas ©   (2009-11-13 16:42) [6]

Спасибо за помощь, нашел MultiThread объект, слип помог.


 
Медвежонок Пятачок ©   (2009-11-13 18:31) [7]

и в чем бы был смысл процессамесаджей?
аппликейшона нет. значит нет модуля формз.
значит консоль.
и в чем смысл в консоли делать processmessages?



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.007 c
15-1256994371
TUser
2009-10-31 16:06
2010.01.03
К дню политзаключенного. Чисто исторический вопрос.


2-1257870760
Zheksonz
2009-11-10 19:32
2010.01.03
Пересечение прямой и окружности


15-1256225989
Empleado
2009-10-22 19:39
2010.01.03
Поднять облака! Интересно, о какой "установке" идет речь ?...


15-1257122587
Eraser
2009-11-02 03:43
2010.01.03
Протокол и GNU


2-1258131218
abajun
2009-11-13 19:53
2010.01.03
продолжение работы программы после нажатия клавиши




   Наверх