各位大大: 我是會員560927 最近在作一個專案,打算將一個含圖檔(JPG)欄位的 MS SQL 檔複製到 PARADOX 的檔案中,可是複製到 PARADOX 後圖檔欄位長度會被截掉,不知原因為何?(頭痛,急!!) 例: TABLE1(MS SQL 檔) TABLE2(PARADOX 檔) TABLE1.ACTIVE:=TRUE; TABLE2.ACTIVE:=TRUE; TABLE1.FIRST; WHILE NOT (TABLE1.EOF) DO BEGIN TABLE2.APPEND; TABLE2IMG.VALUE:=TABLE1IMG.VALUE; TABLE2.POST; TABLE1.NEXT; END; 以上是我用的方式,圖檔欄位有複製但長度被截掉,不知原因為何? 謝謝!!

試試如下的做法行不行？

var
  ms: TMemoryStream;
begin
  TABLE1.ACTIVE:=TRUE;
  TABLE2.ACTIVE:=TRUE;      ms := TMemoryStream.Create;
  try
    TABLE1.FIRST;
    WHILE NOT (TABLE1.EOF) DO BEGIN
      TABLE2.APPEND;
      TBlobField(TABLE1IMG).SaveToStream(ms);
      ms.Position := 0;
      TBlobField(TABLE2IMG).LoadFromStream(ms);
      TABLE2.POST;
      ms.Clear;          TABLE1.NEXT;
    END;
  finally
    ms.Free;
  end;
end;

-- hagar.