FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
#1
|
|||
|
|||
Error en Sizeof ayuda. 460
var dato: textfile;
res: integer; procedure...... begin assignfile(dato, 'c:\pro.txt'); reset(dato); res:= SizeOf(dato); label1.caption:= inttostr(res); end; Pues lea lo que lea en assign, el tamaño que la funcion (SizeOf)me devuelve siempre es 460. Alguien me puede hechar una mano? Gracias de antemano. |
|
|
|