Калькулятор Windows

@Ctrl Shift · Регистрация: 17.11.2013

Студворк — интернет-сервис помощи студентам

Подскажите пожалуйста, можно ли через Delphi использовать калькулятор Windows(в инженерном режиме), допусти как если я в Edit1 и Edit2 введу некие числа и при нажатии на кнопку провести расчеты через калькулятор Windows и вывести результат в Edit3?

@mss · 19.03.2015, 14:00

можно, но не нужно
это все равно что из пушки по блохам палить)
на то есть стандартный виндовый COM-интерфейс MSScript.ScriptControl

@Ctrl Shift · 19.03.2015, 14:02 **[ТС]**

А как это реализовать?

@mss · 19.03.2015, 15:03

Ищи на этом форуме темы и их содержимое по ключ.слову MSScript.ScriptControl - много раз уже разжевано

@Ctrl Shift · 19.03.2015, 15:52 **[ТС]**

Такой вариант при решении, например такого примера: "(35^67) mod 5", выдает ошибку "Переполнение: number ........"

@northener · 19.03.2015, 16:02

Сообщение от Ctrl Shift

Такой вариант при решении, например такого примера: "(35^67) mod 5", выдает ошибку "Переполнение:

А чего ты хотел?

@Ctrl Shift · 19.03.2015, 17:31 **[ТС]**

Мне именно такое переполнение надо как-то обойти, вот я и хотел через калькулятор Windows прогнать пример

Добавлено через 1 час 25 минут
Ну так все таки, кто-нибудь знает как это сделать?

@mss · 19.03.2015, 20:00

Сообщение от Ctrl Shift

Такой вариант

Какой "такой" ?)

@Ctrl Shift · 20.03.2015, 10:19 **[ТС]**

MSScript.ScriptControl

@mss · 20.03.2015, 10:25

показывай код ..

@northener · 20.03.2015, 10:46

Сообщение от mss

показывай код

Сообщение от mss

много раз уже разжевано

Это тот самый разжеванный выдаёт такую ошибку в данном случае.

@mss · 20.03.2015, 11:30

то есть тем самым ты утверждаешь, что строка

Delphi
1
ShowMessage(sc.Eval('35^67'))

вызывает ошибку "Переполнение"

так ?

@Ctrl Shift · 20.03.2015, 12:43 **[ТС]**

Нет, просто вывести оно его выводит ShowMessage(Sc.Eval('35^67'))= 2,83503856823822E103, а вот при выполнении допустим ((35^67) mod 5) выдает ошибку "Переполнение:'[number:2,83503856823822E+10]' "

@mss · 20.03.2015, 13:00

а зачем вообще такие дикие формулы давать ?
тот же самый ноль можно получить и более вменяемой формулой ((5^4) mod 5)

Добавлено через 5 минут
mod - остаток от целочисленного деления

А куркулятор виндовый хитрожопит - при mod вместо остатка от целочисленного деления он вычисляет и показывает остаток от вещественного деления)

убедись сам - скомандуй ему 8 mod 1.5
он тебе покажет 0.5)

тот же тот же самый 0,5 тебе покажет и СкриптКонтрол для формулы 35^67/1.5

@Ctrl Shift · 20.03.2015, 13:11 **[ТС]**

Ну а как мне сделать чтобы он схитрил и с ((35^67) mod 5), и выдавал такой же ответ как и калькулятор Windows?

Добавлено через 2 минуты
Причем там может оказаться и выражение наподобие ((2034^143) mod 4356)

@mss · 20.03.2015, 13:24

а формула у тебя всегда что ли одна и та же

x ^ y mod z

?

@Ctrl Shift · 20.03.2015, 14:07 **[ТС]**

Да.

@krapotkin · 20.03.2015, 14:27

а думать не пробовали?
тут в лоб задачу не нужно решать
а если я 1123^1123 задам?
от какой системы калькулятор будем брать?
нужно определить какая последняя цифра у числа в хрентамзнает степени

@mss · 20.03.2015, 14:47

И нафих тогда тебе калькулятор и иже с ним скриптконтролы ?

прямо в Делфи и пиши код, вычисляющий ф-цию

но все операции осуществляй не с целочисленными типами, а с вещественным Extended

mod, разумеется, при этом не прокатит - придется бртать дробную часть результата вещ.деления, умножать ее на делитель и из делимого вычитать результат умножения

Добавлено через 18 минут

Не по теме:

думать не пробовали?

и ведь задача-то именно на думалку-смекалку-кумекалку, а не на "куркулятор в инженерном режиме"
т.е. на мозг в инженерном режиме)

@Nikita110001 · 06.06.2018, 15:49

https://yadi.sk/d/UB3SDKSz3XExD7

Новые блоги и статьи Все статьи Все блоги /
Access VikBal 11.12.2025 Помогите пожалуйста !! Как объединить 2 одинаковые БД Access с разными данными.	Новый ноутбук volvo 07.12.2025 Всем привет. По скидке в "черную пятницу" взял себе новый ноутбук Lenovo ThinkBook 16 G7 на Амазоне: Ryzen 5 7533HS 64 Gb DDR5 1Tb NVMe 16" Full HD Display Win11 Pro	Музыка, написанная Искусственным Интеллектом volvo 04.12.2025 Всем привет. Некоторое время назад меня заинтересовало, что уже умеет ИИ в плане написания музыки для песен, и, собственно, исполнения этих самых песен. Стихов у нас много, уже вышли 4 книги, еще 3. . .	От async/await к виртуальным потокам в Python IndentationError 23.11.2025 Армин Ронахер поставил под сомнение async/ await. Создатель Flask заявляет: цветные функции - провал, виртуальные потоки - решение. Не threading-динозавры, а новое поколение лёгких потоков. Откат?. . .	Поиск "дружественных имён" СОМ портов Argus19 22.11.2025 Поиск "дружественных имён" СОМ портов На странице: https:/ / norseev. ru/ 2018/ 01/ 04/ comportlist_windows/ нашёл схожую тему. Там приведён код на С++, который показывает только имена СОМ портов, типа,. . .
Сколько Государство потратило денег на меня, обеспечивая инсулином. Programma_Boinc 20.11.2025 Сколько Государство потратило денег на меня, обеспечивая инсулином. Вот решила сделать интересный приблизительный подсчет, сколько государство потратило на меня денег на покупку инсулинов. . . .	Ломающие изменения в C#.NStar Alpha Etyuhibosecyu 20.11.2025 Уже можно не только тестировать, но и пользоваться C#. NStar - писать оконные приложения, содержащие надписи, кнопки, текстовые поля и даже изображения, например, моя игра "Три в ряд" написана на этом. . .	Мысли в слух kumehtar 18.11.2025 Кстати, совсем недавно имел разговор на тему медитаций с людьми. И обнаружил, что они вообще не понимают что такое медитация и зачем она нужна. Самые базовые вещи. Для них это - когда просто люди. . .	Создание Single Page Application на фреймах krapotkin 16.11.2025 Статья исключительно для начинающих. Подходы оригинальностью не блещут. В век Веб все очень привыкли к дизайну Single-Page-Application . Быстренько разберем подход "на фреймах". Мы делаем одну. . .	Фото: Daniel Greenwood kumehtar 13.11.2025

@Ctrl Shift 0 / 0 / 0 Регистрация: 17.11.2013 Сообщений: 34

	Калькулятор Windows 19.03.2015, 13:23. Показов 2631. Ответов 20 Метки нет (Все метки) Подскажите пожалуйста, можно ли через Delphi использовать калькулятор Windows(в инженерном режиме), допусти как если я в Edit1 и Edit2 введу некие числа и при нажатии на кнопку провести расчеты через калькулятор Windows и вывести результат в Edit3? 0

@mss 3530 / 2270 / 279 Регистрация: 24.12.2010 Сообщений: 13,723
	19.03.2015, 14:00
	можно, но не нужно это все равно что из пушки по блохам палить) на то есть стандартный виндовый COM-интерфейс MSScript.ScriptControl 0

@Ctrl Shift 0 / 0 / 0 Регистрация: 17.11.2013 Сообщений: 34
	19.03.2015, 14:02 [ТС]
	А как это реализовать? 0

@mss 3530 / 2270 / 279 Регистрация: 24.12.2010 Сообщений: 13,723
	19.03.2015, 15:03
	Ищи на этом форуме темы и их содержимое по ключ.слову MSScript.ScriptControl - много раз уже разжевано 0

@Ctrl Shift 0 / 0 / 0 Регистрация: 17.11.2013 Сообщений: 34
	19.03.2015, 15:52 [ТС]
	Такой вариант при решении, например такого примера: "(35^67) mod 5", выдает ошибку "Переполнение: number ........" 0

@Ctrl Shift 0 / 0 / 0 Регистрация: 17.11.2013 Сообщений: 34
	19.03.2015, 17:31 [ТС]
	Мне именно такое переполнение надо как-то обойти, вот я и хотел через калькулятор Windows прогнать пример Добавлено через 1 час 25 минут Ну так все таки, кто-нибудь знает как это сделать? 0

@Ctrl Shift 0 / 0 / 0 Регистрация: 17.11.2013 Сообщений: 34
	20.03.2015, 10:19 [ТС]
	MSScript.ScriptControl 0

@mss 3530 / 2270 / 279 Регистрация: 24.12.2010 Сообщений: 13,723
	20.03.2015, 10:25
	показывай код .. 0

@Ctrl Shift 0 / 0 / 0 Регистрация: 17.11.2013 Сообщений: 34
	20.03.2015, 12:43 [ТС]
	Нет, просто вывести оно его выводит ShowMessage(Sc.Eval('35^67'))= 2,83503856823822E103, а вот при выполнении допустим ((35^67) mod 5) выдает ошибку "Переполнение:'[number:2,83503856823822E+10]' " 0

@mss 3530 / 2270 / 279 Регистрация: 24.12.2010 Сообщений: 13,723
	20.03.2015, 13:00
	а зачем вообще такие дикие формулы давать ? тот же самый ноль можно получить и более вменяемой формулой ((5^4) mod 5) Добавлено через 5 минут mod - остаток от целочисленного деления А куркулятор виндовый хитрожопит - при mod вместо остатка от целочисленного деления он вычисляет и показывает остаток от вещественного деления) убедись сам - скомандуй ему 8 mod 1.5 он тебе покажет 0.5) тот же тот же самый 0,5 тебе покажет и СкриптКонтрол для формулы 35^67/1.5 0

@Ctrl Shift 0 / 0 / 0 Регистрация: 17.11.2013 Сообщений: 34
	20.03.2015, 13:11 [ТС]
	Ну а как мне сделать чтобы он схитрил и с ((35^67) mod 5), и выдавал такой же ответ как и калькулятор Windows? Добавлено через 2 минуты Причем там может оказаться и выражение наподобие ((2034^143) mod 4356) 0

@mss 3530 / 2270 / 279 Регистрация: 24.12.2010 Сообщений: 13,723
	20.03.2015, 13:24
	а формула у тебя всегда что ли одна и та же x ^ y mod z ? 0

@Ctrl Shift 0 / 0 / 0 Регистрация: 17.11.2013 Сообщений: 34
	20.03.2015, 14:07 [ТС]
	Да. 0

@krapotkin 6847 / 4674 / 1463 Регистрация: 14.04.2014 Сообщений: 20,654 Записей в блоге: 21
	20.03.2015, 14:27
	а думать не пробовали? тут в лоб задачу не нужно решать а если я 1123^1123 задам? от какой системы калькулятор будем брать? нужно определить какая последняя цифра у числа в хрентамзнает степени 0