Вверх ↑
Этот топик читают: Гость
Ответов: 16884
Рейтинг: 1239
#31: 2017-05-25 10:17:56 ЛС | профиль | цитата
Хотел выложить "причесанную" панель умножения - не получилось. Половину форум отрезал.
Сейчас попробую заархивировать.
http://files.d-lan.dp.ua/download?file=a73b34cf5077754a56ed3064f2ed57be
Заберёшь файл - скажи.
Удалено.

Редактировалось 5 раз(а), последний 2017-05-27 09:42:53
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
1
Голосовали:Tri-j
Ответов: 9906
Рейтинг: 351
#32: 2017-05-25 12:28:06 ЛС | профиль | цитата
Tad писал(а):
Ты рисуешь схему, а не лабиринт

Вообще-то, все еще проще, чем ты нарисовал (а потом затер)
Add(MainForm,2953706,105,126)
{
Width=433
Height=154
Position=1
}
Add(Label,8297688,196,126)
{
Left=104
Top=53
Width=210
Height=44
Font=[Times New Roman,14,1,16711680,204]
Ctl3D=0
WinStyle=4
Caption="Получить оценку"
AutoSize=1
Alignment=2
link(onClick,3496293:doWork1,[])
}
Add(ChildForm,3496293,259,126)
{
link(Data1,1879121:Position,[])
}
BEGIN_SDK
Add(EditMulti,4822144,21,14)
{
WorkCount=1
DataCount=1
Width=328
Height=151
VOffset=70
HOffset=77
link(doWork1,12074781:doShowModal,[])
}
Add(MainForm,12074781,42,56)
{
Left=350
Top=150
Width=600
Height=600
Visible=1
Position=1
Point(doShowModal)
Point(onShow)
link(onShow,13661587:doCalc,[])
}
Add(Label,11239202,294,77)
{
Left=175
Top=160
Width=195
Height=117
Font=[Times New Roman,72,1,16711680,204]
Name="Вывод"
Caption=""
AutoSize=1
Alignment=2
}
Add(Label,2303490,42,105)
{
Left=175
Top=60
Width=194
Height=40
Font=[Times New Roman,19,1,8421376,204]
Caption="Твоя оценка:"
}
Add(Label,2849333,252,84)
{
Left=70
Top=315
Width=384
Height=189
Font=[Times New Roman,19,1,8421376,204]
Caption=""
AutoSize=1
Alignment=2
}
Add(MultiSetParam,13984691,154,77)
{
Parameters=#54:2;Совсем плохо.\1Надо много заниматься.;sound\\222.mp3|51:3;Средненько... Побольше тренируйся.;sound\\333.mp3|60:4;Неплохо ! Но будь немножко повнимательнее !;sound\\444.mp3|40:5;Умничка ! Так держать !;sound\\555.mp3|
OutType=1
link(onSet1,11239202:doText,[])
link(onSet2,10240970:doReplace,[])
link(onSet3,12074781:doCaption,[(193,97)(193,48)(32,48)(32,62)])
}
Add(MathParse,13661587,98,77)
{
DataCount=1
MathStr="(%1>40)+(%1>60)+(%1>80)"
ResultType=0
link(onResult,13984691:doSet,[])
link(X1,4822144:Data1,[])
}
Add(Replace,10240970,203,84)
{
SubStr="\1"
DestStr="\r\n"
link(onReplace,2849333:doText,[])
}
END_SDK
Add(TrackBar,1879121,259,63)
{
Left=7
Top=7
Width=385
Height=21
HintPosition=0
Max=100
TickCount=5
Position=30
}
Add(StyleXP,14134602,105,63)
{
}

Редактировалось 1 раз(а), последний 2017-05-25 13:31:14
карма: 9

2
Голосовали:Tad, Tri-j
Ответов: 16884
Рейтинг: 1239
#33: 2017-05-25 13:40:05 ЛС | профиль | цитата
Блин. Я за этот ПТК забыл.

--- Добавлено в 2017-05-25 13:42:24

Tri-j писал(а):
Видимо, я учусь не на тех примерах
У Galkova учись.

Редактировалось 2 раз(а), последний 2017-05-25 14:41:12
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
Ответов: 75
Рейтинг: 2
#34: 2017-05-25 19:49:47 ЛС | профиль | цитата
Да уж... Вы пишите побольше. Так много узнаю от вас. Мне хоть и немало лет, но желание учиться чему-то новому не пропадает. Tad, скачал и посмотрел. Красивая причёска) Galkov, сто плюсов, всё коротко. Только звиняйте, этого компонента у меня нету
Вот я и говорю - сколько людей - столько и решений
Безымянный.jpg

Редактировалось 2 раз(а), последний 2017-05-25 20:02:25
карма: 2

0
Ответов: 16884
Рейтинг: 1239
#35: 2017-05-26 08:27:38 ЛС | профиль | цитата
Tri-j писал(а):
Безымянный.jpg
Кто всё время кричал "Я обновился с SVN"
Обновись нормально...
Этому компоненту "сто лет в обед".(2012г.)

Редактировалось 1 раз(а), последний 2017-05-26 08:40:12
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
Ответов: 75
Рейтинг: 2
#36: 2017-05-26 12:11:40 ЛС | профиль | цитата
Да не понимаю, что за ерунда. Неделю назад переустанавливал конструктор, обновлялся. Попробовал сейчас ещё раз обновиться. Выдало вот это:
1111.jpg
И о, чудо ! MSP появился !
карма: 2

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