안녕하십니까..!
좀전에도 글을 올린 델 초보입니다..!!
다름이 아니오라..Q/A 를 조회하다..제가 궁금한 것과 비슷한 내용이 있어서..
그걸 보고 따라해보았습니다..!!
근데..에러가 나서..소스첨부해서 글을 올립니다...
참고로 제가 사용하는 델파이는 버젼 6 이구요..!!
델 6에선 ReadIn 이란 함수가 없나요..!!
아래 소스중에 ReadIn 이란 것을 썼은데 컴파일 하다 보면 거기서 에러가...ㅠ.ㅠ
procedure TForm1.Button1Click(Sender: TObject);
var
f : TextFile;
s : String;
begin
if OpenDialog1.Execute then
begin
AssignFile(f, OpenDialog1.FileName);
Reset(f);
while not eof(f) do
begin
readIn(f,s);
|---------------------------------> 바로 이부분입니다. ReadIn 이란 함수
with Table1 do
begin
Append;
FieldByName('').AsString := Copy(s,1,1);
FieldByName('').AsString := Copy(s,3,10);
FieldByName('').AsString := Copy(s,13,6);
Post;
end;
end;
end;
end;
부탁드리겠습니다...!!