void __fastcall TForm1::Button1Click(TObject *Sender)
{
//Creación de un tipo de datos donde se contendrán los atributos de un fichero
WIN32_FIND_DATA* dat = new WIN32_FIND_DATA();
//Busco el fichero en concreto.
HANDLE buscar = FindFirstFile("d:\\avathar.bmp",dat);
//Si existe el fichero.
if (buscar != INVALID_HANDLE_VALUE)
{
float dato =dat->nFileSizeLow;
ShowMessage(FloatToStr(dato) +" bytes." );
}
else
{
ShowMessage("No Existe el fichero");
}
}