TBatchMove 콤포넌트를 사용하세요..

복사할 원본에 맞춰서 대상 Table을 생성할 수도 있습니다..

(Mode라는 프로퍼티를 batCopy로 해주시면 됩니다)

또는 Table.CreateTable이라는 메소드를 이용해서..

직접 Table을 만드시고..

(Help에 샘플 코딩이 있을 겁니다)

아래처럼 복사하셔도 됩니다..

물론 속도는 무척 느릴 것 입니다..





From 류..



---------



procedure TForm1.Button1Click(Sender: TObject);

Var

Loop : Integer;

stFieldName : String;

begin

While not Table1.EOF do

Begin

Table2.Append;

For Loop:= 0 to Table1.FieldCount-1 do

Begin

stFieldName:= Table1.Fields[Loop].FieldName;

Table2[stFieldName]:= Table1[stFieldName];

End;

Table2.Post;

Table1.Next;

End;

end;





모승열 wrote:

> dbf파일을 인터베이스로 변환하고 싶은데요...

> 데이타덤프로 말고 코딩하는 방법을 알고 싶습니다.

> 고수님들의 도움의 손길이 필요합니다..

> 부탁드려요.

>