[beginner01]

Hola.

Prueba asi.

#include <Clipbrd.hpp>

//---------------------------------------------------------------------------
void _fastcall LeerArchivosPortapapeles(TListBox *Lista)
{
  //THandle HPortapapeles; // Handle del portapapeles
  HDROP HPortapapeles;

  int iNumArc; // Nº de archivos

  //: array [0..MAX_PATH - 1] of char;
  wchar_t Archivo[MAX_PATH];
  TClipboard *ClipB = Clipboard();


  if ( ClipB -> HasFormat( CF_HDROP ) )
  {
  		Lista->Clear(); /*Prueba*/

		HPortapapeles = (HDROP)ClipB -> GetAsHandle( CF_HDROP );

		iNumArc = DragQueryFile(HPortapapeles, 0xFFFFFFFF/*$FFFFFFFF*/, NULL, NULL);

		for (int i = 0 ;i < iNumArc; i++)
		{

		  DragQueryFile( HPortapapeles, i, Archivo/*@Archivo*/, MAX_PATH );
		  Lista->Items->Add( Archivo );
		}
  }
}