Вверх ↑
Этот топик читают: Гость
Ответов: 37
Рейтинг: 0
#1: 2012-06-20 08:59:39 ЛС | профиль | цитата
Я задался вопросом: как бы выглядел калькулятор собранный HiAsm'е?
Если кто знает поделитесь схемой пожалуйста.
Попробовал свои силы и вот что получилось: code_28254.txt , но мне кажется что у меня какая то большая схема.
карма: 0

0
файлы: 1code_28254.txt [15.2KB] [291]
Ответов: 1173
Рейтинг: 49
#2: 2012-06-20 09:06:03 ЛС | профиль | цитата
vovvei, разобраться нет времени (ухожу), но навскидку -- громоздко. Смотри R-Calc за авторством tig-rrr, где-то было на форуме.
карма: 0

0
Ответов: 1376
Рейтинг: 197
#3: 2012-06-20 09:22:53 ЛС | профиль | цитата
vovvei писал(а):
как бы выглядел калькулятор собранный HiAsm'е?
Примерно вот так -> %HiAsm%\Elements\delphi\Example\Utils\Calk.sha
карма: 1

0
Гость
Ответов: 17029
Рейтинг: 0
#4: 2012-06-20 09:23:01 правка | ЛС | профиль | цитата


Редактировалось 2 раз(а), последний 2025-01-11 00:17:58
карма: 0

0
Ответов: 1173
Рейтинг: 49
#5: 2012-06-20 10:32:48 ЛС | профиль | цитата
[offtop]
foksov писал(а):
%HiAsm%ElementsdelphiExampleUtilsCalk.sha
Это "примитив".[/offtop]
карма: 0

0
Ответов: 1376
Рейтинг: 197
#6: 2012-06-20 10:42:48 ЛС | профиль | цитата
[offtop]
Ex_ писал(а):
Это "примитив".
Вполне понятный ТС как начинающему[/offtop]
карма: 1

0
Ответов: 495
Рейтинг: 163
#7: 2012-06-20 13:04:29 ЛС | профиль | цитата
Ex_ писал(а):
где-то было на форуме.

http://forum.hiasm.com/forum.html?q=3&p=141217#p141217
Версия Lite..
карма: 4

0
Ответов: 8932
Рейтинг: 823
#8: 2012-06-20 14:50:29 ЛС | профиль | цитата
tig-rrr, как-то я пропустил Вашу схему Впечатляет!
Используя MathParse можно нарисовать и очень большой и совсем маленький калькулятор code_28260.txt
карма: 19

0
файлы: 1code_28260.txt [5.7KB] [171]
Ответов: 37
Рейтинг: 0
#9: 2012-06-20 15:35:54 ЛС | профиль | цитата
Ex_ писал(а):
но навскидку -- громоздко


Весь интерес ( понять логику ) был в том чтобы создать калькулятор такой же (ну не совсем такой, кнопок поменьше ) как в windows'е.
1. Если нажать цифру, а потом кнопку "удалить", то поле не станет пустым, а ноль появится.
2. Удаление цифры возможно только при вводе нового числа, если нажать на +,- или =, то цифру уже нельзя удалить.
3. Если нажать 2+2=, то получится 4, а затем ( не нажимая С ) ввести 2+2=, то получится 4.
А если тоже самое сделать с калькулятором tig-rrr'а, то получится 48.
Может быть поэтому громоздко?
карма: 0

0
Ответов: 1173
Рейтинг: 49
#10: 2012-06-20 17:07:10 ЛС | профиль | цитата
vovvei писал(а):
Если нажать цифру, а потом кнопку "удалить", то поле не станет пустым, а ноль появится


Add(Edit,10770169,84,105)
{
Left=10
Top=10
Text=""
DataType=2
}

vovvei писал(а):
Удаление цифры возможно только при вводе нового числа, если нажать на +,- или =, то цифру уже нельзя удалить
Выносишь в отдельное поле, да и все дела.
vovvei писал(а):
Если нажать 2+2=, то получится 4, а затем ( не нажимая С ) ввести 2+2=, то получится 4.
Эмм... Что
карма: 0

0
Ответов: 495
Рейтинг: 163
#11: 2012-06-20 17:16:58 ЛС | профиль | цитата
Леонид писал(а):
как-то я пропустил Вашу схему
Странно если Вы являетесь соавтором.
tig-rrr писал(а):
В версии 005 добавлена возможность решения уравнений с одним неизвестным. Автор : Леонид
vovvei писал(а):
А если тоже самое сделать с калькулятором tig-rrr'а
Насколько я помню преследовал другую задачу ( при нажатии действий /*-+ решения продалжались без нажатия = и при повторном нажати = выполнялось последнее действие )
vovvei писал(а):
1. Если нажать цифру, а потом кнопку "удалить", то поле не станет пустым, а ноль появится.
2. Удаление цифры возможно только при вводе нового числа, если нажать на +,- или =, то цифру уже нельзя удалить.
Скорее всего можно доработать алгоритм.
карма: 4

0
Ответов: 1173
Рейтинг: 49
#12: 2012-06-20 17:29:26 ЛС | профиль | цитата
vovvei, короче говоря, вот тебе пипец какой функциональный и простой калькулятор из 3-х элементов:
code_28266.txt

карма: 0

0
файлы: 1code_28266.txt [398B] [131]
Ответов: 495
Рейтинг: 163
#13: 2012-06-20 18:43:55 ЛС | профиль | цитата
Ex_ писал(а):
простой калькулятор из 3-х элементов
Еще вариант (имхо, удобней )

Add(MathParse,4448916,378,203)
{
DataCount=0
MathStr=""
Point(doMathStr)
link(onResult,11491610:doText2,[(422,209)(422,186)(274,186)(274,216)])
}
Add(Edit,11491610,287,203)
{
Width=434
Height=30
Align=2
Font=[MS Sans Serif,14,1,0,1]
Text=""
ClearAfterEnter=1
link(onEnter,4707793:doEvent1,[])
}
Add(Hub,4707793,336,210)
{
link(onEvent1,4448916:doMathStr,[])
link(onEvent2,4448916:doCalc,[(364,223)(364,209)])
}



карма: 4

0
Ответов: 1376
Рейтинг: 197
#14: 2012-06-20 18:51:58 ЛС | профиль | цитата
и Hub лишний
code_28267.txt
карма: 1

1
файлы: 1code_28267.txt [476B] [173]
Голосовали:tig-rrr
Ответов: 37
Рейтинг: 0
#15: 2012-06-20 22:55:51 ЛС | профиль | цитата
Спасибо всем за участие. Вот у меня ещё вопрос возник: как сделать так чтобы калькулятор мог реагировать на клавиши клавиатуры?
карма: 0

0
Сообщение
...
Прикрепленные файлы
(файлы не залиты)