Modifier les options d'un FindDialog ou ReplaceDialog

Résolu
fgsav Messages postés 16 Date d'inscription mardi 20 décembre 2005 Statut Membre Dernière intervention 22 octobre 2008 - 6 juil. 2007 à 00:21
fgsav Messages postés 16 Date d'inscription mardi 20 décembre 2005 Statut Membre Dernière intervention 22 octobre 2008 - 7 juil. 2007 à 01:55
Bonjour, voici une question qui semble simple mais je n'ai pas su trouver de réponse malgré de longues recherches, alors je m'en remets à vous :)

Je voudrais modifier les options de mon ReplaceDialog directement dans mon unité, en fait je cherche la ligne qui permet de définir les options que l'on choisit habituellement dans le menu du composant:
[frDown,frHideMatchCase,frHideWholeWord,frHideUpDown...]

Je sais comment tester leur validité:
if frReplace in ReplaceDialog1.Options then...

Mais comment les modifier, telle est la question.
Merci d'avance

2 réponses

japee Messages postés 1727 Date d'inscription vendredi 27 décembre 2002 Statut Modérateur Dernière intervention 6 novembre 2021 8
6 juil. 2007 à 01:42
Salut,

Exemples.

- pour ajouter :

ReplaceDialog1.Options := ReplaceDialog1.Options + [frReplace];
ReplaceDialog1.Options := ReplaceDialog1.Options + [frReplace, frFindNext];

- pour retirer :

ReplaceDialog1.Options := ReplaceDialog1.Options - [frReplace];

Bonne prog'
3
fgsav Messages postés 16 Date d'inscription mardi 20 décembre 2005 Statut Membre Dernière intervention 22 octobre 2008
7 juil. 2007 à 01:55
Simple et efficace, la classe
0
Rejoignez-nous