(Moderator)
Registriert seit: 6. Mai 2005
Ort: Berlin
4.956 Beiträge
Delphi 2007 Enterprise
|
Re: TcxGrid, Grafiken einbinden
28. Jun 2009, 22:26
Delphi-Quellcode:
Function BitmapToString (aBitmap : TBitmap) : String;
Var
stringStream : TStringStream;
Begin
stringStream := TStringStream.Create('');
Try
aBitmap.SaveToStream (stringStream);
Result := stringStream.DataString;
Finally
stringStream.Free
End
End;
....
MyView.DataController.Values[SomeRecord, MyViewGraphicsColumn.Index] := BitmapToString(SomeBitmap);
"Wenn ist das Nunstruck git und Slotermeyer? Ja! Beiherhund das Oder die Flipperwaldt gersput!"
(Monty Python "Joke Warefare")
|