Вверх ↑
Этот топик читают: Гость
Ответов: 232
Рейтинг: 6
#31: 2008-06-18 14:04:30 ЛС | профиль | цитата
Ну настоящие какбы бабки гадалки только за еду и за вещи делают )
карма: 0

0
Голосовали:Konst, juk
Ответов: 902
Рейтинг: 27
#32: 2008-06-20 06:23:14 ЛС | профиль | цитата
Если кому нужно вот ещё колоды:

3 колода:
http://dump.ru/file_catalog/694775
вес:пол метра.

4-5-6 колоды:
http://dump.ru/file_catalog/694909
вес:полтора метра

7-8-9 колоды:
http://dump.ru/file_catalog/694992
вес:полтора метра

10-11-12 колоды
http://dump.ru/file_catalog/695088
вес:полтора метра

Просто разархивируйте их в папку: picture
карма: 1
Время верстки: %cr_time% Текущее время: %time%
1
Голосовали:Валерий
Ответов: 16884
Рейтинг: 1239
#33: 2008-06-20 10:11:16 ЛС | профиль | цитата
juk, "живое" меню.
Add(BitBtn,11189115,259,63)
{
Left=30
Top=40
Width=90
Height=25
Font=[MS Sans Serif,8,1,255,1]
Caption="Пункт 1"
Point(doTop)
}
Add(BitBtn,2029260,259,112)
{
Left=30
Top=40
Width=90
Font=[MS Sans Serif,8,1,255,1]
Caption="Пункт 2"
Point(doTop)
}
Add(BitBtn,11074932,259,154)
{
Left=30
Top=40
Width=90
Font=[MS Sans Serif,8,1,255,1]
Caption="Пункт 3"
Point(doTop)
}
Add(BitBtn,14009634,259,196)
{
Left=30
Top=40
Width=90
Font=[MS Sans Serif,8,1,255,1]
Caption="Пункт 4"
Point(doTop)
}
Add(Label,6810381,259,28)
{
Left=30
Top=40
Width=90
Height=20
Color=16711680
Font=[MS Sans Serif,10,1,65535,1]
Caption="МЕНЮ"
AutoSize=1
Alignment=2
Point(onClick)
link(onClick,16091053:doFor,[(304,34)(304,15)(79,15)(79,69)])
}
Add(For,16091053,91,63)
{
Start=40
End=95
link(onEvent,7451593:doEvent1,[])
link(onStop,12521710:doFor,[(135,76)(135,103)(79,103)(79,118)])
}
Add(For,12521710,91,112)
{
Start=40
End=135
link(onEvent,2732841:doEvent1,[])
link(onStop,14987751:doFor,[(135,125)(135,143)(79,143)(79,160)])
}
Add(For,14987751,91,154)
{
Start=40
End=175
link(onEvent,6125953:doEvent1,[])
link(onStop,7562313:doFor,[(135,167)(135,185)(79,185)(79,202)])
}
Add(For,7562313,91,196)
{
Start=40
End=220
link(onEvent,15407228:doEvent1,[])
}
Add(Hub,7451593,161,63)
{
link(onEvent1,11189115:doTop,[])
link(onEvent2,14417496:doEvent1,[(212,76)(212,244)])
}
Add(Hub,2732841,161,112)
{
link(onEvent1,2029260:doTop,[])
link(onEvent2,14417496:doEvent2,[(212,125)(212,251)])
}
Add(Hub,6125953,161,154)
{
link(onEvent1,11074932:doTop,[])
link(onEvent2,14417496:doEvent3,[(212,167)(212,258)])
}
Add(Hub,15407228,161,196)
{
link(onEvent1,14009634:doTop,[])
link(onEvent2,14417496:doEvent4,[(212,209)(212,265)])
}
Add(Sleep,8638833,287,238)
{
Delay=5000
link(onSleep,2201754:doProcessMessages,[])
}
Add(Hub,14417496,231,238)
{
InCount=4
OutCount=1
link(onEvent1,8638833:doSleepMks,[])
}
Add(Application,2201754,350,238)
{
Wait=1
}

карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
2
Голосовали:juk, Валерий
Разработчик
Ответов: 26158
Рейтинг: 2127
#34: 2008-06-20 10:18:38 ЛС | профиль | цитата
Tad, поставь Wite=False в Application -- дождаться отработки всех сообщений. Wite=True -- это ждать первого сообщения, вот она у тебя его и ждет
карма: 22

1
Голосовали:juk
Ответов: 16884
Рейтинг: 1239
#35: 2008-06-20 10:43:03 ЛС | профиль | цитата
nesco, да я уже понял и исправил
------------ Дoбавленo:

После ПРАВКИ juk в тегах и худой получился
------------ Дoбавленo:

Хотя компонент типа "Перерисовывать сразу." не помешал бы. Кинул его в проект и все визуальные перерисовываются, а то к этому Application провода тянуть надо.
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
1
Голосовали:juk
Разработчик
Ответов: 26158
Рейтинг: 2127
#36: 2008-06-20 10:45:12 ЛС | профиль | цитата
Tad, переведи коды на другую строку Enter'ом
------------ Дoбавленo:

Tad писал(а):
Хотя компонент типа "Перерисовывать сразу."

Типа, назначит родителю (Win) такое свойство Посмотрим, что на это скажут спецы
карма: 22

1
Голосовали:juk
Ответов: 902
Рейтинг: 27
#37: 2008-06-20 11:01:09 ЛС | профиль | цитата
Tad, Классная менюшка!

После ПРАВКИ juk в тегах и худой получился


А из тегов я вылезу, и даст бог поправлюсь.
карма: 1
Время верстки: %cr_time% Текущее время: %time%
0
Ответов: 16884
Рейтинг: 1239
#38: 2008-06-20 11:26:39 ЛС | профиль | цитата
nesco писал(а):
Типа, назначит родителю (Win) такое свойство
ага
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
Ответов: 902
Рейтинг: 27
#39: 2008-06-20 12:10:07 ЛС | профиль | цитата
Tad, А так можно?

code_2237.txt

Или не правильно?
карма: 1
Время верстки: %cr_time% Текущее время: %time%
0
файлы: 1code_2237.txt [4.5KB] [151]
Разработчик
Ответов: 26158
Рейтинг: 2127
#40: 2008-06-20 12:14:13 ЛС | профиль | цитата
juk, а нафига ты ее так усложнил, смысла не вижу
карма: 22

1
Голосовали:juk
Ответов: 16884
Рейтинг: 1239
#41: 2008-06-20 13:58:39 ЛС | профиль | цитата
А я на смысл и не смотрел
juk, я просто тебе кинул идею (нет яблок) и больше ничего.
Просто, мне почему-то показалось, что если три кнопочки (Гадать,Выход и забыл третью) разъедутся из общего центра на свои места, а меню развернется или по клику или через пару секунд, то таинственности (и веры) добавится
------------ Дoбавленo:

Хотя, после выбора пункта меню, медленно сложить кнопки и засунуть их под Label Меню... Подумай.
------------ Дoбавленo:

nesco писал(а):
juk, а нафига ты ее так усложнил, смысла не вижу

наверное juk, решил догнать число компонентов до 10000 и вес программы до размера CD
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
1
Голосовали:juk
Гость
Ответов: 17029
Рейтинг: 0
#42: 2008-06-20 20:07:27 правка | ЛС | профиль | цитата


Редактировалось 1 раз(а), последний 2017-03-03 12:12:20
карма: 0

0
Ответов: 16884
Рейтинг: 1239
#43: 2008-06-20 21:12:59 ЛС | профиль | цитата
Гость писал(а):
Как насмешка над четовеком

карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
1
Голосовали:juk
Ответов: 902
Рейтинг: 27
#44: 2008-06-21 03:07:10 ЛС | профиль | цитата
nesco,
juk, а нафига ты ее так усложнил, смысла не вижу


Я просто сделал чтоб менюшка не только раскрывалась, но и закрывалась.
Но эту схемку собираюсь применить при выборе карт, чтоб карта перелетала на своё место и открывалась.

[size=-2]------ Добавлено в 03:07
Гость,
Как насмешка над четовеком:


Над четовеками я не смеялся.
Просто показал как не надо писать.
(Писать ударение на "а" , про какать шутки не принимаются!)
карма: 1
Время верстки: %cr_time% Текущее время: %time%
0
Разработчик
Ответов: 26158
Рейтинг: 2127
#45: 2008-06-21 03:07:25 ЛС | профиль | цитата
Мдяяя... Уж. А проще никак нельзя

А мидюшки не хочешь подцепить в качестве музыкального сопровождения, а то готовится к выпуску новый компонент для пригрывания midi ресурсами OC (вообще-то, два, один из них создатель временных файлов)
карма: 22

1
Голосовали:juk
Сообщение
...
Прикрепленные файлы
(файлы не залиты)