Moin...
versuch mal:
Delphi-Quellcode:
procedure TForm8.FormCreate(Sender: TObject);
var
FTableList : TStrings;
i : Integer;
begin
FTableExist := False;
dbMon1.FileName := 'MyAppLog.log';
dbMon1.Active := True;
dbMon1.AutoSave := True;
dbCon1.Connect;
dbCon1.GetTableNames('',FTableList);
end;
- GetTableNames liefert TStrings zurück
- normalerweise vertragen sich TStrings und TStringlist...wer weiß
- von TStrings brauchst du keine Instanz
PS: FTableList ist lokal deklariert. Wenn du aus dem Create raus bist existiert FTableList nicht mehr. Wenn du dann im OnShow versuchst drauf zuzugreifen gibt es Zugriffsverletzungen.
Probier mal die Variante mit TStrings bzw. mit TSringlist mit einer private deklarierten Variable.