Вверх ↑
Этот топик читают: Гость
Ответов: 10
Рейтинг: 2
#1: 2015-06-21 00:00:37 ЛС | профиль | цитата
Всем доброго времени! Скажите, возможно-ли использовать формулы Excel. Например формулу =ПРОСМОТР(....) или =ВЫБОР? Спасибо.
карма: 0

0
Ответов: 8926
Рейтинг: 823
#2: 2015-06-21 00:12:47 ЛС | профиль | цитата
angor2005, если вы имеете ввиду те таблицы, которыми распологает HiAsm, то нет, зато в этих таблицах есть другие инструменты.
Если вы хотите работать с Excel через HiAsm и написать в какой-либо ячейке формулу, то это возможно, хотя смысла в таком изврате мало
карма: 19

0
Ответов: 10
Рейтинг: 2
#3: 2015-06-24 23:51:01 ЛС | профиль | цитата
Доброго времени всем!
Не хочу плодить новые темы, поэтому спрошу здесь. С "ПРОСМОТРОМ-ВЫБОРОМ" вроде коряво, но разобрался. А теперь уважаемые знатоки, не могли бы Вы мне помочь? Хочется, что бы:
1.при вводе аргумента можно было бы вводить не только точку, но и запятую, т.е. без разницы, вводить как с основной клавы, так и с NamPad (точка в коэффициенте пусть будет-нужна для дальнейших арифметических расчетов);
2.отображение коэффициента происходило бы сразу при вводе аргумента, исключая нажатие Enter (тут, правда, есть сомнения, что получится вообще, т.к. условия аргумента ограничены, см. P.P.S);
3.вся эта форма была бы модальной, т.е. всегда отображалась бы поверх всех окон и позволяла бы работать в других приложениях;
4.возможно-ли ограничить ввод аргумента до четырех знаков после разделителя.

P.S. если удасться сократить таблицу с коэффициентами (там много повторяющихся), то была бы вообще круть (на самом деле таблица гораздо больше, но тогда на форум весь код не поместить).
P.P.S. условие для ввода аргумента, он может быть только в диапазоне с 0.9500 до 1.0000 и только четыре знака после разделителя.

Заранее, большое спасибо!, и прошу прощения, если много попросил.
Add(Edit,15744765,56,98)
{
Left=15
Top=35
Width=85
Text="0.95"
Alignment=2
DataType=4
Point(doSelectAll)
link(onEnter,15184698:doEvent1,[])
}
Add(Hub,15184698,98,105)
{
link(onEvent1,15744765:doSelectAll,[(122,111)(122,91)(46,91)(46,118)])
link(onEvent2,621320:doEnum,[])
}
Add(ArrayEnum,621320,140,112)
{
link(onItem,15372820:doSplit,[])
link(Array,9332912:Array,[])
}
Add(If_else,5502500,238,119)
{
link(onTrue,11154360:doEvent1,[])
link(Op1,15744765:Text,[(244,108)(228,108)(228,154)(62,154)])
}
Add(StrPart,15372820,189,112)
{
Char=";"
Point(Right)
link(onPart,5502500:doCompare,[])
}
Add(Hub,11154360,280,119)
{
link(onEvent1,11390992:doText,[])
link(onEvent2,621320:doStop,[(304,132)(304,168)(130,168)(130,125)])
}
Add(MainForm,8432877,21,14)
{
Width=249
Height=98
Color=12639424
Caption=" Выбор коэффициента"
BorderStyle=4
Point(onClose)
}
Add(StrList,9332912,126,28)
{
Strings=#15:0.9500;0.000567|15:0.9501;0.000567|15:0.9502;0.000567|15:0.9503;0.000567|15:0.9504;0.000567|15:0.9505;0.000567|15:0.9506;0.000567|15:0.9507;0.000567|15:0.9508;0.000567|15:0.9509;0.000567|15:0.9510;0.000567|15:0.9511;0.000567|15:0.9512;0.000567|15:0.9513;0.000567|15:0.9514;0.000567|15:0.9515;0.000567|15:0.9516;0.000567|15:0.9517;0.000567|15:0.9518;0.000567|15:0.9519;0.000567|15:0.9520;0.000567|15:0.9521;0.000567|15:0.9522;0.000567|15:0.9523;0.000567|15:0.9524;0.000567|15:0.9525;0.000567|15:0.9526;0.000567|15:0.9527;0.000567|15:0.9528;0.000567|15:0.9529;0.000567|15:0.9530;0.000567|15:0.9531;0.000567|15:0.9532;0.000567|15:0.9533;0.000567|15:0.9534;0.000567|15:0.9535;0.000567|15:0.9536;0.000567|15:0.9537;0.000567|15:0.9538;0.000567|15:0.9539;0.000567|15:0.9540;0.000567|15:0.9541;0.000567|15:0.9542;0.000567|15:0.9543;0.000567|15:0.9544;0.000567|15:0.9545;0.000567|15:0.9546;0.000567|15:0.9547;0.000567|15:0.9548;0.000567|15:0.9549;0.000567|15:0.9550;0.000567|15:0.9551;0.000567|15:0.9552;0.000567|15:0.9553;0.000567|15:0.9554;0.000567|15:0.9555;0.000567|15:0.9556;0.000567|15:0.9557;0.000567|15:0.9558;0.000567|15:0.9559;0.000567|15:0.9560;0.000567|15:0.9561;0.000567|15:0.9562;0.000567|15:0.9563;0.000567|15:0.9564;0.000567|15:0.9565;0.000567|15:0.9566;0.000567|15:0.9567;0.000567|15:0.9568;0.000567|15:0.9569;0.000567|15:0.9570;0.000567|15:0.9571;0.000567|15:0.9572;0.000567|15:0.9573;0.000567|15:0.9574;0.000567|15:0.9575;0.000567|15:0.9576;0.000567|15:0.9577;0.000567|15:0.9578;0.000567|15:0.9579;0.000567|15:0.9580;0.000567|15:0.9581;0.000567|15:0.9582;0.000567|15:0.9583;0.000567|15:0.9584;0.000567|15:0.9585;0.000567|15:0.9586;0.000567|15:0.9587;0.000567|15:0.9588;0.000567|15:0.9589;0.000567|15:0.9590;0.000567|15:0.9591;0.000567|15:0.9592;0.000567|15:0.9593;0.000567|15:0.9594;0.000567|15:0.9595;0.000567|15:0.9596;0.000567|15:0.9597;0.000567|15:0.9598;0.000567|15:0.9599;0.000567|15:0.9600;0.000554|15:0.9601;0.000554|15:0.9602;0.000554|15:0.9603;0.000554|15:0.9604;0.000554|15:0.9605;0.000554|15:0.9606;0.000554|15:0.9607;0.000554|15:0.9608;0.000554|15:0.9609;0.000554|15:0.9610;0.000554|15:0.9611;0.000554|15:0.9612;0.000554|15:0.9613;0.000554|15:0.9614;0.000554|15:0.9615;0.000554|15:0.9616;0.000554|15:0.9617;0.000554|15:0.9618;0.000554|15:0.9619;0.000554|15:0.9620;0.000554|15:0.9621;0.000554|15:0.9622;0.000554|15:0.9623;0.000554|15:0.9624;0.000554|15:0.9625;0.000554|15:0.9626;0.000554|15:0.9627;0.000554|15:0.9628;0.000554|15:0.9629;0.000554|15:0.9630;0.000554|15:0.9631;0.000554|15:0.9632;0.000554|15:0.9633;0.000554|15:0.9634;0.000554|15:0.9635;0.000554|15:0.9636;0.000554|15:0.9637;0.000554|15:0.9638;0.000554|15:0.9639;0.000554|15:0.9640;0.000554|15:0.9641;0.000554|15:0.9642;0.000554|15:0.9643;0.000554|15:0.9644;0.000554|15:0.9645;0.000554|15:0.9646;0.000554|15:0.9647;0.000554|15:0.9648;0.000554|15:0.9649;0.000554|15:0.9650;0.000554|15:0.9651;0.000554|15:0.9652;0.000554|15:0.9653;0.000554|15:0.9654;0.000554|15:0.9655;0.000554|15:0.9656;0.000554|15:0.9657;0.000554|15:0.9658;0.000554|15:0.9659;0.000554|15:0.9660;0.000554|15:0.9661;0.000554|15:0.9662;0.000554|15:0.9663;0.000554|15:0.9664;0.000554|15:0.9665;0.000554|15:0.9666;0.000554|15:0.9667;0.000554|15:0.9668;0.000554|15:0.9669;0.000554|15:0.9670;0.000554|15:0.9671;0.000554|15:0.9672;0.000554|15:0.9673;0.000554|15:0.9674;0.000554|15:0.9675;0.000554|15:0.9676;0.000554|15:0.9677;0.000554|15:0.9678;0.000554|15:0.9679;0.000554|15:0.9680;0.000554|15:0.9681;0.000554|15:0.9682;0.000554|15:0.9683;0.000554|15:0.9684;0.000554|15:0.9685;0.000554|15:0.9686;0.000554|15:0.9687;0.000554|15:0.9688;0.000554|15:0.9689;0.000554|15:0.9690;0.000554|15:0.9691;0.000554|15:0.9692;0.000554|15:0.9693;0.000554|15:0.9694;0.000554|15:0.9695;0.000554|15:0.9696;0.000554|15:0.9697;0.000554|15:0.9698;0.000554|15:0.9699;0.000554|15:0.9700;0.000541|15:0.9701;0.000541|15:0.9702;0.000541|15:0.9703;0.000541|15:0.9704;0.000541|15:0.9705;0.000541|15:0.9706;0.000541|15:0.9707;0.000541|15:0.9708;0.000541|15:0.9709;0.000541|15:0.9710;0.000541|15:0.9711;0.000541|15:0.9712;0.000541|15:0.9713;0.000541|15:0.9714;0.000541|15:0.9715;0.000541|15:0.9716;0.000541|15:0.9717;0.000541|15:0.9718;0.000541|15:0.9719;0.000541|15:0.9720;0.000541|15:0.9721;0.000541|15:0.9722;0.000541|15:0.9723;0.000541|15:0.9724;0.000541|15:0.9725;0.000541|15:0.9726;0.000541|15:0.9727;0.000541|15:0.9728;0.000541|15:0.9729;0.000541|15:0.9730;0.000541|15:0.9731;0.000541|15:0.9732;0.000541|15:0.9733;0.000541|15:0.9734;0.000541|15:0.9735;0.000541|15:0.9736;0.000541|15:0.9737;0.000541|15:0.9738;0.000541|15:0.9739;0.000541|15:0.9740;0.000541|15:0.9741;0.000541|15:0.9742;0.000541|15:0.9743;0.000541|15:0.9744;0.000541|15:0.9745;0.000541|15:0.9746;0.000541|15:0.9747;0.000541|15:0.9748;0.000541|15:0.9749;0.000541|15:0.9750;0.000541|15:0.9751;0.000541|15:0.9752;0.000541|15:0.9753;0.000541|15:0.9754;0.000541|15:0.9755;0.000541|15:0.9756;0.000541|15:0.9757;0.000541|15:0.9758;0.000541|15:0.9759;0.000541|15:0.9760;0.000541|15:0.9761;0.000541|15:0.9762;0.000541|15:0.9763;0.000541|15:0.9764;0.000541|15:0.9765;0.000541|15:0.9766;0.000541|15:0.9767;0.000541|15:0.9768;0.000541|15:0.9769;0.000541|15:0.9770;0.000541|15:0.9771;0.000541|15:0.9772;0.000541|15:0.9773;0.000541|15:0.9774;0.000541|15:0.9775;0.000541|15:0.9776;0.000541|15:0.9777;0.000541|15:0.9778;0.000541|15:0.9779;0.000541|15:0.9780;0.000541|15:0.9781;0.000541|15:0.9782;0.000541|15:0.9783;0.000541|15:0.9784;0.000541|15:0.9785;0.000541|15:0.9786;0.000541|15:0.9787;0.000541|15:0.9788;0.000541|15:0.9789;0.000541|15:0.9790;0.000541|15:0.9791;0.000541|15:0.9792;0.000541|15:0.9793;0.000541|15:0.9794;0.000541|15:0.9795;0.000541|15:0.9796;0.000541|15:0.9797;0.000541|15:0.9798;0.000541|15:0.9799;0.000541|15:0.9800;0.000528|15:0.9801;0.000528|15:0.9802;0.000528|15:0.9803;0.000528|15:0.9804;0.000528|15:0.9805;0.000528|15:0.9806;0.000528|15:0.9807;0.000528|15:0.9808;0.000528|15:0.9809;0.000528|15:0.9810;0.000528|15:0.9811;0.000528|15:0.9812;0.000528|15:0.9813;0.000528|15:0.9814;0.000528|15:0.9815;0.000528|15:0.9816;0.000528|15:0.9817;0.000528|15:0.9818;0.000528|15:0.9819;0.000528|15:0.9820;0.000528|15:0.9821;0.000528|15:0.9822;0.000528|15:0.9823;0.000528|15:0.9824;0.000528|15:0.9825;0.000528|15:0.9826;0.000528|15:0.9827;0.000528|15:0.9828;0.000528|15:0.9829;0.000528|15:0.9830;0.000528|15:0.9831;0.000528|15:0.9832;0.000528|15:0.9833;0.000528|15:0.9834;0.000528|15:0.9835;0.000528|15:0.9836;0.000528|15:0.9837;0.000528|15:0.9838;0.000528|15:0.9839;0.000528|15:0.9840;0.000528|15:0.9841;0.000528|15:0.9842;0.000528|15:0.9843;0.000528|15:0.9844;0.000528|15:0.9845;0.000528|15:0.9846;0.000528|15:0.9847;0.000528|15:0.9848;0.000528|15:0.9849;0.000528|15:0.9850;0.000528|15:0.9851;0.000528|15:0.9852;0.000528|15:0.9853;0.000528|15:0.9854;0.000528|15:0.9855;0.000528|15:0.9856;0.000528|15:0.9857;0.000528|15:0.9858;0.000528|15:0.9859;0.000528|15:0.9860;0.000528|15:0.9861;0.000528|15:0.9862;0.000528|15:0.9863;0.000528|15:0.9864;0.000528|15:0.9865;0.000528|15:0.9866;0.000528|15:0.9867;0.000528|15:0.9868;0.000528|15:0.9869;0.000528|15:0.9870;0.000528|15:0.9871;0.000528|15:0.9872;0.000528|15:0.9873;0.000528|15:0.9874;0.000528|15:0.9875;0.000528|15:0.9876;0.000528|15:0.9877;0.000528|15:0.9878;0.000528|15:0.9879;0.000528|15:0.9880;0.000528|15:0.9881;0.000528|15:0.9882;0.000528|15:0.9883;0.000528|15:0.9884;0.000528|15:0.9885;0.000528|15:0.9886;0.000528|15:0.9887;0.000528|15:0.9888;0.000528|15:0.9889;0.000528|15:0.9890;0.000528|15:0.9891;0.000528|15:0.9892;0.000528|15:0.9893;0.000528|15:0.9894;0.000528|15:0.9895;0.000528|15:0.9896;0.000528|15:0.9897;0.000528|15:0.9898;0.000528|15:0.9899;0.000528|15:0.9900;0.000515|15:0.9901;0.000515|15:0.9902;0.000515|15:0.9903;0.000515|15:0.9904;0.000515|15:0.9905;0.000515|15:0.9906;0.000515|15:0.9907;0.000515|15:0.9908;0.000515|15:0.9909;0.000515|15:0.9910;0.000515|15:0.9911;0.000515|15:0.9912;0.000515|15:0.9913;0.000515|15:0.9914;0.000515|15:0.9915;0.000515|15:0.9916;0.000515|15:0.9917;0.000515|15:0.9918;0.000515|15:0.9919;0.000515|15:0.9920;0.000515|15:0.9921;0.000515|15:0.9922;0.000515|15:0.9923;0.000515|15:0.9924;0.000515|15:0.9925;0.000515|15:0.9926;0.000515|15:0.9927;0.000515|15:0.9928;0.000515|15:0.9929;0.000515|15:0.9930;0.000515|15:0.9931;0.000515|15:0.9932;0.000515|15:0.9933;0.000515|15:0.9934;0.000515|15:0.9935;0.000515|15:0.9936;0.000515|15:0.9937;0.000515|15:0.9938;0.000515|15:0.9939;0.000515|15:0.9940;0.000515|15:0.9941;0.000515|15:0.9942;0.000515|15:0.9943;0.000515|15:0.9944;0.000515|15:0.9945;0.000515|15:0.9946;0.000515|15:0.9947;0.000515|15:0.9948;0.000515|15:0.9949;0.000515|15:0.9950;0.000515|15:0.9951;0.000515|15:0.9952;0.000515|15:0.9953;0.000515|15:0.9954;0.000515|15:0.9955;0.000515|15:0.9956;0.000515|15:0.9957;0.000515|15:0.9958;0.000515|15:0.9959;0.000515|15:0.9960;0.000515|15:0.9961;0.000515|15:0.9962;0.000515|15:0.9963;0.000515|15:0.9964;0.000515|15:0.9965;0.000515|15:0.9966;0.000515|15:0.9967;0.000515|15:0.9968;0.000515|15:0.9969;0.000515|15:0.9970;0.000515|15:0.9971;0.000515|15:0.9972;0.000515|15:0.9973;0.000515|15:0.9974;0.000515|15:0.9975;0.000515|15:0.9976;0.000515|15:0.9977;0.000515|15:0.9978;0.000515|15:0.9979;0.000515|15:0.9980;0.000515|15:0.9981;0.000515|15:0.9982;0.000515|15:0.9983;0.000515|15:0.9984;0.000515|15:0.9985;0.000515|15:0.9986;0.000515|15:0.9987;0.000515|15:0.9988;0.000515|15:0.9989;0.000515|15:0.9990;0.000515|15:0.9991;0.000515|15:0.9992;0.000515|15:0.9993;0.000515|15:0.9994;0.000515|15:0.9995;0.000515|15:0.9996;0.000515|15:0.9997;0.000515|15:0.9998;0.000515|15:0.9999;0.000515|15:1.0000;0.000515|
Point(doGetString)
Point(onGetString)
}
Add(Edit,11390992,322,119)
{
Left=130
Top=35
Width=95
Text=""
Alignment=2
link(Str,15372820:Right,[(328,108)(311,108)(311,160)(195,160)])
}
Add(Label,954135,280,35)
{
Left=30
Top=15
Width=52
Height=17
Color=16776960
Transparent=0
Caption="Аргумент"
AutoSize=1
Alignment=2
}
Add(Label,604956,203,35)
{
Left=135
Top=15
Width=84
Height=17
Color=16776960
Transparent=0
Caption="Коэффициент"
AutoSize=1
Alignment=2
}


карма: 0

0
Ответов: 16884
Рейтинг: 1239
#4: 2015-06-26 14:59:47 ЛС | профиль | цитата
1. Если возникает требование
angor2005 писал(а):
при вводе аргумента можно было бы вводить не только точку, но и запятую
то намного проще обойти эту ситуацию.
2-4. Отказаться от ручного ввода в пользу простого выбора.
3. без проблем.
code_35913.txt
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
1
файлы: 1code_35913.txt [10.8KB] [810]
Голосовали:angor2005
Ответов: 8926
Рейтинг: 823
#5: 2015-06-26 15:30:44 ЛС | профиль | цитата
angor2005, вариант code_35915.txt
Tad, а где компонент "Между"
карма: 19

0
файлы: 1code_35915.txt [2.8KB] [255]
Ответов: 16884
Рейтинг: 1239
#6: 2015-06-26 15:56:00 ЛС | профиль | цитата
Леонид,
angor2005 писал(а):
P.S. если удасться сократить таблицу с коэффициентами (там много повторяющихся), то была бы вообще круть (на самом деле таблица гораздо больше, но тогда на форум весь код не поместить).
P.P.S. условие для ввода аргумента, он может быть только в диапазоне с 0.9500 до 1.0000 и только четыре знака после разделителя.

Если принять во внимание P.P.S. , то откуда тогда
angor2005 писал(а):
на самом деле таблица гораздо больше
Поэтому сокращениями не занимался.

Кстати, встречный вопрос : А зачем там два StrtoReal ? Без них что - работать не будет ?
Или вообще 5 розовых меняем на одного зелёного:
Леонид_11.png
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
файлы: 1Леонид_11.png [11.2KB] [371]
Ответов: 10
Рейтинг: 2
#7: 2015-06-26 22:41:52 ЛС | профиль | цитата
Ребята, снимаю шляпу. Спасибо большое, очень помогли.
карма: 0

0
Ответов: 8926
Рейтинг: 823
#8: 2015-06-26 23:06:23 ЛС | профиль | цитата
Tad писал(а):
..5 розовых меняем на одного зелёного..
"В начале было Слово.." И у меня один зелёный, но не крашеный был, подумалось ТС придумает другие коэффициенты и начнёт сравнивать строку с числом, поставил пять красных, правда тоже не крашеные (не люблю петухов на поле Тут недалеко, в порядке "точечной" застройки уродливый овальной формы в плане дом есть, вместо балконов железные клетки в полметра площадью и раскрашен дом разноцветными квадратами, за что и получил от народа прозвище "Петух" вот он и ассоциируется с раскрашенными схемами)
карма: 19

0
Ответов: 10
Рейтинг: 2
#9: 2015-06-27 00:27:32 ЛС | профиль | цитата
Развеселил Все равно, за "зеленого" и "между" отдельное спасибо.
карма: 0

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