Einzelnen Beitrag anzeigen

Benutzerbild von himitsu
himitsu

Registriert seit: 11. Okt 2003
Ort: Elbflorenz
43.183 Beiträge
 
Delphi 12 Athens
 
#8

AW: Ausführen einer Methode bei MethodAddress

  Alt 4. Feb 2024, 15:25
Casten und die Methode "direkt" aufrufen ist natürlich immernoch das Beste, am Einfachsten über einen gemeinsamen Vorfahren.

Delphi-Quellcode:
type
  TMyForm = class(TForm)
  private
    procedure Test;
    procedure DoLog(S, S2: string);
  end;

procedure TMyForm.Test;
begin
  for var M in TRttiContext.Create.GetType({TMyForm}Self.ClassType).GetMethods do // ja, es fehlt ein .FindMethod('DoLog') ... k.A. warum die immer wieder so dämlich sind
    if M.Name = 'DoLogthen
      M.Invoke(Self, ['abc', 'def']);
end;
Garbage Collector ... Delphianer erzeugen keinen Müll, also brauchen sie auch keinen Müllsucher.
my Delphi wish list : BugReports/FeatureRequests
  Mit Zitat antworten Zitat