Форум: "Начинающим";
Текущий архив: 2007.07.29;
Скачать: [xml.tar.bz2];
Внизвсё очень просто Найти похожие ветки
← →
Тимофей (2007-07-03 15:12) [0]условно есть 2 кнопки Button1 и Button2 которые запускают процедуру Procedure1.
как узнать в процедуре какая из кнопок ее запустила ?
← →
clickmaker © (2007-07-03 15:14) [1]Sender?
← →
Тимофей (2007-07-03 15:17) [2]да, а синтаксис какой ?
← →
iXT © (2007-07-03 15:35) [3]TButton(Sender)
← →
Плохиш © (2007-07-03 15:39) [4]А я сначала спрошу. А каким способом эти кнопки запускают указанную процедуру?
← →
Тимофей (2007-07-03 15:43) [5]через событие OnClick
← →
Тимофей (2007-07-03 15:44) [6]вот так:
CalcMK(BitBtn1);
← →
palva © (2007-07-03 15:45) [7]
> Тимофей (03.07.07 15:17) [2]
> да, а синтаксис какой ?procedure TForm1.Procedure1(Sender: TObject);
begin
if sender = Button1 then ShowMessage("1");
if sender = Button2 then ShowMessage("2");
end;
← →
Тимофей (2007-07-03 15:45) [8]спасибо!
← →
Плохиш © (2007-07-03 15:46) [9]
> Тимофей (03.07.07 15:43) [5]
> через событие OnClick
тогда тебе уже ответили.
> Тимофей (03.07.07 15:44) [6]
> вот так:
> CalcMK(BitBtn1);
Пожалуй я не буду спрашивать, что это за CalcMK и как она привязывается к букавам в [0]... Скучно мне и неинтересно...
← →
Тимофей (2007-07-03 15:56) [10]
> Пожалуй я не буду спрашивать, что это за CalcMK и как она
> привязывается к букавам в [0]... Скучно мне и неинтересно.
> ..
вообще CalcMK это та самая процедура, но раз ты не спрашиваешь отвечать не буду :)
Страницы: 1 вся ветка
Форум: "Начинающим";
Текущий архив: 2007.07.29;
Скачать: [xml.tar.bz2];
Память: 0.46 MB
Время: 0.04 c