probiert habe ich es
Delphi-Quellcode:
procedure TForm1.RvCustomConnection4Open(Connection: TRvCustomConnection);
begin
Connection.DataRows:=1;
end;
procedure TForm1.RvCustomConnection4GetCols(Connection: TRvCustomConnection);
begin
Connection.WriteField('Graphic', dtgraphic, 30, '','');
end;
procedure TForm1.RvCustomConnection4GetRow(Connection: TRvCustomConnection);
Var Memstream:Tmemorystream;
begin
with Connection do
begin
MemStream := TMemoryStream.Create;
try
//image enthält eine Bitmap, kein jpeg!
Image1.Picture.Bitmap.SaveToStream(memstream);
Connection.WriteBlobData(MemStream.Memory^, MemStream.Size);
finally
MemStream.Free;
end;
end;
end;
in rave eine neues Dataview einstellen und aus dem Reiter "standard" eine "Bitmap-component" auf die Seite. dort das entsprechende Dataview und datafiled einstellen.
oder du guggst mal hier:
http://www.delphipraxis.net/internal...787&highlight=
Mfg Frank