jerry 께서 말씀하시기를...

> 순위파일이나 성적 파일을 TXT로 받아서 DB에 자동적으로 저장되게하려고 합니다.

> 지금까지 생각해낸 방법은 단지 열 단위로 받는 것인데.... 그것조차 어떻게 해야할지 잘 몰라서 이렇게 글을 뛰웁니다.



일단은 라인 단위로 저장할려면 일련번호를 키로 주어져야 합니다.

Txt화일을 RichEdit로 불러들여서 아래와 같이 저장하는 방법이 있습니다.

물론 더 좋은 방법도 있겠지만서도...



// RichEdit의 내용을 DB에 저장하기.

with fDM1.QInsert do

begin

fDm1.Database1.StartTransaction;

for S := 0 to (RichEdit1.Lines.Count - 1) do

begin

Close;

ParamByName('task_no').AsInteger := S;

ParamByName('rmk').AsString := RichEdit1.Lines[S];

execsql;

end;



try

fDm1.Database1.Commit;

StatusBar1.Panels[1].Text := '저장되었습니다.';



except

fDm1.Database1.Rollback;

end;

end;