Hallo
Zitat von
davar:
Ich habe mir ja überlegt, die Pfadangaben mit "ExtractFilePath(Application.ExeName)" + 'DBs\..' " anzugeben, aber dann habe ich wiederum ein Problem mit den Querys, weil ich nicht weiss, wie ich es dort hinkriegen kann.
Über die Suche (Bsp:
letzten Ordner) wärst du auf folgenden Code von
marabu gestoßen:
Delphi-Quellcode:
function Folder(fileName: string): string;
begin
Delete(fileName, 1, Length(ExtractFileDrive(fileName)));
SetLength(fileName, Length(fileName) - Succ(Length(ExtractFileName(fileName))));
Result := ExtractFileName(fileName);
end;
Diese Funktion gibt dir den Namen des "untersten" Ordners zurück.