Вверх ↑
Ответов: 9906
Рейтинг: 351
#1: 2013-06-09 19:55:08 ЛС | профиль | цитата
user_asm, довожу до Вашего сведения, что решать Ваши проблемы заочно - бесперспективное занятие.
У меня нет ни baze.db, ни способа установить глобальную переменную path (значение в которой, вообще-то в NULL ставить надо)
Вот вам пример для динамической модальной формы без заморочек с базами

Add(MainForm,8494981,217,98)
{
Position=1
}
Add(ChildFormEx,11099823,343,105)
{
Mode=1
AddHint(63,-24,56,13,Mode)
}
BEGIN_SDK
Add(EditMultiEx,10714414,21,21)
{
WorkCount=#11:doShowModal|
Width=650
Height=508
link(doShowModal,4729526:doShowModal,[(95,27)(95,76)])
}
Add(MainForm,4729526,119,42)
{
Left=35
Top=105
Width=382
Height=249
Position=1
Point(doShowModal)
}
Add(Edit,14230502,189,42)
{
Left=5
Top=110
Width=355
}
Add(ComboBox,5063734,245,147)
{
Left=75
Top=170
Width=280
Height=21
}
Add(Timer,13977288,70,147)
{
Interval=0
AutoStop=1
link(onTimer,9845560:doFor,[])
}
Add(For,9845560,133,147)
{
End=9
link(onEvent,9196804:doStrCat,[])
}
Add(StrCat,9196804,189,147)
{
link(onStrCat,5063734:doAdd,[])
link(Str1,14230502:Text,[])
}
END_SDK
Add(Button,15937869,273,105)
{
Left=135
Top=110
Caption="2"
link(onClick,11099823:doShowModal,[])
AddHint(5,-18,21,13,Caption)
}
и скрин работоспособности
user_asm_00.png

Приведено, чтобы вы больше не парили мозги с OnlyOnce, а искали глюки в своей дальнейшей схемотехнике

карма: 9

0
файлы: 1user_asm_00.png [16KB] [537]