Data.DB.TBlobField.LoadFromStream
Delphi
procedure LoadFromStream(Stream: TStream);
C++
void __fastcall LoadFromStream(System::Classes::TStream* Stream);
Propriétés
| Type | Visibilité | Source | Unité | Parent |
|---|---|---|---|---|
procedure function |
public | Data.DB.pas Data.DB.hpp |
Data.DB | TBlobField |
Description
Charge dans le champ les données BLOB à partir d'un flux.
Utilisez LoadFromStream pour copier le contenu d'un flux dans le champ BLOB. Spécifiez le flux à partir duquel la valeur du champ est copiée en tant que valeur du paramètre Stream.
Remarque : Le paramètre Stream n'est généralement pas un flux BLOB. Les flux BLOB (renvoyés par la méthode CreateBlobStream de l'ensemble de données) fournissent un mécanisme entièrement distinct pour la mise en flux des données dans un champ BLOB.
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();