FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin for Harbour/xHarbour msgYesNo()
Posts: 598
Joined: Tue Apr 15, 2008 04:51 PM
msgYesNo()
Posted: Sun Sep 21, 2008 11:01 PM

Is there a way when using msgYesNo() to change the yes and no buttons to something else?

Thank you

Harvey
Posts: 1467
Joined: Mon Oct 10, 2005 11:26 AM
msgYesNo()
Posted: Sun Sep 21, 2008 11:40 PM

If you simply mean if the "yes" and "no" can be presented in another language, than my answer is "No".

The language is depending of the language of your Windows version.

If you want to translate it to another language or if you want to use other buttons, you have, to my opinion, to make your own "MsgYesNo()".

Good luck.

Regards,

Michel D.
Genk (Belgium)


_____________________________________________________________________________________________

I use : FiveWin for (x)Harbour v. 25.12 - Harbour 3.2.0 (May 2025) - xHarbour Builder (January 2020) - Bcc773

Posts: 598
Joined: Tue Apr 15, 2008 04:51 PM
msgYesNo()
Posted: Sun Sep 21, 2008 11:46 PM

Not a language issue just prompt the yes and no to anything other then yse and no.

Thank you

Harvey
Posts: 4840
Joined: Fri Nov 18, 2005 04:52 PM
msgYesNo()
Posted: Mon Sep 22, 2008 06:01 AM

Harvey,

I believe it is a Windows common control, so you cannot change the prompts. It is easy enough to just make your own dialog.

James

FWH 18.05/xHarbour 1.2.3/BCC7/Windows 10
Posts: 598
Joined: Tue Apr 15, 2008 04:51 PM
msgYesNo()
Posted: Mon Sep 22, 2008 03:06 PM

Thanks all.

Thank you

Harvey
Posts: 1335
Joined: Fri Jun 13, 2008 11:04 AM
msgYesNo()
Posted: Fri Sep 26, 2008 05:07 AM
Dear Harvey

Is it this what you are looking for ?

function Main()

MSGINFO( "GOING TO ALERT" ) 

SAYING := "There are records in the QUEUE that have not "+chr(13)+CHR(10) 
SAYING += "been Transmitted. Do you wish to ...."+chr(13)+CHR(10) 

YESNO := { " Resend ", " Delete " , " Abort " } 
nOK := ALERT(SAYING, YESNO ) 
MsgInfo("You selected option "+str(nOk,1)) // Added by me see the value of nOk

return nil


This is from \FWH\Samples\Rick.Prg

Regards

Anser
Posts: 598
Joined: Tue Apr 15, 2008 04:51 PM
msgYesNo()
Posted: Fri Sep 26, 2008 06:00 PM

Anserkk

Thanks for the help. I just developed my own function.

Thank you

Harvey

Continue the discussion