Tamanho do Arquivo
10/03/2003
0
Alguém sabe como pegar o tamanho do arquivo aberto por OpenDialog??
Okama
Curtir tópico
+ 0
Responder
Posts
10/03/2003
Aroldo Zanela
Segue um exemplo:
var nHandle: Integer; nTamanho: Integer; begin nHandle := FileOpen(OpenDialog1.FileName,fmShareDenyNone); nTamanho := FileSeek(nHandle,0,2); ShowMessage(IntToStr(nTamanho)); end;
Responder
Clique aqui para fazer login e interagir na Comunidade :)