求翻译vb语言到delphi语言

Question

本帖最后由 lvyijiang 于 2010-11-06 21:53:21 编辑

Answer 1

rs.addnew
rs(''temp'').appendchunk stemp
chunk stemp
rs("id") = (id.text)
rs.update
=====================
appendchunk 用于追加MEMO字段或二进制字段对应DELPHI应该是
  with ADOQuery1 do
  begin
   Append ;
   TBlobField(FieldByName('temp')).LoadFromStream(stemp);
   FieldByName('id').AsString :=id.text;
   Post;
  end;

Answer 2

也就是delphi中的TBlobField、loadfromstream...

Answer 3

问题是stemp是个string的变量，不是一个流变量啊，怎么办？