delphi

Question

Salut
j'ai un edit d'un coté et une listebox de l'autre coté; la liste box contient des valeurs
j'aimerai bien quand je click sur mon edit("la couleur change") qu'il choisisse 
la premiere valeur de la liste box et ainsi de suite le deuxième edit pour la deuxième valeur de la listbox

Cordialement votre et merci

japee · Answer

Moi je ferais comme ça :

- Attribuer un nombre de 0 à X à la propriété Tag de chaque Edit
(par l'intermédiaire de l'Inspecteur d'objets).
- Relier tous les Edits à l'évènement OnClick (ici, Edit1Click).
- Ajouter ce code à l'évènement :

procedure TForm1.Edit1Click(Sender: TObject);
begin
  if ListBox1.Items.Count <> 0 then // ListBox vide !
  begin
    (Sender as TEdit).Text := ListBox1.Items[(Sender as TEdit).Tag];
  end;
end;


Bonne prog'  :-p

japee · Answer

Avec éventuellement une protection au cas où il y aurait moins d'Items que d'Edits, ça va de soi...

Un truc dans le genre

 if ListBox1.Items.Count -1 < Valeur maxi de Tag then ...

japee · Answer

Au fait, j'avais pas fait attention...

Sois plus explicite dans le titre de tes demandes !
Explication : si quelqu'un d'autre recherche le même renseignement que toi, il va reposer la même question, puisqu'il ne saura pas qu'une réponse a déjà été faite sur ce forum...

Non mais...  ;)

Delphi

3 réponses

Votre réponse

Discussions similaires