Discussion :

[pierrot67]

Bonjour

est-il possible de selectionner avec les radiobuttons le champ de recherche actif

ex :
RadioButton1.checked------>edit1.text (recherche nom)
RadioButton2.checked------>edit1.text (recherche par n° Clients)

[Merlin]

c'est pas clair... précise un peu

[pierrot67]

j'ai un champ de recherche ou je voudrai pouvoir trouver ou le n° de client ou le nom de la societe.

[deneche]

C'est sur que c'est possible.
Le contenu du composant Edit constitue la cle de recherche, et il suffit de tester l'etat du radiobutton pour faire le choix entre une requete sur le nom ou une requete sur le n° du client.Donc a priori tu dois disposer de deux requetes que tu utilise suivant 2 conditions.

[edam]

j'ai un champ de recherche ou je voudrai pouvoir trouver ou le n° de client ou le nom de la societe.

utlisé directement l'evenement onchange avec locate, bien sur on testant le rediobutton active
il y a un composant qui fait sa (dans la jvcl je supose)
je supose que le code de client est de type string
et la recherche vu dans une dbgrid

Code :

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

1
2
3
4
5
6
7
8
9
10
 
procedure TForm1.edit1change;
begin
       if edit1.text<>'' then
       with table do
       case radio.itemindex of
          0:locate('codclient',trim(edit1.text),[]);
          1:locate('client',trim(edit1.text),[]);
       end;  
end;

si vous avez donnée au rediobutton les meme nom du champ

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
 
procedure TForm1.edit1change;
var 
       i:integer;
       s:string;
begin
       if edit1.text<>'' then
        with table do
          begin
              i:=radio.itemindex;
              s:=radio.items[i]; // à corrigé
              locate(s,trim(edit1.text),[]);
          end;   
end;

avec ce dérnier méthode tu peut même fait la recherche sur tt les champ
si tu veux pas locate (qui plus rapide, et de DBgrid)
alors ce dérnier méthode facilitra ta tache avec SQL surtout si les tt les champs sont de type text