Autor Beitrag
mig76
Hält's aus hier
Beiträge: 15


2010
BeitragVerfasst: Fr 04.10.02 11:36 
Mein Problem:
habe eine Action namens acTest. Um die Aktion im Programm auszuführen genügt ja die Zeile

acTest.Execute;

Jetzt habe ich aber den Namen der Action in einer Stringvariable, z.B.:
sString := 'acTest';

wie kann ich jetzt über die Stringvariable bzw. über den Inhalt der Variablen die dazugehörige Action executen? :?:

sString.Execute funktioniert natürlich nicht....

Danke für die Infos
Klabautermann
ontopic starontopic starontopic starontopic starontopic starhalf ontopic starofftopic starofftopic star
Veteran
Beiträge: 6366
Erhaltene Danke: 60

Windows 7, Ubuntu
Delphi 7 Prof.
BeitragVerfasst: Fr 04.10.02 12:39 
Hallo,

du kanst mit FindComponent arbeiten. Das ginge z.B. so:
ausblenden Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
procedure TForm1.Button1Click(Sender: TObject);
VAR
    Compo : tComponent;
begin
  Compo := FindComponent('acTest');
  IF (Compo <> NIL) AND (Compo IS tAction) THEN
    tAction(Compo).Execute;
end;


Gruß
Klabautermann
mig76 Threadstarter
Hält's aus hier
Beiträge: 15


2010
BeitragVerfasst: Fr 04.10.02 12:45 
Titel: DANKE
Danke, funkt. perfekt !!!
:P