Locked LOF "Largo de archivo en bytes" [By Pink]

[Expermicid]

[lenguaje=delphi]{Delphi Version: 7.2

Author..........: Pink

Function...: LOF

Uso..............: LOF(ruta Archivo)

Ejemplo: myLOF:=LOF('C:\Users\Usuario\Desktop\Anotador.exe'); }

 

 

Function LOF(FileName:string): integer;

begin

Result:=GetCompressedFileSize(PChar(FileName), nil)

end;[/lenguaje]

Edited February 16, 2014 by Expermicid