Bonjour,
Je ne sais pas si mon titre correspond à mon problème je m’en escuse d’avance.
Voila, j’ai une combobox dans laquelle je fait un test sur la valeur selectionné et eventuellement j’affiche une deuxieme Combobox.
Mon problème c’est que lorsque je clique sur la fleche de la deuxieme Combobox, la premiere perd la valeur selectionnée (en gros j’ai du blanc de selectionné, le premier champs quoi).
Par contre cela ne le fait que la premiere fois (c’est à dire que si je reselectionne dans la premiere cette fois si cela ne bouge plus lorsque je retourne sur la seconde).
J’espère que c’est compréhensible.
Voici le code du seul evenement attaché à la deuxieme liste:
procedure TFprincipal.ComboBox27Change(Sender: TObject);
var pos_iduser, id_user : integer;
begin
If (ComboBox27.Text <> '') Then
Begin
pos_iduser:=(length(Combobox27.text)-pos('|',ComboBox27.Text));
id_user:=strtoint(AnsiRightStr(ComboBox27.Text,pos_iduser));
With ADOQuery6 do
Begin
Close;
SQL.Clear;
SQL.Add('Select role.idrole, dbuser.idrole, libellerole FROM dbuser, role WHERE iduser='+InttoStr(id_user)+' AND dbuser.idrole=role.idrole');
Open;
Label108.Caption:='Rôle actuel : '+FieldValues['libellerole']+'.';
Label108.Visible:=True;
end;
end;
end;
Tout en sachant que cela se produit quand je clique qq part sur la liste mais ce n’est pas un Onchange apparemment.
En gros je suis dans le brouillard :neutre:
