Zugriff auf dynamische Komponenten

[ibp]

Hallo,
im programm werden db tabellen dargestellt, die natürlich unterschiedliche felder haben, die mit unterschiedlichen zur laufzeit erzeugften komponenten dargestellt werden z.zt. sind es folgende...

Code:

   Lb:TLabel;           // Label
   edfld:TEdit;         // Edit-Feld
   exfld:TEditOpenEx;   // Start-Feld abgeleitet von TWinControl
   vwfld:TViewer;       // Viewer-Feld abgeleitet von TWinControl
   cbfld:TCheckbox;     // CheckBox-Feld 
   dtfld:TDateEdit;     // Datums-Feld RX control
   cufld:TCurrencyEdit; // Zahl-Feld RX control
   mefld:TMemo;         // Memo-Feld
   kbfld:TComboBox;     // KomboBox-Feld

... es können aber noch andere dazukommen...

frage, wie kann ich nun diese günstig ansprechen, ohne findcomponent... , sicherlich mit einem array of ....?
welche übergeordnete klasse würdet ihr empfehlen, ich brauche jedenfalls die visible und tag eigenschaften ..

[der-C]

Delphi-Quellcode:

for i:=0 to form1.Controlcount do
if form1.Controls[i] is TEdit
then
Tedit(form1.Controls[i]).text:='TEXT bla...'

oder

Delphi-Quellcode:

...
if form1.Controls[i].name = 'KomponentenName' then
...

[ibp]

gnau das will ich ja nicht, da ich beim erstellen ja die komponenten kenne... daher ein array, damit ich mittel index direkt darauf zugreifen kann!

[der-C]

vieleicht mit

Delphi-Quellcode:

type
PTWinControl = ^TWinControl;

feld : array [0..10] of PTWinControl;
...
feld[0]:=@edfld;
...

feld[0].visible := false;
feld[0].tag := 1;

[ibp]

ja schon (warum mit pointern?) aber warum twincontrol? und wie siehts mit der weiteren ansprache der komponenten aus? und gibt es noch andere möglichkeiten?

[woki]

z.B. TObjectlist

Das explizite hantieren mit Pointern ist nicht zu empfehlen.

Grüße
Woki

[ibp]

@woki
wie arbeitet man damit?

[ibp]

gibts noch tipps?

[fkerber]

Hi!

Schonmal hier geschaut:
objectlist?


Ciao Frederic

[SirThornberry]

Zitat:

Zitat von woki

...Das explizite hantieren mit Pointern ist nicht zu empfehlen. ...

Warum?? Wozu sind Pointer sonst da. Eine TList (oder eben Array reicht völlig aus)

@der-C:

Zitat:

PTWinControl = ^TWinControl;

ist überflüssig da TWinControll bereits ein pointer ist.

desweiteren reicht es von TControl abzuleiten, damit kann später auch TImage etc. (eben alles Visuelle) angesprochen werden - Tcontrol besitzt ja bereits die Properties "Visible" und "Tag"