Registriert seit: 12. Dez 2004
Ort: Wien, Österriech
893 Beiträge
Delphi 6 Enterprise
|
Re: Pointer auf Prozeduren
29. Mär 2005, 13:48
Delphi-Quellcode:
type tproctype = procedure (e:integer);
procedure a(w:integer);
begin
end;
procedure TForm1.Button1Click(Sender: TObject);
var e:pointer;
begin
e := @a;
tproctype(e)(2);
end;
Oder du benutzst TList
Katura Haris Es (ein gutes Wort) ist wie ein guter Baum, dessen Wurzel fest ist und dessen Zweige in den Himmel reichen.
|