Einzelnen Beitrag anzeigen

Benutzerbild von himitsu
himitsu

Registriert seit: 11. Okt 2003
Ort: Elbflorenz
43.250 Beiträge
 
Delphi 12 Athens
 
#11

Re: Kurze Dateinamen anlegen

  Alt 15. Jan 2009, 14:03
hast du in deinem Delphi die Delphi-Sourcecodes?
wenn, dann schau mal in die Windows-Unit (Windows.pas), da sind viele Funktionen der WinAPI enthalten. (so um angucken, wie es aussieht)

Zitat von MSDN:
Code:
BOOL WINAPI SetFileShortName(
  __in HANDLE hFile,
  __in LPCTSTR lpShortName
);
Requirements:
Kernel32.dll
Delphi-Quellcode:
Function SetFileShortName(hFile: THandle; lpShortName: PChar): LongBool; StdCall;
  External 'kernel32.dllName 'SetFileShortName';

// oder, da der Name in delphi nicht geändert wurde

Function SetFileShortName(hFile: THandle; lpShortName: PChar): LongBool; StdCall;
  External 'kernel32.dll';
[add]
es könnte auch so heißen ... falls es für diese Funktion auch 'ne UnicodeVersion gibt.
Delphi-Quellcode:
Function SetFileShortName(hFile: THandle; lpShortName: PAnsiChar): LongBool; StdCall;
  External 'kernel32.dllName 'SetFileShortNameA';
Garbage Collector ... Delphianer erzeugen keinen Müll, also brauchen sie auch keinen Müllsucher.
my Delphi wish list : BugReports/FeatureRequests
  Mit Zitat antworten Zitat