Discussion :

[ouiouioui]

Bonjour, tout est dans le titre, comment tester si un champs d'une table existe ? En récupérant la liste des champs mais comment, try except avec un select ?

Merci pour votre aide

edit: j'utilise les compos InterBase de D2007

[Rayek]

Quel composant utilises tu ?

Sinon souvent il y a des fonctions style GetFieldNames ou tu passes en paramètres une TStringList.

Puis suffit après de faire un test dans la TStringList avec IndexOf

Edit:

Avec interbase tu as la fonction cité ci dessus

Code :

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

1
2
3
4
5
6
7
 
With IboQuery do
begin
  GetFieldNames(Lst);
  if Lst.IndexOf('MonChamp') <> -1 then
    Showmessage('Il existe le champ');
end;

[Cl@udius]

j'utilise les compos InterBase de D2007

Le composant TIBDataBase possède la méthode GetFieldNames.

Code :

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

IBDataBase1.GetFieldNames('MA_TABLE', SL);

Ensuite comme proposé par Rayek, un IndexOf sur le StringList.

@+ Claudius.

[ouiouioui]

Merci à tous les deux, c'est parfait.

[yvesagha]

il faut peut être voir du coté de FindField !