Текущий архив: 2002.10.14;
Скачать: CL | DM;

Вниз

Выполнить процедуры:   Найти похожие ветки 

← →
Оля   (2002-10-03 16:45) [0]

Извините за дурацкий вопрос, а как это сделать

procedure TForm1.SpeedButton3Click(Sender: TObject);
begin
Выполнить процедуры:
TForm1.SpeedButton1Click?
TForm1.SpeedButton2Click?
end;


procedure TForm1.SpeedButton1Click(Sender: TObject);
begin
...
end;

procedure TForm1.SpeedButton2Click(Sender: TObject);
begin
...
end;

---

← →
MBo ©   (2002-10-03 16:48) [1]

SpeedButton1Click(nil);

---

← →
Игорь Шевченко ©   (2002-10-03 17:55) [2]

SpeedButton1Click(SpeedButton1)
SpeedButton2Click(SpeedButton2)

---

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

Текущий архив: 2002.10.14;
Скачать: CL | DM;

Наверх

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