Data.DB.TSmallintField.Create

De RAD Studio API Documentation
Aller à : navigation, rechercher

Delphi

constructor Create(AOwner: TComponent); override;

C++

__fastcall virtual TSmallintField(System::Classes::TComponent* AOwner);

Propriétés

Type Visibilité  Source Unité  Parent
constructor public
Data.DB.pas
Data.DB.hpp
Data.DB TSmallintField

Description

Create crée une instance de l'objet TSmallintField.

La plupart des applications ne créent pas explicitement des instances de TSmallintField. Au lieu de cela, les composants champ sont créés automatiquement, comme des composants champ persistants définis dans l'éditeur de champs à la conception, ou comme des composants champ dynamiques créés automatiquement par l'ensemble de données.

Create définit la propriété DataType à ftSmallInt, MinValue à -32768 et MaxValue à 32767. Le paramètre AOwner spécifie le composant, généralement un ensemble de données, qui devient le nouveau propriétaire du champ. Le propriétaire est responsable de la libération du composant.

Dans le cas rare où vous devez créer un composant champ persistant à l'exécution, appelez Create pour créer et initialiser une instance de TSmallintField. Après avoir instancié un TSmallintField, associez-le à un champ spécifique en affectant le nom du champ à sa propriété FieldName. Attribuez à l'instance de TSmallintField un identificateur unique dans la propriété Name. Indiquez où le champ apparaît dans la collection des champs en affectant une valeur ordinale à la propriété Index. Associez l'objet TSmallintField à un composant ensemble de données en définissant sa propriété DataSet.

L'exemple suivant crée un objet TSmallintField pour le champ nommé Children accédé via un objet TSQLDataSet nommé SQLDataSet1.



var
T: TSmallintField;
begin
SQLDataSet1.Close;
T := TSmallintField.Create(SQLDataSet1);
T.FieldName := 'Children';
T.Name := SQLDataSet1.Name + T.FieldName;
T.Index := SQLDataSet1.FieldCount;
T.DataSet := SQLDataSet1;
SQLDataSet1.FieldDefs.UpDate;
SQLDataSet1.Open;
end;



SQLDataSet1->Close();
TSmallintField *T = new TSmallintField(SQLDataSet1);
T->FieldName = "Children";
T->Name = SQLDataSet1->Name + T->FieldName;
T->Index = SQLDataSet1->FieldCount;
T->DataSet = SQLDataSet1;
SQLDataSet1->FieldDefs->UpDate();
SQLDataSet1->Open();



Voir aussi