Delphi findet eine Instanz einer Funktion basierend auf einer Zeichenfolge und führt sie aus
Schlüsselwort : MethodAddress: Rufen Sie die Adresse der Methode ab. Diese Methode muss veröffentlicht werden.
Beispielcode:
Unit Unit1; Schnittstelle verwendet Windows, Messages, Graphics, Controls, Forms, Dialogs, StdCtrls; type TShowInfo = procedure(info:string) of object; //Deklarieren Sie einen Prozedurtyp, die Parameter sind konsistent mit ShowInfo TForm1 = class(TForm) Button1: TButton; procedure Button1Click(Sender: TObject); private { Private Deklarationen } public { Public Deklarationen } veröffentlichte Prozedur ShowInfo(info: string); var Form1; Implementierung {$R *.dfm} { TForm1 } procedure TForm1.ShowInfo(info: string); Button1Click(Sender: TObject); var s:TShowInfo; begin @s := MethodAddress('ShowInfo'); //Die Adresse von ShowInfo abrufen, wenn @s <> nil, dann //Wenn nicht leer, begin s('Volksrepublik China'); //Ausführen end;Wenn Sie Fragen haben, hinterlassen Sie bitte eine Nachricht oder gehen Sie zur Community dieser Website, um zu kommunizieren und zu diskutieren. Ich hoffe, dass es allen helfen kann.