Ветеран
Сообщения: 3320
Благодарности: 916
|
Профиль
|
Отправить PM
| Цитировать
Ты ж сам сказал, что калькулятор умеет с такими числами работать. Так что ж тебе мешает использовать его (программно).
Как?
А с помощью функции SendKey (в Visual Basic по умолчанию, а в Delphi вынесено в дополнительный файл).
Вот пример кода на VB6
Private Sub Command1_Click()
ret = Shell("calc.exe", vbNormalFocus)
AppActive "Калькулятор", False
SendKeys "1{+}2 = ^C %{F4}", True
Text1.Text = Clipboard.GetText()
End Sub
Работаем через буфер обмена.
Если так не устраивает, то лучше делать как посоветовал dim_alf.
На Делфи переписать не составит труда (там даже дополнительные операторы есть). Нужен только файл sndkey32.pas, который присутствует на диске от Делфи 7 и конечно же в Интернете.
Трудись.
|
Отправлено: 16:42, 05-11-2005
| #6
|