30-07-2014, 03:39 PM
السلام عليكم
جرب هذا الكود
جرب هذا الكود
PHP كود :
procedure TForm1.Button1Click(Sender: TObject);
var
Stream: TMemoryStream;
begin
Stream := TMemoryStream.Create;
try
RichEdit1.Lines.SaveToStream(Stream);
Stream.Seek(0, soFromBeginning);
Tableau.YourBlobField.LoadFromStream(Stream);
finally
Stream.Free;
end;
end;
و لرب نازلة يضيق لها الفتى ذرعا و عند الله منها المخرج
ضاقت فلما استحكمت حلقاتها فرجت و كنت اضنها لا تفرج
ضاقت فلما استحكمت حلقاتها فرجت و كنت اضنها لا تفرج

