msgYesNo()

msgYesNo()

Postby hag » 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
hag
 
Posts: 598
Joined: Tue Apr 15, 2008 4:51 pm
Location: LOs Angeles, California

Postby driessen » 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. 24.07 - Harbour 3.2.0 (February 2024) - xHarbour Builder (January 2020) - Bcc773
User avatar
driessen
 
Posts: 1422
Joined: Mon Oct 10, 2005 11:26 am
Location: Genk, Belgium

Postby hag » 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
hag
 
Posts: 598
Joined: Tue Apr 15, 2008 4:51 pm
Location: LOs Angeles, California

Postby James Bott » Mon Sep 22, 2008 6: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
User avatar
James Bott
 
Posts: 4840
Joined: Fri Nov 18, 2005 4:52 pm
Location: San Diego, California, USA

Postby hag » Mon Sep 22, 2008 3:06 pm

Thanks all.
Thank you
Harvey
hag
 
Posts: 598
Joined: Tue Apr 15, 2008 4:51 pm
Location: LOs Angeles, California

Postby anserkk » Fri Sep 26, 2008 5:07 am

Dear Harvey

Is it this what you are looking for ?

Code: Select all  Expand view
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
User avatar
anserkk
 
Posts: 1332
Joined: Fri Jun 13, 2008 11:04 am
Location: Kochi, India

Postby hag » Fri Sep 26, 2008 6:00 pm

Anserkk

Thanks for the help. I just developed my own function.
Thank you
Harvey
hag
 
Posts: 598
Joined: Tue Apr 15, 2008 4:51 pm
Location: LOs Angeles, California


Return to FiveWin for Harbour/xHarbour

Who is online

Users browsing this forum: Google [Bot] and 63 guests