Показать сообщение отдельно
  #5  
Старый 17.06.2008, 16:54
san-46 san-46 вне форума
Активный
 
Регистрация: 25.04.2008
Сообщения: 383
Репутация: 33
По умолчанию

Цитата:
Сообщение от sid401
Теперь не могу допереть как обрабатывать события по нажатию этой кнопки. Т.е. в обычном случае то понятно - двойной клик на Event - OnClick и процедура новая появляется. Здесь эту процедуру нужно как-то самому писать?

В объявлении класса AskForm надо записать:
Код:
procedure DoButtonClick(Sender: TObject);
Наименование процедуры не имеет значения.
В секции implementation реализацию этой процедуры:
Код:
procedure AskForm.DoButtonClick(Sender: TObject);
begin
///
end;
В функции после создания кнопки, ее событию присвоить имя процедуры:
Код:
  ...
  AskButton.OnClick := DoButtonClick;
  ...
Цитата:
Сообщение от sid401
Да, кстати после того как выполнение этой функции закончиться, все элементы на ней и сама форма прекращают свое существование?
Нет, не прекращают. Надо явно пристрелить созданную форму:
Код:
AskForm.Free;
__________________
Не забывайте делать резервные копии
Ответить с цитированием