Ich habe das Problem, dass, falls über das Netzwerk auf eine entsprechende dBase-Datei zugegriffen werden muss, keine Verbindung aufgebaut werden kann und das Programm dementsprechend mit lauter Fehlermeldungen den Start verweigert. Das ist ein riesiges Problem, weil dieser Fall sehr oft eintritt.
Gibt es eine entsprechende Einstellung für dBase-Datenbanken oder wie lässt sich dieses Problem lösen?
Entsprechende Code-Stellen im Programm:
Delphi-Quellcode:
if DirectoryExists(path) then begin
Session.NetFileDir:=prgmpath+pdir;
Session.PrivateDir:=prgmpath+pdir;
end;
Delphi-Quellcode:
if (neuer_pfad)
OR (neues_schuljahr)
then begin
for i := 1
to 33
do begin
Application.ProcessMessages;
TQuery(FindComponent('
Query'+inttostr(i))).Close;
TQuery(FindComponent('
Query'+inttostr(i))).DatabaseName := path;
//TQuery(FindComponent('Query'+inttostr(i))).Open;
end;
Beispiel für 'Einrichten' eines Querys:
Delphi-Quellcode:
Query1.Close;
Query1.SQL.Text := 'SELECT * FROM "VT'+sj+'"';
Query1.SQL.Add('WHERE S NOT IN ("M","E","H") '+abteilung+SchPlKKA_Str+' AND DATUM=:today');
Query1.SQL.Add('ORDER BY '+order1);
Query1.ParamByName('today').Value := today;
Query1.Open;
Entsprechende Fehlermeldung im Anhang!
/edit: Anbei nochmal Objektinspektor/-hierarchie von Session1 und Query1!