Forum: Object-Pascal / Delphi-Language
Delphi
by DrDangerous,
29. Okt 2002
Hallo Daniel,
wie folgt sollte es klappen:
procedure LVFuellen(s : String);
var t : String;
i : Integer;
begin
t:= 'ListView' + s; // in t steht jetzt der vollstaendige Name des Listview
With TListView( FindComponent(t) ) Do
Forum: Object-Pascal / Delphi-Language
Delphi
by DrDangerous,
29. Okt 2002
Hallo Daniel,
Du hast es ja nun schon geschafft, den Namen der gesuchten Komponente komplett in einem String zu halten. Das ist doch schon fast die halbe Miete:
Mit der Methode "FindComponent()" kannst Du Komponenten über ihren Namen ansprechen. Dann noch ein kleiner Typecast und fertig ist die Laube:
With TListView( FindComponent(t) ) Do
Begin
... // Hier Deinen Code einfuegen
End;