Ошибка при вызове процедуры

← →
nikoss © (2002-07-15 15:04) [0]

На форме две кнопки. В первой процедуре описана комманда закрытия
формы. Во второй процедуре идет ссылка на первую процедуру. Возникает
ошибка. Пример:
implementation
{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
begin
Close;
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
TForm1.Button1Click;
end;

end.

[Error] Unit1.pas(35): Not enough actual parameters

← →
ПИТОН (2002-07-15 15:06) [1]

procedure TForm1.Button1Click(Sender)

← →
Fiend © (2002-07-15 15:08) [2]

Если хотите вызвать обработчик события ОнКлик кнопки то вызовите так Button1.Click, или так TForm1.Button1Click(Button1);

А в принципе ничего вызывать не надо в данном случае
Просто укажите в инспекторе OnClick (Button2) на Button1Click.

Ошибка при вызове процедуры Найти похожие ветки