Results 1 to 10 of 10

Thread: Result van MessageBox afvangen

  1. #1
    Reader ralphje's Avatar
    Join Date
    May 2004
    Location
    Nieuwleusen, OV Uses: Delphi 8
    Posts
    94

    Messagebox

    Hallo,

    Ik ben bezig met een messagebox en heb al de volgende code:
    Code:
    MessageBox.Show('Weet u zeker dat u het venster wilt afsluiten?', 
    'Mixprogramma', Messageboxbuttons.YesNo, Messageboxicon.Information);
    Voor de leken:
    MessageBox.Show('bericht', 'titel bericht', Messageboxbuttons.YesNo [laat Yes en No zien, Ja en Nee dus], Messageboxicon.Informatie [geeft de messagebox het type Informatie]


    Alleen weet ik niet hoe ik reageer op de knop Ja of Nee. Hoe doe ik dat? Ik wil dat het venster afsluit met Application.Exit nadat er is gedrukt op Ja. Ik heb al zitten knoeien met DialogResult, maar ik kom er niet echt uit. Kan iemand mij helpen?
    Ralph
    www.ralphje.nl


    Wist je dat programmeurs in de vorige eeuw naar schatting 35 miljard computerbugs hebben uitgebraakt? En wist je ook dat die bugs het bedrijfsleven alleen al in 2001 ongeveer 175 miljard dollar hebben gekost?

  2. #2
    je moet het DialogResult afvangen. In de help van delphi staat hier een voorbeeld van in.

    Succes
    Last edited by Dees; 13-May-04 at 20:03.

  3. #3
    Reader ralphje's Avatar
    Join Date
    May 2004
    Location
    Nieuwleusen, OV Uses: Delphi 8
    Posts
    94
    Ik heb gekeken naar een andere topic met mijn vraag. Deze kon ik alleen vinden:

    Hoe kan ik een message laten zien zoals vroeger de showmessage werkte?.

    Daarin staat het volgende:

    Ik ben met een ASP site bezig en nu ik (eindelijk) een beetje aan Delphi8.NET ga wennen lukt het aardig.

    Daar staat toch duidelijk ASP site. En ik ben bezig in de Windows Forms...


    En verder, hoe voeg ik IDYes enzo in in mijn code. Voorbeeldje misschien?
    Ralph
    www.ralphje.nl


    Wist je dat programmeurs in de vorige eeuw naar schatting 35 miljard computerbugs hebben uitgebraakt? En wist je ook dat die bugs het bedrijfsleven alleen al in 2001 ongeveer 175 miljard dollar hebben gekost?

  4. #4
    Heb je al eens in de Help van Delphi 8 gekeken?

    daarin STAAT een voorbeeld van wat jij wil. Ik weet dat ongeveer 100% zeker, aangezien ik daar ook mee bezig ben geweest.

    Wat lukt je niet, we kunnen niet altijd een voorbeeld geven. Het is redelijk basis afvangen op welke knop er is gedrukt van een Messagebox. 't is geen schande dat je het niet weet, maar zelf uitzoeken hoe je het kan toepassen is toch niet teveel gevraagd?

    Succes

  5. #5
    Reader ralphje's Avatar
    Join Date
    May 2004
    Location
    Nieuwleusen, OV Uses: Delphi 8
    Posts
    94
    Nou, ik heb echt in de help gekeken, maar daar word ik echt niet wijzer van hoor. Ik snap het niet helemaal, dat is het gewoon. En die IDYES, ik snap dat echt niet hoor.

    Edit:
    Ik snapte je bericht niet helemaal, zeker niet goed gelezen... maar ik snap wel dat ik naar dialogresult moet, dat heb je al wel gezien.
    Last edited by ralphje; 13-May-04 at 19:08.
    Ralph
    www.ralphje.nl


    Wist je dat programmeurs in de vorige eeuw naar schatting 35 miljard computerbugs hebben uitgebraakt? En wist je ook dat die bugs het bedrijfsleven alleen al in 2001 ongeveer 175 miljard dollar hebben gekost?

  6. #6
    Reader ralphje's Avatar
    Join Date
    May 2004
    Location
    Nieuwleusen, OV Uses: Delphi 8
    Posts
    94
    Laat maar zitten, ik heb het op de volgende manier opgelost:

    Code:
    case MessageBox.Show('Weet u zeker dat u het venster wilt sluiten?', 'Mixprogramma',
     Messageboxbuttons.YesNo, Messageboxicon.Information)
      of System.Windows.Forms.DialogResult.Yes:
      begin
      application.exit
      end
      end
    
    Ralph
    www.ralphje.nl


    Wist je dat programmeurs in de vorige eeuw naar schatting 35 miljard computerbugs hebben uitgebraakt? En wist je ook dat die bugs het bedrijfsleven alleen al in 2001 ongeveer 175 miljard dollar hebben gekost?

  7. #7
    Zoals ik dus al zei, je moet kijken naar het DialogResult:

    Code:
    procedure TWinForm.Button1_Click(sender: System.Object; e: System.EventArgs);
    const
      MessageString: string = ' Waar heb ik op gedrukt ? ';
      CaptionString: string = ' Dit is mijn titel ';
    begin
      if MessageBox.Show(MessageString, CaptionString, MessageBoxButtons.YesNo) =
        System.Windows.Forms.DialogResult.Yes then
        MessageBox.Show('jij gekkie, je drukte op ja')
      else
        MessageBox.Show('jij gekkie, je drukte op nee');
    end;

  8. #8
    Reader ralphje's Avatar
    Join Date
    May 2004
    Location
    Nieuwleusen, OV Uses: Delphi 8
    Posts
    94
    OK, ook goed... Bedankt he
    Ralph
    www.ralphje.nl


    Wist je dat programmeurs in de vorige eeuw naar schatting 35 miljard computerbugs hebben uitgebraakt? En wist je ook dat die bugs het bedrijfsleven alleen al in 2001 ongeveer 175 miljard dollar hebben gekost?

  9. #9
    notice-itter SvG's Avatar
    Join Date
    Apr 2002
    Location
    's-Hertogenbosch
    Posts
    4,865
    post verwijderd Volgende keer eerst even kijken in welke sectie ik ben

    Bedankt Dees
    !

  10. #10
    Senior Member walterheck's Avatar
    Join Date
    Oct 2001
    Location
    Belo Horizonte, Brasil
    Posts
    4,212
    Nee, de Romeinen spraken geen ISO-8859-1 LATIN

Thread Information

Users Browsing this Thread

There are currently 1 users browsing this thread. (0 members and 1 guests)

Similar Threads

  1. Boolean operators en Win95 Win2K
    By MasterSteve in forum Algemeen
    Replies: 9
    Last Post: 20-May-03, 20:13

Bookmarks

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •