Data.DB.TBlobField.LoadFromStream
Delphi
procedure LoadFromStream(Stream: TStream);
C++
void __fastcall LoadFromStream(System::Classes::TStream* Stream);
Eigenschaften
Typ | Sichtbarkeit | Quelle | Unit | Übergeordnet |
---|---|---|---|---|
procedure function |
public | Data.DB.pas Data.DB.hpp |
Data.DB | TBlobField |
Beschreibung
Lädt einen BLOB-Daten aus einem Stream in das Feld.
Mit LoadFromStream wird der Inhalt eines Streams in ein BLOB-Feld kopiert. Geben Sie den Stream, aus dem der Feldwert kopiert werden soll, als Wert des Parameters Stream an.
Hinweis: Der Parameter Stream enthält normalerweise keinen BLOB-Stream. BLOB-Streams (die von der Methode CreateBlobStreamder Datenmenge geliefert werden) stellen einen vollkommen eigenständigen Mechanismus für das Streaming von Daten in ein BLOB-Feld bereit.
var
MS: TMemoryStream;
begin
if not (ClientDataSet1.State in [dsInsert, dsEdit]) then
ClientDataSet1.Insert;
MS := TMemoryStream.Create();
try
Image1.Picture.Bitmap.SaveToStream(MS);
ClientDataSet1Images.LoadFromStream(MS);
finally
MS.Free;
end;
ClientDataSet1.Post;
end;
if ((ClientDataSet1->State != dsInsert) &&
(ClientDataSet1->State != dsEdit))
ClientDataSet1->Insert();
TMemoryStream *pMS = new TMemoryStream;
try
{
Image1->Picture->Bitmap->SaveToStream(pMS);
ClientDataSet1Images->LoadFromStream(pMS);
}
__finally
{
delete pMS;
}
ClientDataSet1->Post();