各位高手,我用database desktop定义了一个表格,里面有属性为graphics和memo的字段,请问在表格生成后如何往graphics里加图片啊?如何往memo字段加备注呢?
请高手们不吝赐教,谢谢。

解决方案 »

  1.   

    var MS: TMemoryStream; J1: TJPEGImage;
    begin
         MS := TMemoryStream.Create;    
         J1 := TJPEGImage.Create;  with table1 do
        begin
           Append;
           J1.Assign(Image1.Picture);
           J1.SaveToStream(MS);
           table1md_bmp.LoadFromStream(MS);
           table1md_memo.asstring:=memo1.lines.text;
           Post;
         end;
         MS.Free;
         J1.Free;
    end;