Data.DB.TBlobField.Assign
Delphi
procedure Assign(Source: TPersistent); override;
C++
virtual void __fastcall Assign(System::Classes::TPersistent* Source);
Propriétés
| Type | Visibilité | Source | Unité | Parent |
|---|---|---|---|---|
procedure function |
public | Data.DB.pas Data.DB.hpp |
Data.DB | TBlobField |
Description
Copie une valeur dans le champ BLOB.
La méthode Assign permet de copier des données dans le champ BLOB. Assign peut copier dans la propriété Value d'un champ BLOB :
Un autre champ BLOB
Un objet TStrings
Un objet TBitmap ou TPicture, si BlobType a la valeur ftGraphic ou ftTypedBinary
Tout objet gérant TBlobField dans sa méthode AssignTo.
Dans l'exemple ci-dessous, la méthode Assign est utilisée pour copier le bitmap d'un composant TImage dans un champ BLOB par l'intermédiaire de son objet champ TBlobField :
if not (ClientDataSet1.State in [dsInsert, dsEdit]) then
ClientDataSet1.Insert;
ClientDataSet1Images.Assign(Image1.Picture);
ClientDataSet1.Post;
if ((ClientDataSet1->State != dsInsert) &&
(ClientDataSet1->State != dsEdit))
ClientDataSet1->Insert();
ClientDataSet1Images->Assign(Image1->Picture);
ClientDataSet1->Post();