안녕하세요.

궁금한 점이 있어 질문 올립니다.

//리스트박스 초기화
Lb.Items.Clear;
AssignFile(F, 'c:time.dat');  //time.dat 파일 열기
Reset(F);

if IOResult <> 0 then
begin
   showmessage('Error여...');
   Exit;
end;

strTemp := '';
nCount := 0;
name := '';

while not EOF(F) do
begin
   Read(F, bt);
   strTemp := strTemp + Format('%.2X ', [bt]);  
   Inc(nCount);  //40 될때까정..증가시킨다.

   //40 Byte씩 끊는다.
   //40 바이트가 되면 카운트를 초기화한다.
   //40바이트까지의 값을 리스트박스에 디스플레이해준다.
   //임시스트링변수값을 초기화해준다.

   if (nCount = 40) then
   begin
     lb.Items.Add(strTemp);
     nCount := 0;
     strTemp := '';
   end;
end;


파일안의 데이터는 40바이트짜리 로 구성된 패킷이 여러개 나열되어 있는 형식입니다.
위 패킷에는 데이터정보가 담겨져 있어요.
12바이트 / 4바이트 /12바이트 / 12바이트 = 40 바이트

파일을 읽은 후 각 패킷의 위 각각의 정보를 읽어와서 리스트박스에 순차적으로 뿌려주고 싶은데..
좀 애매해서요..

고수님의 조언 부탁드립니다.