Einzelnen Beitrag anzeigen

Benutzerbild von hitzi
hitzi

Registriert seit: 2. Jan 2003
Ort: Eibau
768 Beiträge
 
Delphi 2010 Professional
 
#1

Verzeichnisse + Dateiname > 255 Zeichen mit OpenFile?

  Alt 7. Dez 2004, 12:10
Hallo,

gibt es eigentlich einen Weg die Einschränkung von 255 Zeichen für Dateinamene + Verzeichnisse zu umgehen?

MeinProblem ist, dass ich die Datei erstellen kann (ich speichere eine Stringlist mit Savetofile), aber dann nicht mehr mit OpenFile auf eben diese Datei zugreifen kann (liefert immer HFILE_ERROR zurück).

Ich nutze das Openfile in einer Function, welche mir das letzte Änderungsdatum einer Datei zurückliefert.

Delphi-Quellcode:
function GetFileModifyDate(FileName: string): Integer;
var
  h: THandle;
  Struct: TOFSTRUCT;
begin
  Result := 0;
  h := OpenFile(PChar(FileName), Struct, OF_SHARE_DENY_NONE);
  try
    if h <> HFILE_ERROR then
    begin
      result := FileGetDate(h);
    end;
  finally
    CloseHandle(h);
  end;
end;
Also gibt es einen Weg Pfade mit mehr als 255 zeichen zu nutzen (TStringlist.SaveToFile kann's ja auch) oder gibt es eine andere Möglichleit das Änderungsdatum einer Datei zu ermitteln?

Gruss
Thomas
Besucht doch mal http://www.hitziger.net
  Mit Zitat antworten Zitat