Discussion :

[Hokage]

Bonjour,
Je voudrais faire un petit programme qui recherche un élément dans une basse ACCESS:

J'utilise Borland Developper Studio 2006.

champs : ID/Name/Addresse

je voudrais faire une recherche:

if(InfoID = ID)
{
InfoName= Name;
InfoAddresse=Adresse;
}

Le problème est que je ne connais rien au composant et au base de donnée, je cherche de l'aide pour m'expliquer les différentes étapes pour ariver a faire cette petite recherche.
Merci a l'avance de vos réponses.

[martin45]

Bonjour,

As-tu déja ajouté à ton appli des composants pour voir tes données et les modifier (TTable, TDataSource, TDbGrid - par exemple)

Ce n'est peut-être pas ce que tu cherche à faire au final, mais tu y verras plus clair en commençant par là.

Ensuite, les recherches simples se feront par TaTable.FindKey([[InfoId]) qui te positionnera sur le bon enregistrement de la table. Il y a plein d'autres possibilités. Tu pourras récupérer les valeurs par code avec
InfoName := TaTableInfoName.Value ; ou InfoName := TaTable.FieldByName('Name').Value ;

En espérant t'aider,
Martinus

[Hokage]

En fait il fallait juste que je rajoute le composant TTABLE et que je le parametre. Au niveau du code cela donne :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
 
procedure TForm1.SearchTextClick(Sender: TObject);
var
  name : string;
  adresse : string;
 
begin
    name := 'NAME';
    adresse := 'ADDRESSE';
 
    if(Table1.FindKey([Edit1.Text])) then
       begin
          Edit1.Text := 'Trouvé';
          Edit2.Text := Table1.FieldByName(name).Value;
          Edit3.Text := Table1.FieldByName(adresse).Value;
       end
    else
          Edit1.Text := 'Pas trouvé';
 
end;

Merci de ta réponse .