Entwickler-Ecke

Grafische Benutzeroberflächen (VCL & FireMonkey) - Inhalt eines Strings für Aktionen verwenden ???


mig76 - Fr 04.10.02 11:36
Titel: Inhalt eines Strings für Aktionen verwenden ???
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 - Fr 04.10.02 12:39

Hallo,

du kanst mit FindComponent arbeiten. Das ginge z.B. so:

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 - Fr 04.10.02 12:45
Titel: DANKE
Danke, funkt. perfekt !!!
:P