Data.Win.ADODB.TParameter.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.Win.ADODB.pas Data.Win.ADODB.hpp |
Data.Win.ADODB | TParameter |
Description
Copie les propriétés et la valeur d'un objet TParameter dans un autre.
Appelez Assign pour rendre un TParameter exactement identique à un autre. Assign copie les valeurs des propriétés Attributes, DataType, Direction, Name, NumericScale, Precision, Size et Value de l'objet paramètre spécifié par Source dans l'objet paramètre appelant.
ADOStoredProc1.Parameters[0].Assign(ADOStoredProc2.Parameters.Items[0]);
ADOStoredProc1->Parameters[0]->Assign(ADOStoredProc2->Parameters.Items[0]);
Assign peut être utilisé avec une variété de types de source : un autre TParameter, un champ d'une table, un objet liste de chaînes (le plus souvent pour un paramètre de type mémo), ou un TBitmap (pour les champs de type BLOB), un TPicture (pour les champs de type BLOB). Dans l'exemple ci-dessous, Assign est utilisé pour donner une valeur pour un paramètre de type mémo d'un objet liste de chaînes (la propriété Lines d'un TMemo).
ADOStoredProc1.Parameters[1].Assign(Memo1.Lines);
ADOStoredProc1->Parameters[1]->Assign(Memo1->Lines);