Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Invoke a calculator
Message
De
28/11/2003 11:37:18
 
 
À
28/11/2003 11:01:40
Cetin Basoz
Engineerica Inc.
Izmir, Turquie
Information générale
Forum:
Visual FoxPro
Catégorie:
Gestionnaire d'écran & Écrans
Divers
Thread ID:
00854219
Message ID:
00854233
Vues:
17
>>Hi All:
>>
>>Can anyone direct me to information on how to pop up a calculator or some dialog that will allow me to calculate a number to be entered into a text field?
>>
>>e.g.
>>Instead of entering '62987' into a text field, I would somehow like to be able to enter 44234+12542+6211.
>>
>>Thanx,
>>
>>Yossi
>
>Yossi,
>There are multiple ways.
>-You could invoke default calculator with 'Activate window calculator' and get calculated value with _CalcValue
>-Yopu could simply call an inputbox and ask for text. ie:
>
>lcCalc = InputBox('Calculate','Enter your expression')
>* User enters 44234+12542+6211
>? iif(empty(lcCalc),0,Evaluate(lcCalc))
>
>-Create a modal form that would get calculation similar to inputbox etc.
>Cetin
Hi Cetin:

I placed the following code into the keypress event of the text box:
LPARAMETERS nKeyCode, nShiftAltCtrl
thisform.txtInKeyValue.value = nKeyCode
IF nKeyCode = 43  && user pressed the "+"
	ACTIVATE WINDOW calculator 
	thisform.txtCalcValue.Value = _calcvalue
ENDIF
This doesn't work since the calculator window is not modal and I can't seem to figure out how to make it so.

Thanks,

Yossi
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform