Thema: Delphi Verzeichnis ändert sich

Einzelnen Beitrag anzeigen

Benutzerbild von Matze
Matze
(Co-Admin)

Registriert seit: 7. Jul 2003
Ort: Schwabenländle
14.929 Beiträge
 
Turbo Delphi für Win32
 
#3

Re: Verzeichnis ändert sich

  Alt 19. Jan 2006, 17:56
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: Hier im Forum suchenletzten 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.
  Mit Zitat antworten Zitat