Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

Exit для Action [D5, WinXP]

Vader © (2002-09-06 11:27:00)
Подскажите пожалуйста какой аналог Exita в процедурах и функциях существует для Action"ов. Если в середине Action"а пишу Exit, выдаётся сообщение "Statement expected, but expression of type "TAction" found"

Набережных С. (2002-09-07 17:22:00) [1]

> VAleksey © (07.09.02 09:37)

Не вижу темы для какой-либо дискусси - уж что-что, а методы TAction сюда никаким боком не прилепить.

VAleksey (2002-09-07 09:37:00) [2]

> Набережных С. (06.09.02 17:44)

Как вариант годится :).

VAleksey (2002-09-07 09:36:00) [3]

> Набережных С. (06.09.02 22:08)

Я бы сказал не убьет, а исправит.
System.Exit действительно работает в такой ситуации. Я так и делал. Почему она возникла не знаю. Послежу за данной веткой :)

Набережных С. (2002-09-06 22:08:00) [4]

> Ketmar © (06.09.02 18:43)

Чушь. System.Exit убьет ошибку, только при чем тут методы TAction?

Ketmar (2002-09-06 18:43:00) [5]
все еще проще. у Акшена есть такой метод (или что там у него). надо писать System.Exit.

Satanas Nobiscum! 06-Sep-XXXVII A.S.

Набережных С. (2002-09-06 17:44:00) [6]
Ты один из Action назвал Exit, вот и все.

Vader (2002-09-06 13:01:00) [7]

procedure TFAdmin.UnlockExecute(Sender: TObject);
begin
Panel1.Enabled:=True;
Panel2.Enabled:=True;
Caption:="Разблокирован";
Exit;//Например напишем здесь
//Получаем на этом месте выше описанную ошибку
end;

Unlock - Action из ActionList"а

Smithson (2002-09-06 12:17:00) [8]
Обработчик TAction - обычная процедура. Exit прерывает обработку ЛЮБОЙ процедуры (см. help). Возможно, в TACtion есть метод exit, тогда надо писать system.exit

Александр Спелицин (2002-09-06 11:59:00) [9]
Код в студию!!!

Наверх

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