Discussion :

[jengo]

Bonjour,

J'ai un souci bizarre.
J'ai une table Agent sous SQL serveur qui contient 3 champs : login, password et fonction

je veux voir l'existance des 3 champs avec un TTable:
CODE de l'aide de delphi :
Info := 'Les champs de la table ' + Table1.TableName +
' sont:'#13#10#13#10;
for i := 0 to Table1.FieldCount - 1 do
Info := Info + Table1.Fields[i].FieldName + #13#10;
ShowMessage(Info);

Et le message m'indique qu'il n'y a pas de champs !!!! Est ce que le type des données de champs ne sont pas bon ?


par contre la requete suivante marche tres bien :
Query1.SQL.Add('SELECT * FROM Agent2');
Query1.SQL.Add('WHERE login=:Login and Password=assword');
Query1.ParamByName('Login').AsString := EdtLogin.text;
Query1.ParamByName('Password').AsString := EdtPass.text;

Cela signifie qd meme que mes champs existe !!!
J'espère avoir ete clair.
Merci de m'aider

[Francis]

Il faut faire un TAble.Open avant de lancer la boucle.