Code: Alles auswählen
B.OnClick:=TDialog.BitBtnClick;
Ich dachte, man muß ein @ vorsetzen, wenn man den Prozedurzeiger und nicht den Prozeduraufruf meint, aber
Code: Alles auswählen
B.OnClick:=@TDialog.BitBtnClick;
Code: Alles auswählen
B.OnClick:=TDialog.BitBtnClick;
Code: Alles auswählen
B.OnClick:=@TDialog.BitBtnClick;
Code: Alles auswählen
var
Dialog1: TDialog;
(* ... *)
procedure BindOnClickToB;
begin
(* ... *)
B.OnClick := @Dialog1.BitBtnClick;
(* ... *)
end;