Discussion :

[sebyo]

Salut tout le monde , J'ai un petit problème, je suis en train de faire un programme et il faut que je test si une valeur est présente ou pas au départ.


Ce test doit être renseigné par l'utilisateur du programme donc je cherche a créer une boite Yes/No qui me délivre une valeur exploitable en fin de test!!


Merci de ne pas me renvoyer le code de laide delphi j'ai pas reussi a le faire marcher

CF :

Code :

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

1
2
MessageDlg('Bienvenue dans mon application Pascal Objet.  Quitter?',
    mtConfirmation, [mbYes, mbNo], 0, mbYes) = mrYes

j'ai cette erreur qui s'affiche ..

[Erreur] XlsToDb.pas(60): Trop de paramètres originaux

je veux pouvoir récup une boolean ou autre pour l'exploiter plus tard dans le programme.


Merci pour les réponses qui pourront etre apporter a ce probleme

© Seb ®

[ShaiLeTroll]

Tu as mbYes en trop,
l'aide de Delphi 7 ne précise pas que la version avec le bouton en focus paramètrable n'est disponible qu'avec l'unité QDialogs, attention ne pas mélanger des unités CLX (compatible Windows et Linux) et les unites VCL (Windows uniquement)

Code :

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

1
2
MessageDlg('Bienvenue dans mon application Pascal Objet. Quitter?',
mtConfirmation, [mbYes, mbNo], 0) = mrYes

[sebyo]

merci pour le gestion de l'erreur mais l'appui sur un des deux bouton ne fait aucunes actions..



j'ai posé un if ...Then avec un showmessage derriere pour vérifier que quand je sélectionne le oui ca prend la condition en compte mais rien ne s'effectue ...le programme continu sans mon showmessage..


est-ce normal..?

Code :

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

1
2
IF MessageDlg('cliquez sur oui ou non ',
mtConfirmation, [mbYes, mbNo], 0) = mrYes  then showmessage('vous avez cliquez sur oui');

voila un exemple très con qui ne fonctionne pas ...

[sebyo]

Code :

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

1
2
3
4
5
6
IF  MessageDlg('cliquez sur oui ou non ',mtConfirmation	, [mbYes, mbNo],0) = mrYes then
         begin
          showmessage('vous avez cliquez sur oui');
         end
         else
            showmessage('vous avez cliquez sur non');

Bon pour mon probleme j'ai reussi a le résoudre avec une autre aide extérieur


Le probleme est qu'il faut pas intégrer que Dialogs dans Uses mais Controls aussi !!! voila c'est résolu

© Seb ®

[ShaiLeTroll]

Effectivement, mrYes est déclaré dans QDialogs ou dans Controls, voir le sujet "mbYes <> mrYes ?", soit tu utilise QDialogs soit tu utilises Dialogs\Controls, attention à ne pas mélanger les deux, ce qui doit être ton cas, sinon tu aurais eu une erreur de compilation ...