DynamicPanel

Вверх ↑

Форумы Между деломDynamicPanel ← Ctrl1Ctrl →

Этот топик читают: Гость

Ответов: 1328

Рейтинг: 69

#1: 2007-12-02 01:37:31 ЛС | профиль | цитата

Почему так

code_7865.txt
В смысле почему создаются панели только с таймером.
Может че то не так делаю - нужно создать 7 динамических панелей.

карма: 2

файлы: 1

code_7865.txt [1.9KB] [317]

Ответов: 3514

Рейтинг: 184

#2: 2007-12-02 01:51:08 ЛС | профиль | цитата

code_1950.txt

А так? onCreate шалит

карма: 0

Ссылка

файлы: 1

code_1950.txt [2KB] [284]

Ответов: 1328

Рейтинг: 69

#3: 2007-12-02 09:22:21 ЛС | профиль | цитата

Астрамак писал(а):

А так? onCreate шалит

Тут чето другое - сейчас нормально, от чего зависит непойму

code_7867.txt
------------ Дoбавленo:

Или так надо


Add(ChildPanelEx,8900355,287,210)
{
}
BEGIN_SDK
  Add(EditMultiEx,1945365,21,21)
  {
   WorkCount=#5:##add|8:doEvent1|
   Point(##add)
   link(doEvent1,11631719:doEvent1,[(53,34)(53,111)])
  }
  Add(Panel,4897167,70,322)
  {
   Left=20
   Top=105
   Width=373
   Height=539
   Point(doColor)
  }
  Add(ChildPanelEx,2079737,161,77)
  {
   Mode=1
   link(Text,2079737:##index,[(167,65)(155,65)(155,121)(167,121)])
  }
  BEGIN_SDK
    Add(EditMultiEx,3338156,21,21)
    {
     WorkCount=#5:##add|
     VarCount=#7:##index|
     DataCount=#4:Text|
     Width=314
     Point(##add)
     Point(##index)
     link(##add,2950520:doText,[(63,27)(63,83)])
    }
    Add(Panel,9612781,140,252)
    {
     Left=2
     Top=2
     Height=485
     Align=1
     Point(doColor)
    }
    Add(Label,2950520,133,77)
    {
     Top=5
     Height=25
     link(Text,3338156:Text,[(139,49)(27,49)])
    }
  END_SDK
  Add(ChildPanelEx,4448846,147,161)
  {
   Mode=1
   link(Data,4448846:##index,[(153,149)(141,149)(141,205)(153,205)])
  }
  BEGIN_SDK
    Add(EditMultiEx,4790922,21,21)
    {
     WorkCount=#5:##add|
     VarCount=#7:##index|
     DataCount=#4:Data|
     Point(##add)
     Point(##index)
     link(##add,1661671:doData,[(49,27)(49,118)])
    }
    Add(Panel,16300474,133,112)
    {
     Left=2
     Top=487
     Width=369
     Align=4
     Point(doColor)
    }
    Add(DoData,1661671,77,112)
    {
     link(onEventData,16300474:doCaption,[])
     link(Data,4790922:Data,[(83,66)(27,66)])
    }
  END_SDK
  Add(Hub,11631719,70,105)
  {
   link(onEvent1,2079737:##add,[(138,111)(138,83)])
   link(onEvent2,4448846:##add,[(124,118)(124,167)])
  }
END_SDK
Add(Timer,12851022,203,217)
{
 Interval=1
 AutoStop=7
 link(onTimer,8900355:doEvent1,[])
}

карма: 2

файлы: 1 code_7867.txt [970B] [302]

Ответов: 9906

Рейтинг: 351

#4: 2007-12-02 09:45:58 ЛС | профиль | цитата

Уважаемые Писатели

В чем проблемы (именуемые видимо "шалостями")

У меня нет претензий НИ К ОДНОМУ из кодов

Как бы это не было противно окружающим

карма: 9

Ответов: 1328

Рейтинг: 69

#5: 2007-12-02 09:56:15 ЛС | профиль | цитата

Galkov, У тебя создаются 7 панелей

code_7868.txt

карма: 2

файлы: 1

code_7868.txt [952B] [302]

Разработчик

Ответов: 26322

Рейтинг: 2147

#6: 2007-12-02 10:04:51 ЛС | профиль | цитата

Konst, а у тебя что, не создаются

У меня на экране от 0 до 6 создалось.

карма: 22

Ответов: 9906

Рейтинг: 351

#7: 2007-12-02 10:16:54 ЛС | профиль | цитата

Konst писал(а):

У тебя создаются 7 панелей

Galkov писал(а):

У меня нет претензий НИ К ОДНОМУ из кодов

------------ Дoбавленo:

BTW: http://hiasm.com/forum.html?q=3&t=7652

карма: 9

файлы: 1

tokonst.png [6.2KB] [443]

Ответов: 1328

Рейтинг: 69

#8: 2007-12-02 10:34:45 ЛС | профиль | цитата

без таймера - нет
[img] http://kot-nm.nm.ru/pic/Form.jpg[/img]

------------ Дoбавленo:


Add(MainForm,3902346,161,154)
{
 Left=20
 Top=105
 Width=598
 link(onCreate,14211062:doTimer,[])
}
Add(ChildPanel,14094767,350,189)
{
}
BEGIN_SDK
  Add(EditMulti,7230928,21,21)
  {
   WorkCount=1
   Width=496
   Height=221
   link(doWork1,16163406:##add,[(105,27)(105,111)])
  }
  Add(Panel,6025484,168,273)
  {
   Left=15
   Top=10
   Width=345
   Height=89
   Point(doColor)
  }
  Add(ChildPanelEx,16163406,189,105)
  {
   Mode=1
  }
  BEGIN_SDK
    Add(EditMultiEx,3796808,21,21)
    {
     WorkCount=#5:##add|
     Width=307
     Point(##add)
     link(##add,1199064:doText,[(67,27)(67,104)])
    }
    Add(Panel,3480163,168,322)
    {
     Left=2
     Top=2
     Height=85
     Align=1
     Point(doColor)
    }
    Add(Label,1199064,112,98)
    {
     Left=110
     Top=95
     Align=2
    }
  END_SDK
END_SDK
Add(For,14841168,280,189)
{
 End=6
 link(onEvent,14094767:doWork1,[])
}
Add(Timer,14211062,217,189)
{
 Interval=1
 AutoStop=1
 link(onTimer,14841168:doFor,[])
}

Так создается ------------ Дoбавленo:

И этот пример работает http://hiasm.com/xf//getfile/7868 (хотя разницы не вижу), но если изменить размен глав. формы в визуальном редакторе панели перестают создаваться.

карма: 2

Ответов: 9906

Рейтинг: 351

#9: 2007-12-02 10:58:38 ЛС | профиль | цитата

Еще раз

Galkov писал(а):

BTW: http://hiasm.com/forum.html?q=3&t=7652

карма: 9

Ответов: 1328

Рейтинг: 69

#10: 2007-12-02 11:35:02 ЛС | профиль | цитата

Galkov, Спасибо теперь усе ОК
------------ Дoбавленo:

Galkov, А это не из этой же темы?
Если двигать скролером во время появление дочерней формы (модальной) подвисает, пока его не перекроет другое окно


Add(ChildScrollBox,4773463,308,259)
{
}
BEGIN_SDK
  Add(EditMulti,11152684,21,21)
  {
   Width=510
   Height=403
  }
  Add(ScrollBox,16529181,112,231)
  {
   Left=60
   Top=70
   Width=365
   Height=240
   Point(doVisible)
  }
  Add(Image,14427663,210,140)
  {
   Width=1555
   Height=2000
   ViewStyle=4
  }
END_SDK
Add(Timer,3904087,259,147)
{
 Interval=5000
 AutoStop=1
 link(onTimer,10074607:doShowModal,[])
}
Add(ChildFormEx,10074607,336,147)
{
}
BEGIN_SDK
  Add(EditMultiEx,12577962,21,21)
  {
   WorkCount=#11:doShowModal|
   link(doShowModal,2350234:doShowModal,[(73,27)(73,125)])
  }
  Add(MainForm,2350234,126,91)
  {
   Left=35
   Top=105
   Visible=1
   Point(doShowModal)
   Point(doVisible)
  }
  Add(Button,1736910,154,91)
  {
   Left=155
   Top=90
   Data=String(Jgga)
   link(onClick,2783278:doText,[])
  }
  Add(Label,2783278,294,91)
  {
   Left=245
   Top=95
  }
END_SDK

карма: 2

Ответов: 9906

Рейтинг: 351

#11: 2007-12-02 13:19:50 ЛС | профиль | цитата

Konst писал(а):

Если двигать скролером во время появление дочерней формы (модальной) подвисает

А что оно должно делать

И почему "это" должно делать "оно", а не ты

Раз ТЫ (а не оно) запускаешь именно модальную форму, значит не хочешь чтобы функционировала родительская.
Отпустить захват мыша - функционирование именно родительской
Ну разберись сначала, чего хочешь...
Видимо.

карма: 9

Ответов: 1328

Рейтинг: 69

#12: 2007-12-02 13:26:20 ЛС | профиль | цитата

Я хотел чтоб родительская не функционировала, но мышу отпустила

карма: 2

Ответов: 9906

Рейтинг: 351

#13: 2007-12-02 14:28:30 ЛС | профиль | цитата


#sha
Add(ChildScrollBox,4773463,238,91)
{
}
BEGIN_SDK
  Add(EditMulti,11152684,21,21)
  {
   Width=510
   Height=403
  }
  Add(ScrollBox,16529181,112,196)
  {
   Left=15
   Top=10
   Width=365
   Height=240
   Point(doVisible)
  }
  Add(Image,14427663,210,140)
  {
   Width=1555
   Height=2000
   ViewStyle=4
  }
END_SDK
Add(Timer,3904087,84,133)
{
 Interval=5000
 AutoStop=1
 link(onTimer,7683234:doEvent1,[])
}
Add(ChildFormEx,10074607,238,140)
{
}
BEGIN_SDK
  Add(EditMultiEx,12577962,21,21)
  {
   WorkCount=#11:doShowModal|
   link(doShowModal,2350234:doVisible,[(44,27)(44,132)])
  }
  Add(MainForm,2350234,119,91)
  {
   Left=35
   Top=105
   Visible=1
   Point(doShowModal)
   Point(doVisible)
  }
  Add(Button,1736910,63,42)
  {
   Left=155
   Top=90
   Data=String(Jgga)
   link(onClick,2783278:doText,[])
  }
  Add(Label,2783278,119,42)
  {
   Left=245
   Top=95
  }
END_SDK
Add(Hub,7683234,140,133)
{
 link(onEvent1,14053264:SSS,[])
 link(onEvent2,10074607:doShowModal,[])
}
Add(InlineCode,14053264,189,133)
{
 WorkPoints=#3:SSS|
 Code=#15:unit HiAsmUnit;|0:|9:interface|0:|29:uses windows,kol,Share,Debug;|0:|4:type|28: THiAsmClass = class(TDebug)|10:   private|0:|9:   public|37:   procedure SSS(var D:TData;i:word);|0:|5: end;|0:|14:implementation|26:procedure THiAsmClass.SSS;|5:begin|17:  ReleaseCapture;|4:end;|0:|4:end.|
}

карма: 9

Ответов: 1328

Рейтинг: 69

#14: 2007-12-03 08:40:57 ЛС | профиль | цитата

Galkov, Спасибо то что надо, только в дочерней форме на doShowModal забыл переставить

------------ Дoбавленo:

В ChildScrollBox с помощью IC можно перемещать внутреннюю картинку?

карма: 2


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