밑에 소스를 사용하여 3만에서 4만 라인을 입력하려고 하는데
프로그램이 죽네요. 한라인 문자수는 100자 정도고 컬럼 수는
15컴럼정도입니다.
3만라인 이상 최대 몇라인까지 입력할 수 있는지 가르쳐주세요.
while Not Eof(TmpFile) Do
Begin
Readln(TmpFile, Buf);
K := 1;
for i := 1 to Length(buf) do
begin
if (Buf[i] = '|') then // -> '|' 는 임의의 구분자입니다.
K := K + 1
else
LinGrd.Cells[k,j] := LinGrd.Cells[k,j] + Buf[i];
end;
Inc(j);
End;
finally
Perform( WM_SETREDRAW, 1, 0 );
Invalidate;
end;