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

Langage Delphi Discussion :

[D7] Création dynamique d'un nombre inconnu de TComboBox


Sujet :

Langage Delphi

  1. #1
    Membre régulier Avatar de dleu
    Profil pro
    Inscrit en
    Août 2004
    Messages
    169
    Détails du profil
    Informations personnelles :
    Localisation : Belgique

    Informations forums :
    Inscription : Août 2004
    Messages : 169
    Points : 77
    Points
    77
    Par défaut [D7] Création dynamique d'un nombre inconnu de TComboBox
    Bonjour,

    J'ai une appli dans laquelle l'utilisateur clique sur un bouton pour créer des combobox. Le problème est qu'il peut cliquer autant qu'il le veut. Autrement dit, il peut créer autant de ComboBox qu'il le désire.

    Or pour créer mes ComboBox, je dois les déclarer dans la déclaration des variables. Comment faire ?

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    var
    	cb1 : TComboBox;
    begin
      cb1:=TcomboBox.Create(Self);
      with cb1 do
      begin
      	Parent:=Panel1;
            .../...
      end;
    end;
    Comment puis-je faire pour en créer un nombre variable et à la volée ?

    Merci pour votre aide.

    Didier

    ɹəᴉpᴉp

  2. #2
    Membre éclairé
    Avatar de MD Software
    Profil pro
    Inscrit en
    Juin 2003
    Messages
    613
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Juin 2003
    Messages : 613
    Points : 680
    Points
    680
    Par défaut
    Ce que tu as fait est très bien. Il te suffit juste de stocker "cb1" dans une TObjectList. Tu n'a donc pas besoin de déclarer plus de variables. Chaque instance de ta combo va être stockée dans un TObjectList.
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    var 
       cb1 : TComboBox; 
    begin 
      cb1:=TcomboBox.Create(Self); 
      with cb1 do 
      begin 
         Parent:=Panel1; 
            .../... 
      end;
      lesCombo.add(cb1); 
    end;
    En considérant "lesCombo" déclaré en tant que TObjectList dans la classe de ta form ou en variable globale de ton unité.
    MD Software
    ---------------------------
    F.A.Q. Delphi - Cours Delphi - Composants Delphi - Sources Delphi

  3. #3
    Membre régulier Avatar de dleu
    Profil pro
    Inscrit en
    Août 2004
    Messages
    169
    Détails du profil
    Informations personnelles :
    Localisation : Belgique

    Informations forums :
    Inscription : Août 2004
    Messages : 169
    Points : 77
    Points
    77
    Par défaut
    Super.

    MD Software, merci pour une réponse aussi rapide et claire.

    ɹəᴉpᴉp

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

Discussions similaires

  1. Réponses: 0
    Dernier message: 24/03/2011, 00h04
  2. Nombre de pages en création dynamique
    Par dacid dans le forum Rave
    Réponses: 1
    Dernier message: 08/09/2006, 16h52
  3. [Rave Report] problème de création dynamique
    Par Nivux dans le forum Rave
    Réponses: 2
    Dernier message: 24/05/2003, 00h07
  4. TWebBrowser et création dynamique
    Par BakaOnigiri dans le forum Web & réseau
    Réponses: 2
    Dernier message: 01/09/2002, 10h53
  5. Création dynamique de TImages
    Par Dric dans le forum C++Builder
    Réponses: 10
    Dernier message: 08/07/2002, 12h36

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