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

Exit для Action   Найти похожие ветки 

← →
Vader   (2002-09-06 11:27) [0]

Подскажите пожалуйста какой аналог Exita в процедурах и функциях существует для Action"ов. Если в середине Action"а пишу Exit, выдаётся сообщение "Statement expected, but expression of type "TAction" found"

---

← →
Александр Спелицин ©   (2002-09-06 11:59) [1]

Код в студию!!!

---

← →
Smithson ©   (2002-09-06 12:17) [2]

Обработчик TAction - обычная процедура. Exit прерывает обработку ЛЮБОЙ процедуры (см. help). Возможно, в TACtion есть метод exit, тогда надо писать system.exit

---

← →
Vader   (2002-09-06 13:01) [3]

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

Unlock - Action из ActionList"а

---

← →
Набережных С.   (2002-09-06 17:44) [4]

Ты один из Action назвал Exit, вот и все.

---

← →
Ketmar ©   (2002-09-06 18:43) [5]

все еще проще. у Акшена есть такой метод (или что там у него). надо писать System.Exit.

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

---

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

> Ketmar © (06.09.02 18:43)

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

---

← →
VAleksey ©   (2002-09-07 09:36) [7]

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

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

---

← →
VAleksey ©   (2002-09-07 09:37) [8]

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

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

---

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

> VAleksey © (07.09.02 09:37)

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

---

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

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



Память: 0.46 MB
Время: 0.009 c