Hallo,
ich habe ein Datenmodul und möchte nach dem erstellen des Moduls alle Tabellen öffnen.
Ich verzweifele aber grade daran ..
Ich habe das Problem, das ich nicht weiß, wie ich beim durchlaufen und finden der Tabellenobjekte diese öffnen kann...
ich habe ein Datenmodul und möchte nach dem erstellen des Moduls alle Tabellen öffnen.
Ich verzweifele aber grade daran ..
HTML Code:
procedure TGdm.DataModuleCreate(Sender: TObject); var I, x: Integer; S : TadsTable; begin x := 0; for I := 0 to ComponentCount - 1 do if Components[i] is TADSTABLE then begin x := x + 1; S := Components[i].Name as Tadstable; // das knallt schon // hier will ich die TAbelle öffnen end; ... end;