Order and save right now!
20% off with the 729824315 dicscount code for Ultimate Pack and any another product for Delphi from Greatis Programming! |
⤷ Store rich text in database
For reading and writing data you can use BLOB stream feature of TTable:
procedure TForm1.Button2Click(Sender: TObject);
var
Stream1: TStream;
begin
Table1.Edit;
Stream1:=Table1.CreateBlobStream(Table1.FieldByName('RTF'),bmReadWrite);
RichEdit1.Lines.SaveToStream(Stream1);
Table1.Post;
RichEdit1.Clear;
end;
-
More for developers