Discussion :

[aimer_Delphi]

Bonjour a tous,
SVP y a t il un moyen d'ajouter tous les champs d'une Table par programmation, comme on le fait par conception.
(j'utilise Delphi 7)

[aimer_Delphi]

Bonjour,
Pas d'idées ....

[SergioMaster]

Bonjour,
Pas d'idées ....

au moins 2 mais j'ai pas le courage de les formuler car cela dépend du set de composants utilisés et de la SGBD quand comprendrez-vous qu'il faut toutes les informations pour que quelqu'un puisse répondre (de mémoire c'est les IBXXXXX et Firebird) mais un lecteur n'ayant pas suivi ou ma mauvaise mémoire et on répond à coté de la plaque

[aimer_Delphi]

Bonjour,
Merci Sergio pour la réponse ,
j'utilise les composants IBX avec Delphi 7 + Interbase 7.5 server.

[anapurna]

salut

tu veut peut être faire un truc dans ce genre ?

[SergioMaster]

première solution en utilisant les tables système

Code SQL :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
select rdb$field_name from rdb$relation_fields
where rdb$relation_name='NOMTABLE';

ceci vient de Firebird mais je pense que cela s'applique aussi à INterbase

deuxième solution utiliser TIBExtract

[ShaiLeTroll]

SVP y a t il un moyen d'ajouter tous les champs d'une Table par programmation, comme on le fait par conception.

En fait, c'est inutile une fois en RunTime
L'IDE crée surtout les champs persistants que l'on peut utiliser par la suite dans le code
Personnellement, je ne les utilise jamais, je préfère FieldByName ou une encapsulation dans un objet Entity de mon cru.

Si l'on ne renseigne AUCUN champ persistant, le DataSet va créer les champs automatiquement à partir de la structure de la table ou selon les colonnes d'un SELECT
Tu pourras y accéder via FieldByName au lieu d'utiliser le champ persistant
Si tu veux définir une série de champ fixe mais qu'il peut y en avoir plus regarde si DataSet publie la propriété FieldOptions TFieldsAutoCreationMode / acCombineComputed