![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Передача параметров
Cabrera © (2004-08-06 11:07:00)Подскажите плиз чайнику, как передать несколько параметров (типа Ineger) от одного обработчика нажатия кнопки к другому (ButtonClick1 -> ButtonClick 2)? И сделать так, чтобы вторая кнопка стала доступной только после нажатия первой (отработки первого обработчика) ?
DK (2004-08-06 12:27:00) [21]Ega23 © тебе же написал:
1. Используй переменные с областью видимости на уровень выше твоих обработчиков.
Cabrera (2004-08-06 12:20:00) [22]С кнопкой понятно, а с параметрами что делать?
Ega23 (2004-08-06 11:15:00) [23]1. Используй переменные с областью видимости на уровень выше твоих обработчиков.
2.
procedure TForm1.Buttom1Click(Sender : TObject);
begin
Button2.Enabled:=True;
end;
Cabrera (2004-08-06 11:14:00) [24]На форме есть несколько полей ввода. По нажатию первой кнопки, введенные значения считываются и соотвествующим образом обрабатываются. Происходят еще некоторые действия с БД. Далее, после того как эти манипуляции произведены, надо сделать доступной второую кнопку "Вывод результатов в Excel". По второй кнопке обработанные данные (считанные по нажатию первой кнопки) должны передавать в ячейки Excel.
Digitman (2004-08-06 11:12:00) [25]
> вторая кнопка стала доступной только после нажатия первой
procedure TSomeForm.Button1Click(..);
begin
FParam1 := 1;
FParam2 := 2;
..
Button2.Enabled := True;
end;
procedure TSomeForm.Button2Click(..);
begin
showmessage(inttostr(FParam1));
showmessage(inttostr(FParam2));
end;
Sandman25 (2004-08-06 11:08:00) [26]Не надо так передавать параметры. Поподробнее расскажите, в чем задача.