Einzelnen Beitrag anzeigen

Delphi.Narium

Registriert seit: 27. Nov 2017
2.415 Beiträge
 
Delphi 7 Professional
 
#3

AW: Unidac dbf is not a valid path

  Alt 7. Jan 2018, 17:08
Mal 'ne kleine Fehlerprüfung einbauen?
Delphi-Quellcode:
Var
 sDBF : String;
begin
  sDBF := 'D:\Dat\anlm.dbf';
  if not FileExists(UniConnection.Database) then begin
    MessageDlg(Fortmat('Die Datei %s existiert nicht.',[sDBF]),mtError,[mbOk],0);
    // Routinen sinnvoll beenden oder
    exit;
  end;
  UniConnection := TUniconnection.Create(nil);
  UniConnection.ProviderName := 'DBF';
  UniConnection.SpecificOptions.Add('Direct=True');
  UniConnection.Database := sDBF;
  UniConnection.Connect;
  // ...
  Mit Zitat antworten Zitat