Ich weiß nicht darum schreibe ich ja ins Forum.
Habs mal so Probiert, aber die Fehlermeldung ist die gleiche
Delphi-Quellcode:
procedure TForm1.FormCreate(Sender: TObject);
begin
PageControl1.ActivePageIndex := 0; // zeigt Statusanzeige nach dem Programm start
DM.AdsConnection1.IsConnected :=True;
DM.TInteressen.Active := False; // Schließt Tabellen
DM.TInteressenten.Active := False;
DM.TStatus.Active := False;
DM.TToDoListe.Active := False;
DM.TMitarbeiter.Active := False;
DM.TLand.Active := False;
DM.TWiedervorlage.Active := False;
with DM.AdsConnection1 do
begin
// DM.AdsConnection1.IsConnected :=True;
// Kein Loginfester anzeigen
DM.AdsConnection1.LoginPrompt := FALSE;
DM.AdsConnection1.ConnectPath := 'C:\Dokumente und Einstellungen\pierre\Desktop\Software\Datenbank '; //Verzeichnis wo die Tabellen sind
//DM.AdsConnection1.AdsServerTypes := [stADS_REMOTE,stADS_LOCAL];
end;
with DM.TInteressen do
begin
DM.TInteressen.TableName := 'Interessen.adt'; // Tabellen Name
Active := TRUE;
end;
end;