access의 테이블에서 memo type의 필드를 intebase로 옮길려고 합니다...
이렇게 코딩해봤는데 에러가 나네요 잘 못된부분이 있는지 지도 부탁드립니다...
에러 메세지는 tmemo와 string이 타입이 맞지 않는다는군요 어떻게 해야할지;;;
<!--CodeS-->
var memo1:Tmemo;
begin
try
query2.open;
while not query2.Eof do
begin
memo1:=Tmemo.Create(self);
query3.SQL.Clear;
query3.SQL.Text := 'insert into tb_memo(memo1)' +
'values(:memof)' ;
memo1:=query2.FieldByName('메모').Text;
query3.ParamByName('memof').text:=memo1;
query3.ExecSQL;
query2.Next;
end;
finally
memo1.Free;
<!--CodeE-->