Aller au contenu
  • Pas encore inscrit ?

    Pourquoi ne pas vous inscrire ? C'est simple, rapide et gratuit.
    Pour en savoir plus, lisez Les avantages de l'inscription... et la Charte de Zébulon.
    De plus, les messages que vous postez en tant qu'invité restent invisibles tant qu'un modérateur ne les a pas validés. Inscrivez-vous, ce sera un gain de temps pour tout le monde, vous, les helpeurs et les modérateurs ! :wink:

TActionList action standard sur TComboBox


Sony

Messages recommandés

slt

j'ai mis un PopupMenu sur ma ComboBox1 et je n'ai plus le copier coller...,

de ce coup j'ai mis un composant TActionList pour faire des actions standard de type copier coller dans le text de ma ComboBox1, mais il me propose pas ces actions pour le type TComboBox mais seulement pour le type TEdit

ya t'il moyen de rédiriger ces actions ?

merci d'avance

Lien vers le commentaire
Partager sur d’autres sites

salut Sony, je comprends pas pourquoi tu as mit un popup menu sur ta combo ?

 

si tu veux mettre copier coller sur t'as combo, il y sont d'origine et si tu voulais rajouté des actions en plus du copier coller :

 

void __fastcall TForm1::FormCreate(TObject *Sender)

{
 PopupMenu1->AutoPopup = true;
 Edit1->PopupMenu = PopupMenu1;
 Edit2->PopupMenu = PopupMenu1;
 Memo1->PopupMenu = PopupMenu1;
 Memo2->PopupMenu = PopupMenu1;
}

These are the cut, copy, and paste OnClick events for the commands on the pop-up menu. 

void __fastcall TForm1::Copy1Click(TObject *Sender)

{
 TComponent *pComponent = PopupMenu1->PopupComponent;
 if (pComponent)
 {
   if (pComponent->ClassNameIs("TEdit"))
     ((TEdit *)pComponent)->CopyToClipboard();
   else if (pComponent->ClassNameIs("TMemo"))
     ((TMemo *)pComponent)->CopyToClipboard();
   else
     MessageBeep(0);
 }
 else
   MessageBeep(0);
}

void __fastcall TForm1::Cut1Click(TObject *Sender)

{
 TComponent *pComponent = PopupMenu1->PopupComponent;
 if (pComponent)
 {
   if (pComponent->ClassNameIs("TEdit"))
     ((TEdit *)pComponent)->CutToClipboard();
   else if (pComponent->ClassNameIs("TMemo"))
     ((TMemo *)pComponent)->CutToClipboard();
   else
     MessageBeep(0);
 }
 else
   MessageBeep(0);
}

void __fastcall TForm1::Paste1Click(TObject *Sender)

{
 TComponent *pComponent = PopupMenu1->PopupComponent;
 if (pComponent)
 {
   if (pComponent->ClassNameIs("TEdit"))
     ((TEdit *)pComponent)->PasteFromClipboard();
   else if (pComponent->ClassNameIs("TMemo"))
     ((TMemo *)pComponent)->PasteFromClipboard();
   else
     MessageBeep(0);
 }
 else
   MessageBeep(0);
}

Aide borland

 

et tu invente rajoute tes autres fonctions ...

 

je suis pas sûre d'avoir compris ta question...

Modifié par azman
Lien vers le commentaire
Partager sur d’autres sites

Et bien en fait j'ai une ComboBox1 sur laquelle je voudrais rajouter au menu surgissant (click droit) des éléments au menu comme "Préfrence" et "A propos"...

mais quand je met un PopupMenu sur ma ComboBox1 il me vire les éléments menu par défaut (Copier, Coller...) dc mis à part rajouter du code pour les élément "Copier", "Coller" comme tu dis azman, je mis un composant ActionList lequel propose des actions par défaut comme le "Copier", "Coller"... mais uniquement pour les TEdit, dc je voudrais savoir si il y a moyen d'adapter ces actions pour un TComboBox ou s'il faut que je résoudre mon problème par ta méthode azman?

Lien vers le commentaire
Partager sur d’autres sites

Rejoindre la conversation

Vous pouvez publier maintenant et vous inscrire plus tard. Si vous avez un compte, connectez-vous maintenant pour publier avec votre compte.
Remarque : votre message nécessitera l’approbation d’un modérateur avant de pouvoir être visible.

Invité
Répondre à ce sujet…

×   Collé en tant que texte enrichi.   Coller en tant que texte brut à la place

  Seulement 75 émoticônes maximum sont autorisées.

×   Votre lien a été automatiquement intégré.   Afficher plutôt comme un lien

×   Votre contenu précédent a été rétabli.   Vider l’éditeur

×   Vous ne pouvez pas directement coller des images. Envoyez-les depuis votre ordinateur ou insérez-les depuis une URL.

  • En ligne récemment   0 membre est en ligne

    • Aucun utilisateur enregistré regarde cette page.
×
×
  • Créer...