IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

 Delphi Discussion :

Effacer la sélection d'un DBLookupCombobox


Sujet :

Delphi

  1. #1
    Membre habitué
    Profil pro
    Inscrit en
    Novembre 2004
    Messages
    483
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Novembre 2004
    Messages : 483
    Points : 128
    Points
    128
    Par défaut Effacer la sélection d'un DBLookupCombobox
    Salut tous ,voila mon petit probleme
    j'alimente mon DBLookupCombobox avec un query,pas de probleme tous fonctionne.
    Mais il y a un comportement que j'aimerai modifier
    si je sélectionne dans mon DBLookupCombobox un élément de ma liste ,et que ensuite pour une raison ou une autre je veuille plutôt une sélection vide c plus possible.
    J'ai fais une petite parade avec un champs vide dans la table,Mais je voudrais s'avoir si il y a une autre solution .Merci

  2. #2
    Rédacteur/Modérateur

    Avatar de SergioMaster
    Homme Profil pro
    Développeur informatique retraité
    Inscrit en
    Janvier 2007
    Messages
    15 031
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 67
    Localisation : France, Loire Atlantique (Pays de la Loire)

    Informations professionnelles :
    Activité : Développeur informatique retraité
    Secteur : Industrie

    Informations forums :
    Inscription : Janvier 2007
    Messages : 15 031
    Points : 40 930
    Points
    40 930
    Billets dans le blog
    62
    Par défaut
    la réponse doit être :
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    DbLookupComboBox.KeyValue:=null;
    un vieil exemple D3 , tout les évènements onkeydown des lookupcombobox don liés a cette procédure:

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    procedure TForm.SupprKey(Sender: TObject; var Key: Word;
      Shift: TShiftState);
    begin
     if (key = 46) OR (key=08) OR (key=110) then
        begin
        key := 0;
        (Sender as TDBLookupComboBox).KeyValue:=null;
        end;
    end;
    MVP Embarcadero
    Delphi installés : D3,D7,D2010,XE4,XE7,D10 (Rio, Sidney), D11 (Alexandria), D12 (Athènes)
    SGBD : Firebird 2.5, 3, SQLite
    générateurs États : FastReport, Rave, QuickReport
    OS : Window Vista, Windows 10, Windows 11, Ubuntu, Androïd

  3. #3
    Membre habitué
    Profil pro
    Inscrit en
    Novembre 2004
    Messages
    483
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Novembre 2004
    Messages : 483
    Points : 128
    Points
    128
    Par défaut
    Citation Envoyé par SergioMaster Voir le message
    la réponse doit être :
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    DbLookupComboBox.KeyValue:=null;
    un vieil exemple D3 , tout les évènements onkeydown des lookupcombobox don liés a cette procédure:

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    procedure TForm.SupprKey(Sender: TObject; var Key: Word;
      Shift: TShiftState);
    begin
     if (key = 46) OR (key=08) OR (key=110) then
        begin
        key := 0;
        (Sender as TDBLookupComboBox).KeyValue:=null;
        end;
    end;
    avec DbLookupComboBox.KeyValue:=null; tous le DBLookupCombobox se vide non ?
    Mais il y a t il un moyen d'avoir comme une ranger vide pour sélectionne Null ?

  4. #4
    Rédacteur/Modérateur

    Avatar de SergioMaster
    Homme Profil pro
    Développeur informatique retraité
    Inscrit en
    Janvier 2007
    Messages
    15 031
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 67
    Localisation : France, Loire Atlantique (Pays de la Loire)

    Informations professionnelles :
    Activité : Développeur informatique retraité
    Secteur : Industrie

    Informations forums :
    Inscription : Janvier 2007
    Messages : 15 031
    Points : 40 930
    Points
    40 930
    Billets dans le blog
    62
    Par défaut
    Citation Envoyé par tarmo57 Voir le message
    avec DbLookupComboBox.KeyValue:=null; tous le DBLookupCombobox se vide non ?
    Mais il y a t il un moyen d'avoir comme une ranger vide pour sélectionne Null ?
    On parle ici d'un DBLookupCombobox lié a un ListSource donc non , mettre la keyvalue a null ne "vide" pas quoique ce soit (heureusement) .
    Keyvalue est uniquement la valeur de la clé sélectionnée
    MVP Embarcadero
    Delphi installés : D3,D7,D2010,XE4,XE7,D10 (Rio, Sidney), D11 (Alexandria), D12 (Athènes)
    SGBD : Firebird 2.5, 3, SQLite
    générateurs États : FastReport, Rave, QuickReport
    OS : Window Vista, Windows 10, Windows 11, Ubuntu, Androïd

  5. #5
    Membre habitué
    Profil pro
    Inscrit en
    Novembre 2004
    Messages
    483
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Novembre 2004
    Messages : 483
    Points : 128
    Points
    128
    Par défaut ok
    ok merci a tous j'ai donc ma réponce

+ Répondre à la discussion
Cette discussion est résolue.

Discussions similaires

  1. Réponses: 4
    Dernier message: 18/03/2008, 22h41
  2. [DrScheme] Effacement sur sélection
    Par Maxence45 dans le forum Scheme
    Réponses: 5
    Dernier message: 03/12/2007, 17h39
  3. [VB.NET]Entrée sur combo efface la sélection.
    Par Golzinne dans le forum Windows Forms
    Réponses: 0
    Dernier message: 30/08/2007, 17h44
  4. Sélection/effacement de table de matières
    Par vincent_phi dans le forum VBA Word
    Réponses: 8
    Dernier message: 14/08/2007, 14h24
  5. Comment affiner ma sélection via des DBLookUpComboBox
    Par CleeM dans le forum Bases de données
    Réponses: 6
    Dernier message: 19/06/2007, 11h52

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo