Ошибка в "PageControl" ?

Вверх ↑

Форумы Ошибки в компонентахОшибка в "PageControl" ? ← Ctrl12Ctrl →

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

Ответов: 98

Рейтинг: 1

#1: 2016-04-13 10:38:53 ЛС | профиль | цитата

Заметил, что компонент не выдает данные по нижним точкам
code_37191.txt

Сборка Hiasm от CriDos

карма: 0

файлы: 1

code_37191.txt [561B] [777]

Гость

Ответов: 17029

Рейтинг: 0

#2: 2016-04-13 10:51:59 правка | ЛС | профиль | цитата

Редактировалось 10 раз(а), последний 2024-03-29 01:09:36

карма: 0

Ответов: 98

Рейтинг: 1

#3: 2016-04-15 09:00:32 ЛС | профиль | цитата

г. ость писал(а):

Ага, спасибо!

карма: 0

Ответов: 233

Рейтинг: 12

#4: 2016-09-09 16:44:16 ЛС | профиль | цитата

Точка onChange выдает событие только при выборе последней вкладки, на остальные никакой реакции. Можно это как то исправить?

карма: 2

Разработчик

Ответов: 26149

Рейтинг: 2127

#5: 2016-09-09 18:01:03 ЛС | профиль | цитата

Iliya писал(а):

Где?

Схема

Add(MainForm,16210424,245,119)
{
}
Add(PageControl,7034739,245,161)
{
 Childrens=#1:1|1:2|1:3|1:4|
 Selected="base"
 link(onChange,2817064:doEvent,[])
}
BEGIN_SDK
  Add(EditPolyMulti,6795868,21,21)
  {
   EventCount=#8:onChange|
  }
  Add(PagePanel,12628223,35,98)
  {
   Left=35
   Top=105
   Point(onChange)
   link(onChange,6795868:onChange,[(74,104)(74,27)])
  }
END_SDK
BEGIN_SDK
  Add(EditPolyMulti,12589203,21,21)
  {
   EventCount=#8:onChange|
  }
  Add(PagePanel,2049967,35,105)
  {
   Left=35
   Top=105
  }
END_SDK
BEGIN_SDK
  Add(EditPolyMulti,8892139,21,21)
  {
   EventCount=#8:onChange|
  }
  Add(PagePanel,12119454,35,105)
  {
   Left=35
   Top=105
  }
END_SDK
BEGIN_SDK
  Add(EditPolyMulti,12540846,21,21)
  {
   EventCount=#8:onChange|
  }
  Add(PagePanel,15522021,35,105)
  {
   Left=35
   Top=105
  }
END_SDK
BEGIN_SDK
  Add(EditPolyMulti,36204,21,21)
  {
   EventCount=#8:onChange|
  }
  Add(PagePanel,3682387,35,105)
  {
   Left=35
   Top=105
  }
END_SDK
Add(Debug,2817064,308,161)
{
}

Редактировалось 2 раз(а), последний 2016-09-09 23:14:47

карма: 22

Ответов: 16884

Рейтинг: 1239

#6: 2016-09-10 07:46:26 ЛС | профиль | цитата

nesco, а это :

Схема

Add(MainForm,2953706,56,98)
{
 Width=557
 Height=296
}
Add(ChanelToIndex,6086430,168,98)
{
 link(onIndex,668848:doVisible,[])
}
Add(PageControl,668848,231,98)
{
 Height=200
 Align=2
 Childrens=#1:1|1:2|1:3|1:4|1:5|1:6|
 Selected="base"
 Buttons=0
 Point(doVisible)
}
BEGIN_SDK
  Add(EditPolyMulti,7338538,21,21)
  {
   WorkCount=#9:doVisible|
   link(doVisible,13263930:doVisible,[(28,27)(28,34)])
  }
  Add(PagePanel,13263930,49,28)
  {
   Top=-5
   Width=535
   Height=190
   Point(doVisible)
  }
END_SDK
BEGIN_SDK
  Add(EditPolyMulti,14585266,21,21)
  {
   WorkCount=#9:doVisible|
  }
  Add(PagePanel,228418,35,105)
  {
   Left=35
   Top=105
  }
END_SDK
BEGIN_SDK
  Add(EditPolyMulti,6302882,21,21)
  {
   WorkCount=#9:doVisible|
  }
  Add(PagePanel,15471720,35,105)
  {
   Left=35
   Top=105
  }
END_SDK
BEGIN_SDK
  Add(EditPolyMulti,4159672,21,21)
  {
   WorkCount=#9:doVisible|
  }
  Add(PagePanel,10981776,35,105)
  {
   Left=35
   Top=105
  }
END_SDK
BEGIN_SDK
  Add(EditPolyMulti,14863897,21,21)
  {
   WorkCount=#9:doVisible|
  }
  Add(PagePanel,13897324,35,105)
  {
   Left=35
   Top=105
  }
END_SDK
BEGIN_SDK
  Add(EditPolyMulti,11548732,21,21)
  {
   WorkCount=#9:doVisible|
  }
  Add(PagePanel,1401424,35,105)
  {
   Left=35
   Top=105
  }
END_SDK
BEGIN_SDK
  Add(EditPolyMulti,9372108,21,21)
  {
   WorkCount=#9:doVisible|
  }
  Add(PagePanel,13398168,35,105)
  {
   Left=35
   Top=105
  }
END_SDK
Add(Button,9321000,98,98)
{
 Left=95
 Top=220
 Width=100
 Caption="Скрыть"
 Data=Integer(0)
 link(onClick,6086430:doWork1,[])
}
Add(Button,14372342,98,147)
{
 Left=205
 Top=220
 Width=100
 Caption="Показать"
 Data=Integer(1)
 link(onClick,6086430:doWork2,[(149,153)(149,111)])
}

Редактировалось 6 раз(а), последний 2016-09-10 09:05:04

карма: 25

Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!

Разработчик

Ответов: 26149

Рейтинг: 2127

#7: 2016-09-10 11:38:40 ЛС | профиль | цитата

Tad писал(а):

а это

А это -- к Автору компонента. Похоже, что Visible в этом компоненте вообще не работает.

карма: 22

Ответов: 16884

Рейтинг: 1239

#8: 2016-09-10 11:47:47 ЛС | профиль | цитата

nesco писал(а):

А это -- к Автору компонента. Похоже, что Visible в этом компоненте вообще не работает.

Не только.
Color тоже для комплекта.
Хорошо, обратимся к Автору.

Дай пример с ChildPanelPoly (как автор)

карма: 25

Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!

Разработчик

Ответов: 26149

Рейтинг: 2127

#9: 2016-09-10 12:16:20 ЛС | профиль | цитата

Tad писал(а):

Дай пример с ChildPanelPoly

Схема


Add(MainForm,2953706,63,112)
{
 Width=454
 link(onCreate,6481724:doEnum,[])
}
Add(ChildPanelPoly,3097703,280,126)
{
 Childrens=#1:1|1:2|1:3|
 Selected="base"
 WorkScheme=1
}
BEGIN_SDK
  Add(EditPolyMulti,2037483,21,21)
  {
   WorkCount=#5:##add|7:Visible|5:Color|
   Point(##add)
   link(Visible,7392687:doVisible,[(74,34)(74,69)])
   link(Color,7392687:doColor,[(67,41)(67,76)])
  }
  Add(Panel,7392687,84,56)
  {
   Width=350
   Height=160
   Color=12632256
   Point(doVisible)
   Point(doColor)
  }
END_SDK
BEGIN_SDK
  Add(EditPolyMulti,6937023,21,21)
  {
   WorkCount=#5:##add|7:Visible|5:Color|
   Point(##add)
  }
  Add(Panel,16471763,70,49)
  {
   Left=5
   Top=5
   Width=350
   Height=160
  }
END_SDK
BEGIN_SDK
  Add(EditPolyMulti,9799945,21,21)
  {
   WorkCount=#5:##add|7:Visible|5:Color|
   Point(##add)
   link(##add,6070836:doData,[(39,27)(39,76)])
  }
  Add(Panel,7575610,140,63)
  {
   Left=5
   Top=5
   Width=350
   Height=160
   Point(doLeft)
   Point(doTop)
  }
  Add(DoData,6070836,49,70)
  {
   Data=Integer(10)
   link(onEventData,5860688:doEvent1,[])
  }
  Add(Hub,5860688,105,70)
  {
   link(onEvent1,7575610:doLeft,[])
   link(onEvent2,7575610:doTop,[])
  }
END_SDK
BEGIN_SDK
  Add(EditPolyMulti,9689318,21,21)
  {
   WorkCount=#5:##add|7:Visible|5:Color|
   Point(##add)
   link(##add,6070836:doData,[(46,27)(46,69)])
  }
  Add(Panel,7575610,147,56)
  {
   Left=5
   Top=5
   Width=350
   Height=160
   Point(doLeft)
   Point(doTop)
  }
  Add(DoData,6070836,56,63)
  {
   Data=Integer(15)
   link(onEventData,5860688:doEvent1,[])
  }
  Add(Hub,5860688,112,63)
  {
   link(onEvent1,7575610:doLeft,[])
   link(onEvent2,7575610:doTop,[])
  }
END_SDK
Add(StrList,13369267,133,56)
{
 Strings=#1:1|1:2|1:3|
}
Add(ArrayEnum,6481724,147,126)
{
 link(onItem,3097703:##add,[])
 link(Array,13369267:Array,[])
}
Add(Button,15341662,147,189)
{
 Left=105
 Top=225
 TabOrder=-1
 Caption="Hide"
 link(onClick,13481194:doWork1,[])
}
Add(Button,8206157,147,231)
{
 Left=165
 Top=225
 TabOrder=-1
 Caption="Show"
 link(onClick,13481194:doWork2,[(186,237)(186,202)])
}
Add(ChanelToIndex,13481194,203,189)
{
 link(onIndex,3097703:Visible,[(242,195)(242,139)])
}
Add(Button,7350076,147,273)
{
 Left=225
 Top=225
 TabOrder=-1
 Caption="Color"
 link(onClick,6591482:doOpen,[])
}
Add(ColorDialog,6591482,203,273)
{
 link(onSelect,3097703:Color,[(249,279)(249,146)])
}

карма: 22

Голосовали: Tad

Ответов: 16884

Рейтинг: 1239

#10: 2016-09-15 19:31:59 ЛС | профиль | цитата

Нельзя на страницу помещать такую конструкцию


Add(StringTable,251504,91,56)
{
 Left=90
 Top=45
 Align=5
 Columns=#1:1|1:2|1:3|1:4|1:5|
 Grid=0
 Point(onDblClick)
 link(onDblClick,13774792:doCompare,[])
}
Add(If_else,13774792,147,63)
{
 Op2=Integer(1)
 link(onTrue,7890279:doPopupHere,[])
}
Add(PopupMenu,7890279,210,63)
{
 Menu=#8:Добавить|13:Редактировать|7:Удалить|
}

карма: 25

Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!

Разработчик

Ответов: 26149

Рейтинг: 2127

#11: 2016-09-15 19:47:01 ЛС | профиль | цитата

Tad писал(а):

Нельзя на страницу помещать такую конструкцию

Чсзать -- не понял, а в чем подвох?

карма: 22

Ответов: 16884

Рейтинг: 1239

#12: 2016-09-15 21:05:47 ЛС | профиль | цитата

Не переваривает PopUpMenu в странице.
Программа вылетает так, что мелкомягкие предлагают свою помощь.
Убираешь PopUpMenu - все работает.

карма: 25

Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!

Разработчик

Ответов: 26149

Рейтинг: 2127

#13: 2016-09-15 22:36:00 ЛС | профиль | цитата

Tad писал(а):

Не переваривает PopUpMenu в странице.

Давай свою схему. А то я создал страницу в PageControl-e, кинул на нее твою схему, сделал двойной клик ПКМ, и... Ничего не произошло, нормально вызвалось меню, без всяких приколов. Наверное я чего-то не догоняю в твоих приколах.

Редактировалось 2 раз(а), последний 2016-09-15 22:38:16

карма: 22

Ответов: 16884

Рейтинг: 1239

#14: 2016-09-16 07:59:10 ЛС | профиль | цитата

Схема

Add(MainForm,2953706,21,105)
{
}
Add(PageControl,13419372,77,105)
{
 Childrens=#1:1|1:2|1:3|
 Selected="2"
}
BEGIN_SDK
  Add(EditPolyMulti,7441193,21,21)
  {
  }
  Add(PagePanel,12198348,35,105)
  {
   Left=35
   Top=105
  }
END_SDK
BEGIN_SDK
  Add(EditPolyMulti,798162,21,21)
  {
  }
  Add(PagePanel,16751909,35,105)
  {
   Left=35
   Top=105
  }
END_SDK
BEGIN_SDK
  Add(EditPolyMulti,516712,21,21)
  {
  }
  Add(PagePanel,6899692,35,105)
  {
   Left=35
   Top=105
  }
  Add(StringTable,7303198,84,49)
  {
   Left=80
   Top=45
   Align=5
   Columns=#1:1|1:2|1:3|1:4|
   Grid=0
   Point(onDblClick)
   link(onDblClick,610022:doCompare,[])
  }
  Add(If_else,610022,133,56)
  {
   Op2=Integer(1)
   link(onTrue,12641469:doPopupHere,[])
  }
  Add(PopupMenu,12641469,203,56)
  {
   Menu=#8:Добавить|8:Изменить|7:Удалить|
  }
END_SDK
BEGIN_SDK
  Add(EditPolyMulti,13585284,21,21)
  {
  }
  Add(PagePanel,9082253,35,105)
  {
   Left=35
   Top=105
  }
END_SDK

Схема 2 (не работают компоненты Data_Source)

Add(MainForm,2953706,63,105)
{
 Point(onClose)
 link(onCreate,13768333:doOpen,[])
 link(onClose,13768333:doClose,[])
}
Add(PageControl,13419372,182,168)
{
 Childrens=#1:1|1:2|1:3|
 Selected="2"
}
BEGIN_SDK
  Add(EditPolyMulti,7441193,21,21)
  {
  }
  Add(PagePanel,12198348,35,105)
  {
   Left=35
   Top=105
  }
END_SDK
BEGIN_SDK
  Add(EditPolyMulti,798162,21,21)
  {
  }
  Add(PagePanel,16751909,35,105)
  {
   Left=35
   Top=105
  }
END_SDK
BEGIN_SDK
  Add(EditPolyMulti,516712,21,21)
  {
   Width=405
  }
  Add(PagePanel,6899692,35,105)
  {
   Left=35
   Top=105
  }
  Add(StringTable,7303198,252,91)
  {
   Left=80
   Top=45
   Align=5
   Columns=#1:1|1:2|
   Grid=0
   Point(onDblClick)
   link(onDblClick,610022:doCompare,[])
  }
  Add(If_else,610022,301,98)
  {
   Op2=Integer(1)
   link(onTrue,12641469:doPopupHere,[])
  }
  Add(DSC_Query,4782005,140,91)
  {
   SQL="SELECT * From test;"
   DSManager="parent.my"
   link(onQuery,3419646:doStr,[])
  }
  Add(MT_String,3419646,203,91)
  {
   link(onResult,7303198:doAdd,[])
  }
  Add(Button,12157886,91,91)
  {
   Left=275
   Top=15
   link(onClick,4782005:doQuery,[])
  }
  Add(PopupMenu,12641469,357,98)
  {
   Menu=#8:Добавить|8:Изменить|7:Удалить|
  }
END_SDK
BEGIN_SDK
  Add(EditPolyMulti,13585284,21,21)
  {
  }
  Add(PagePanel,9082253,35,105)
  {
   Left=35
   Top=105
  }
END_SDK
Add(DS_SQLite,13768333,126,119)
{
 Name="my"
 FileName=":memory:"
 link(onOpen,1966977:doExec,[])
}
Add(DSC_Exec,1966977,182,119)
{
 SQL="CREATE TABLE test(id INTEGER PRIMARY KEY, name);\r\nINSERT INTO test values(NULL,'Иванов');\r\nINSERT INTO test values(NULL,'Петров');\r\nINSERT INTO test values(NULL,'Сидоров');\r\nINSERT INTO test values(NULL,'Козлов');"
 DSManager="my"
}

Редактировалось 4 раз(а), последний 2016-09-16 09:25:10

карма: 25

Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!

Разработчик

Ответов: 26149

Рейтинг: 2127

#15: 2016-09-16 11:04:27 ЛС | профиль | цитата

Первая схема у меня не вызывает никакой ошибки, и меню вызывается успешно. Вторая действительно выдает ошибку.

Редактировалось 1 раз(а), последний 2016-09-16 11:20:15

карма: 22

Форумы Ошибки в компонентахОшибка в "PageControl" ? ← Ctrl12Ctrl →


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