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

Как из одного события вызвать другое?   Найти похожие ветки 

← →
иван8511   (2006-11-13 12:12) [0]

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

procedure TForm1.Button1Click(Sender: TObject);
begin
 label1.Caption := "Привет"
 // а здесь вызвать
 //  procedure TForm1.Button2Click(Sender: TObject);
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
 label2.Caption := "Как дела?";
end;

---

← →
KilkennyCat ©   (2006-11-13 12:15) [1]

> procedure TForm1.Button1Click(Sender: TObject);
> begin
> label1.Caption := "Привет"
> // а здесь вызвать
> Button2Click(Sender);
> end;

---

← →
ЮЮ ©   (2006-11-13 12:18) [2]

Так и вызвать
 Button2Click(Button2);
 Button2Click(Button1); // пусть умают, что Button1 вызвал этот метод
 Button2Click(nil); // в этом методе Sender не используется, нечего его и указывать

---

← →
иван8511   (2006-11-13 14:23) [3]

Перепробовал все варианты. Не работает.
Выдает одну и ту же ошибку - Missing operator or semicolon

---

← →
Anatoly Podgoretsky ©   (2006-11-13 14:31) [4]

> иван8511  (13.11.2006 14:23:03)  [3]

А имя пробовал указать?

--

---

← →
иван8511   (2006-11-13 14:44) [5]

Какое имя?

---

← →
Amoeba ©   (2006-11-13 15:04) [6]

> иван8511   (13.11.06 14:23) [3]
> Перепробовал все варианты. Не работает.
> Выдает одну и ту же ошибку - Missing operator or semicolon

А теперь покажи честному народу свой код, на который ругается компилятор.

---

← →
Плохиш ©   (2006-11-13 15:11) [7]

> А теперь покажи честному народу свой код

"честному народу" этот код как-то и неинтересен.

PS. В конце строки label1.Caption := "Привет" вообще-то точку с запятой ставить нужно. Вот что бывает, когда не зная броду суются в воду.

---

← →
Anatoly Podgoretsky ©   (2006-11-13 15:19) [8]

> Плохиш ©   (13.11.06 15:11) [7]

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

---

← →
Плохиш ©   (2006-11-13 15:27) [9]

> Anatoly Podgoretsky ©   (13.11.06 15:19) [8]

Код он в [0] привёл, а ошибку в [3] ;-)

---

← →
Плохиш ©   (2006-11-13 15:30) [10]

А вот мне не хватает функции "откатить до состояния перед появления голой задницы на клавиатуре".

---

← →
Плохиш ©   (2006-11-13 15:31) [11]

> Плохиш ©   (13.11.06 15:30) [10]

Я не понял 8-O, была другая ветка в браузере открыта :-(

---

← →
иван8511   (2006-11-13 16:35) [12]

Хи-хи-хи. Офигеть. Простите за глюк в моих мозгах... Действительно не хватает ";"   Спасибо.

---

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

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



Память: 0.47 MB
Время: 0.033 c