Pb IBQuery (debutant)

Bonjour à tous,
Je viens de passer à InterBase et je rencontre un premier pb.
J'ai une table Clients et je voudrais faire une recherhce pour recuperer des infos de ce client.
Voici mon code qui ne marche pas :

AnsiString Client,NomClient;
Client = ComboBox1->Text;

Code:

---

1 2 3 4 5

IBQuery1->SQL->Clear(); IBQuery1->SQL->Add("SELECT NOM_CLIENT FROM CLIENTS WHERE NOM_CLIENT = Client ");   NomClient = IBTable1->FieldByName("NOM_CLIENT")->AsString;

---

Si quelqu'unpeut m'aider
Merci

Code:

---

1 2 3 4 5 6 7 8

AnsiString Client,NomClient; Client = ComboBox1->Text;   IBQuery1->SQL->Clear(); IBQuery1->SQL->Add((String)"SELECT NOM_CLIENT FROM CLIENTS WHERE NOM_CLIENT ='" + Client + "'");   NomClient = IBTable1->FieldByName("NOM_CLIENT")->AsString;

---

Comme cela ça devrait marcher

Steve

Je n'arrive pas a afficher mon client : j'ai rien dans mon ShowMessage !!!

AnsiString Client,NomClient;

Code:

---

1 2 3 4 5 6

Client = ComboBox1->Text;   IBQuery1->SQL->Clear(); IBQuery1->SQL->Add((String)"SELECT NOM_CLIENT FROM CLIENTS WHERE NOM_CLIENT = '" + Client + "'"); NomClient = IBTable1->FieldByName("NOM_CLIENT")->AsString; ShowMessage(NomClient);

---

Code:

---

1 2 3 4 5 6 7 8

AnsiString Client,NomClient; Client = ComboBox1->Text;   IBQuery1->SQL->Clear(); IBQuery1->SQL->Add((String)"SELECT NOM_CLIENT FROM CLIENTS WHERE NOM_CLIENT ='" + Client + "'");   NomClient = IBQuery1->FieldByName("NOM_CLIENT")->AsString;

---

Autant pour moi je n'avais pas vu

Steve

J'ai une erreur sur cette ligne

Code:

---

NomClient = IBQuery1->FieldByName("NOM_CLIENT")->AsString;

---

il le dit que le champ NOM_CLIENT n'existe pas

alors que la ligne precedente

Code:

---

IBQuery1->SQL->Add((String)"SELECT NOM_CLIENT FROM CLIENTS WHERE NOM_CLIENT = '" + Client + "'");

---

marche tres bien

Je ne comprend pas trop bien la logique....

Essayes de rajouter

Code:

---

1 2	IBQuery1->SQL->Open();

---

avant de faire

Code:

---

1 2	NomClient = IBQuery1->FieldByName("NOM_CLIENT")->AsString;

---

Ca marche avec IBQuery1->Open();
mais j'ai encore un petit probleme :
Tous mes clients marche sauf ceux du type : Caisse d'Epargne Appoigny
j'ai un message : EOF detecte dans une chaine

qu'est ce que ca veut dire ?

Je pnse que le problème vient de l'apostrophe!

As tu d'autres clients qui comportent un apostrophe?

Si c'est le cas il te faudra faire:

Code:

---

1 2 3 4 5 6 7 8 9

AnsiString Client,NomClient; Client = ComboBox1->Text;   IBQuery1->SQL->Clear(); IBQuery1->SQL->Add((String)"SELECT NOM_CLIENT FROM CLIENTS WHERE NOM_CLIENT =" + QuotedStr(Client)); IBQuery1->Open();   NomClient = IBTable1->FieldByName("NOM_CLIENT")->AsString;

---

CA MARCHE........
Merci beaucoup