#include <Shellapi.h>
...
bool PutFileToRecycle(AnsiString filename)
{
SHFILEOPSTRUCTA SHF;
SHF.hwnd = Application->Handle;
SHF.wFunc = FO_DELETE;
SHF.pFrom = filename.c_str();
SHF.fFlags = FOF_SILENT + FOF_ALLOWUNDO;
return (SHFileOperationA(SHF) == 0);
}