Thema: Delphi Procedure Problem

Einzelnen Beitrag anzeigen

Benutzerbild von Neutral General
Neutral General

Registriert seit: 16. Jan 2004
Ort: Bendorf
5.219 Beiträge
 
Delphi 10.2 Tokyo Professional
 
#5

Re: Procedure Problem

  Alt 4. Aug 2006, 19:18
Also das Problem das die Procedure ja mal so aussehn kann:

procedure Ka1(Bla: Integer); und ein anderes mal

procedure Hallo(S: String; Abc5: Pointer); und dann will ich:

Delphi-Quellcode:
var Test: TMyClass;

procedure TForm1.OnCreate(Sender: TObject);
begin
 Test := TMyClass.Create;
 Test.Procedure(50); // wenn Procedure = Ka1 ist
 Test.Procedure('Test',@Form1); // wenn Procedure = Hallo ist
end;
Michael
"Programmers talk about software development on weekends, vacations, and over meals not because they lack imagination,
but because their imagination reveals worlds that others cannot see."
  Mit Zitat antworten Zitat