Thema: Delphi Verzeichnis ändert sich

Einzelnen Beitrag anzeigen

davar

Registriert seit: 4. Feb 2005
311 Beiträge
 
Turbo Delphi für Win32
 
#5

Re: Verzeichnis ändert sich

  Alt 19. Jan 2006, 18:18
Zitat von Matze:
Ü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.
Aber hilft mir das denn in dem Fall weiter?

Dann habe ich ja den Namen des Ordners "images", aber da bin ich ja schon. Ich möchte ja da wieder raus.. Wenn ich Delphi aufrufe, bin ich ja im Applikationsverzeichnis und kann von dort aus ins Unterverzeichnis "DBs" zugreifen. Aber nachdem die Imagelist auf das Unterverzeichnis "images" zugreift, bleibt Delphi auch dort und kennt logischerweise das Unterverzeichnis "DBs" nicht, weil es dort auch keins gibt. Also müsste die Applikation wieder aus diesem Verzeichnis "images" eins höher.

Kann ich denn irgendwie die Query-Abfrage so modifizieren, dass ich da das Pfad irgendwie "zwischenschalten" kann? Dann hätte ich auch das Problem mit den relativen Pfadangaben nicht.

MfG

davar
  Mit Zitat antworten Zitat