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

Цитата:
Сообщение от Smerch66
Какой командой можно завершить выполнение работы процедуры?
И как реализовать временную задержку выполнения программы в определённом месте текста программы?
Спасибо!
Код:
Exit()
Sleep(100{ms})
__________________
TAleD = class(TUser)
public
function HelpMe(ASubject, ARequest: String): String;
function GiveMeExample(ASubject: String): TStringList;
procedure WriteReview(APost: Integer; ADescription: TStringList);
end;
Ответить с цитированием