Hi,
warum so kompliziert ?
Delphi-Quellcode:
...
var
Filename: string;
...
size := DragQueryFile(Msg.WParam, i , nil, 0);
SetLength(Filename,size);
size := DragQueryFile(Msg.WParam, i, pChar(Filename), 0);
...
ungetestet, müsste aber stimmen.
Gruss
[Edit thkerkmann] Mist, Thema verfehlt.... 6 setzen [/Edit]