On 31/12/2020 01:09, James Richters via fpc-pascal wrote:
Var
FN : LPTSTR;
Begin
FN:='';
Writeln(Format_ID);
GetClipboardFormatName(Format_Id,FN,250);
Check the msdn help.
https://docs.microsoft.com/en-us/windows/win32/api/winuser/nf-winuser-getclipboardformatnamea
FN must point to an existing buffer (allocated mem) that receives the
result.
FN : Array [0..255]of Byte;
GotLen := GetClipboardFormatName(Format_Id, LPTSTR(@FN[0]),250);
then "move()" the received bytes into a string, make sure to use
UniqueString() or similar
_______________________________________________
fpc-pascal maillist - fpc-pascal@lists.freepascal.org
https://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal
