OpenDialog: Problem mit vielen Dateien

[himitsu]

die Dateinamen deiner Musikstücke sind doch bestimmt nicht grad kurz?

ich hab zwar grad den Thread nicht gefunden, aber hier das Problem.

Delphi-Quellcode:

// Ort: 
// Unit Dialog
function TOpenDialog.DoExecute(Func: Pointer; ParentWnd: HWND): Bool;

// Zuweisung des Puffers
SetLength(TempFilename, nMaxFile + 2);
{OpenFilename.}lpstrFile := PChar(TempFilename);

// Größe des Puffers für Dateinamen (siehe MultiSelectBufferSize)
if ofAllowMultiSelect in FOptions then
  nMaxFile := MultiSelectBufferSize else
  nMaxFile := MAX_PATH;

// definierte Konstante
MultiSelectBufferSize = High(Word) - 16;

heißt, es passen nur (da ANSI) 65519 Byte (incl. Tenn- und Abschlußmarker)
bei 2000 Dateien macht das ~31 Zeichen pro Dateiname (in System32 sind viele 8.3-Dateinamen ... mit maximal 12 Zeichen)

aber ~800 Zeichen/Buchstaben pro Datei (bei 74 Dateien) kommen mir auch recht viel vor