Raffraichir ma DBLookupComboBox

**meda2000** · 23/03/2006, 00h42

salut, j espere que vous pourrez m aider
j utilise un DBLookupComboBox pour l instant tout va bien j ai connecte la table et datasource
tout marche a merveille j ai les information attendu...

j ai creer ensuite un bouton supprimer un enregistrement et la encore tout marche

mais le probleme c est que ds le DBLookupComboBox y a encore l enregistrement affiche (meme si ca ete supprimer)
il faut que je me place sur un autre enregistrement pour ne plus le voir ds la liste

si quelqu un peut m aider ca serait gentille

**Sunchaser** · 23/03/2006, 00h56

Bonsoir,

As tu essayé qqchose comme :

Code :

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

1
2
 
DBLookupComboBox->Refresh();

ou agir sur le composant TDataSource qui doit (normalement si je me trompe pas) alimenter le DBLookupComboBox :

Code :

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

1
2
 
DataSource->Dataset->Refresh();

En espérant t'aider,
@ +

**meda2000** · 23/03/2006, 01h04

oui jai essaye mais non ca ne marche pas c est bizarre

merci qd meme

Ds l aide j ai trouve ca mais c est bizare (c est plutot pour du delphi):

mettre un valeur par défaut dans un DBLookUpComboBox

Pour cela il faut fixer la valeur du champ de la table juste après l'insertion d'un nouvel enregistrement. Ceci en positionnant la table de référence ( liste de valeur de la DBLookUpComboBox ) sur l'enregistrement voulu.

Code :

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

1
2
3
4
5
6
7
8
9
 
procedure TForm1.Table1NewRecord(DataSet: TDataSet);
begin
  With DBLookUpComboBox1 Do
  Begin
    ListSource.DataSet.First ;
    Field.Value := ListSource.DataSet.FieldByName(KeyField).Value;
  End;
end;

si on peut transforme en c++?

**Kerod** · 23/03/2006, 02h59

As tu bien spécifier le datafield du dblookup et etc...
Sinon tu pourrais utiliser une fonction qui remette à jour la liste...

Par exemple moi j'ai utilisé une ListBox avec l'id et le nom que je voulais qui s'affiche et quand je supprime je retire le nom de la list sans refaire tout le code et suppression dans la bdd aussi...C'est une solution...

Bon voilà ce que je te conseille, rajoute un élément navigate supprime avec et si ca se réactualise avec donc c'est bon dans le cas contraire ca veut dire qu'il y a un bleme...

Question as tu mis readonly ) true ???

**meda2000** · 23/03/2006, 15h39

salut
en fait avec datafield et datasource ca marche pas , il faut utiliser listfield et listsource

pour readonly ok mais n y a t'il pas moyen d afficher quelque chose par default car qd je le fait il y a rien qui s affiche et c est un casse tete si tu sois le supprimer

**Kerod** · 23/03/2006, 19h15

JE viens de tester et ca marche correctement...Da dépend du mode de suppression. Si tu supprimes en sql alors il faudrait faire un refresh de la list et non de la table (enfin je pense). Si tu le fais directement grace à delete ca devrait le faire

**meda2000** · 23/03/2006, 21h32

salut qu est ce qui marche la datafield ???

si ca marche pourrais tu me montrer ton bout de code s il te plait ca m aiderai bien merci

**Kerod** · 24/03/2006, 02h12

non la suppression à partir d'un DBListLook...

**meda2000** · 24/03/2006, 02h36

oui ds un DBListLook ca fonctionne mais j ai envie d avoir une liste deroulante et jque je puisse selectionne un elemen-t de ma liste et n ai trouve que un vDBLookUpComboBox pour faire ca

et merci pour ton aide

**Kerod** · 24/03/2006, 02h57

J'ai une nouvelle solution lol :

Code :

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

DBLookupComboBox1->Text = la valeur de ton champ à partir de Table

A effectuer soit dans l'évenement Ondelete du Table soit juste après ton instruction delete, au choix

PS : Pourquoi ce code?! Très simple lors d'une suppression avec Table->Delete le table se place automatiquement sur le prochain enregsitrement dans il reste plus qu'à utiliser le FieldName et le mettre dans DBLookupComboBox1->Text

**meda2000** · 27/03/2006, 01h40

sorry de t ennuier encore (ou vous s'ennuiez), j ai essaye de rentre des valeur ds DBLookupComboBox1->Text = ; mais je n y arrive pas (manque d experience)

comment faire c ette manip "la valeur de ton champ à partir de Table"???

DBLookupComboBox1->Text =la valeur de ton champ à partir de Table;

**Kerod** · 27/03/2006, 04h42

Comme je le disais si tu utilises le composant Table pour faire la suppression et non une requete SQL lors du delete le curseur se positionne instantanément sur l'enregistrement suivant (si pas dernier) ou sur le précédent (si dernier) donc on peut largement se baser sur ce fait pour effectuer ceci :

Code :

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

DBLookupComboBox1->Text = Table->FieldByName("Nom")->AsString;

Nom est là à titre d'exemple

**meda2000** · 27/03/2006, 06h02

qd je compile il me dit que DBLookupComboBox1::Text n est pas accessible

:

**Kerod** · 27/03/2006, 13h16

Oui effectivement je viens de regarder...Désolé...

Bon ben penses sérieusement à tout faire avec ComboBox et même à utiliser un Query

**meda2000** · 27/03/2006, 18h34

ben bon merci qd meme pour ton aide

**say** · 27/03/2006, 20h54

Alors, si j'ai bien compris..tu veux rafraichir ta liste.

Donc tu as la propriété ListSource...

Code :

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

DBLookupComboBox1->ListSource->DataSet->Refresh()

tch'o

**meda2000** · 28/03/2006, 00h05

j ai deja essayer mais qd la liste se ferme le mot supprime reste encore ds l edit j usqu au moment ou je selectionne un autre mot

**meda2000** · 30/03/2006, 06h57

Comment mettre un valeur par défaut dans un DBLookUpComboBox ?

ca c est du delphi:

procedure TForm1.Table1NewRecord(DataSet: TDataSet);
begin
With DBLookUpComboBox1 Do
Begin
ListSource.DataSet.First ;
Field.Value := ListSource.DataSet.FieldByName(KeyField).Value;
End;
end;

mais en c++ builder comment on transcrit ce code?

**Kerod** · 30/03/2006, 09h34

J'en suis pas trop sur mais je serais partant pour dire qu'en C++ ce serait :

Code :

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

1
2
3
 
DBLookUpComboBox1->ListSource.DataSet.First ;
DBLookUpComboBox1->Field.Value = DBLookUpComboBox1->ListSource.DataSet.FieldByName(KeyField).Value;