delphi

Question

jais un problème , j'ais relier un combobox avec une table qui contient 3 champ code,nom,prenom de ma base de donnée et je veut quand je choisi un code dans le combo il m'affiche le nom et le prenom de ce code dans des edit 
merci .

pierrotk10d · Answer

Bonjour,
Je ne sais pas trop ce que tu veux faire mais voici une solution qui marche
En supposant que le ComboBox1 a été rempli par les codes de la table (avec une boucle while not eof) et en supposant que le champs Code est le premier dans la liste des champs [0]
procedure TForm1.ComboBox1Click(Sender: TObject);
begin
  With Table1 do begin
    Setkey;   // Recherche sur le champs Code
    Fields[0].AsString := ComboBox1.Items[ComboBox1.ItemIndex];
    If not GotoKey then
       {* Il sera difficile de ne pas trouver le code car ils ont été chargé avec les codes de la table   *}
      ShowMessage('Code inconnu')
       {* En remplacant les TEdit par des TDBEdit il n'y a pas besoin d'écrire
          les 3 lignes de la condition Else   *}
      // else begin
        //Edit1.Text := Table1.Fieldvalues['Nom'];
        //Edit2.Text := Table1.FieldValues['Prenom'];
      //end;
  end;
end;

Amicalement


pierrot

cs_abdeldjabar · Answer

j'ai installé le delphi 2010 svp comment crier la tables.

pierrotk10d · Answer

Bonjour, 
Faire crier la table ça c'est dur.
Je ne connait pas Delphi 2010 mais je pense qu'on peut ordonner une table (quel est ton type de table?) suivant un ou plusieurs champs de la table à l'aide d'un ou plusieurs index.
Table1.IndexName := 'Toto'; 

pierrot

Delphi

3 réponses

Votre réponse

Discussions similaires