Ver Mensaje Individual
  #4  
Antiguo 05-03-2008
byfali byfali is offline
Miembro
 
Registrado: mar 2007
Posts: 24
Reputación: 0
byfali Va por buen camino
Gracias por tu respuesta Nick

Lo que intento es llenar el ListView con los bytes de un archivo y este metodo es el mas rapido cuando el archivo es muy grande.
El problema es lo que he comentado antes, me muestra los bytes de dos en dos.
Ejemplo:

BYTES (BIEN) BYTES (EN LISTVIEW)
------------- ---------------------
125 125
200 254
254 14
95 100
14
36
100

La muestra de codigo anterior era para simplificar. Adjunto parte de lo que tengo hecho.

procedure TForm16.ListView1Data(Sender: TObject; Item: TListItem);
var
byte:Integer;
begin

byte:= LeerByte;
Item.Caption:=IntToStr(byte);

end;

LeerByte es una funcion que lee los bytes del archivo.
Responder Con Cita