Вверх ↑
Этот топик читают: Гость
Ответов: 49
Рейтинг: 10
#1: 2009-06-24 17:26:37 ЛС | профиль | цитата
Здравствуйте. Научите работать с контролёром страниц. Как на сделать что бы на каждой странице, были свои объекты. Что нашел в поиске непонятно и не компилируется. Пожалуйста прошу не злиться, за то что такие вопросы уже задавали.
карма: 0

0
Разработчик
Ответов: 26158
Рейтинг: 2127
#2: 2009-06-24 17:40:21 ЛС | профиль | цитата
Самый простой вариант



Add(ChildGroupBox,2775357,364,168)
{
}
BEGIN_SDK
Add(EditMulti,3862269,21,21)
{
WorkCount=1
link(doWork1,5159989:doVisible,[(28,27)(28,48)])
}
Add(GroupBox,5159989,35,42)
{
Left=30
Top=35
Width=335
Height=185
Visible=1
Caption=""
Point(doVisible)
}
Add(ListBox,13231077,112,91)
{
Left=15
Top=15
Width=305
Height=155
}
END_SDK
Add(TabControl,6956926,175,126)
{
Left=20
Top=15
Width=355
Height=225
Tabs=#5:Page1|5:Page2|5:Page3|
Bitmaps=[]
link(onChange,7580388:doOperation,[])
}
Add(MainForm,2953706,175,168)
{
}
Add(ChildGroupBox,16436793,364,210)
{
}
BEGIN_SDK
Add(EditMulti,3862269,21,21)
{
WorkCount=1
link(doWork1,5159989:doVisible,[(28,27)(28,48)])
}
Add(GroupBox,5159989,35,42)
{
Left=30
Top=35
Width=335
Height=185
Visible=1
Caption=""
Point(doVisible)
}
Add(RadioButton,4012587,154,42)
{
Left=25
Top=20
Width=105
Selected=0
}
Add(RadioButton,420824,154,84)
{
Left=25
Top=45
Width=105
}
Add(RadioButton,106685,154,126)
{
Left=25
Top=70
Width=105
}
END_SDK
Add(ChildGroupBox,8003295,364,126)
{
}
BEGIN_SDK
Add(EditMulti,3862269,21,21)
{
WorkCount=1
link(doWork1,5159989:doVisible,[(28,27)(28,48)])
}
Add(GroupBox,5159989,35,42)
{
Left=30
Top=35
Width=335
Height=185
Caption=""
Point(doVisible)
}
Add(Edit,5320323,84,42)
{
Left=20
Top=20
Width=145
}
Add(Edit,8518638,133,70)
{
Left=20
Top=45
Width=145
}
Add(Edit,12876122,161,119)
{
Left=20
Top=70
Width=145
}
Add(Edit,10615737,182,70)
{
Left=20
Top=95
Width=145
}
END_SDK
Add(IntToBits,2080325,280,126)
{
Count=3
Data_0=Integer(0)
Data_1=Integer(1)
link(onBit1,8003295:doWork1,[])
link(onBit2,2775357:doWork1,[(350,139)(350,174)])
link(onBit3,16436793:doWork1,[(338,146)(338,216)])
}
Add(Math,7580388,231,126)
{
OpType=9
Op1=1
ResultType=0
link(onResult,2080325:doBits,[])
}

карма: 22

0
Ответов: 1397
Рейтинг: 50
#3: 2009-06-24 17:43:12 ЛС | профиль | цитата
Примерно так:
code_13880.txt
карма: 0
Время верстки: %cr_time% Текущее время: %time%
0
файлы: 1code_13880.txt [1.4KB] [136]
Ответов: 49
Рейтинг: 10
#4: 2009-06-24 17:47:24 ЛС | профиль | цитата
Спасибо большое, я так и думал что без панелей не обойтись (;
карма: 0

0
Разработчик
Ответов: 4698
Рейтинг: 426
#5: 2009-06-24 17:57:02 ЛС | профиль | цитата
А можно так, без панелей, но это уже PageControl:
code_13881.txt
карма: 10
0
файлы: 1code_13881.txt [733B] [174]
Ответов: 49
Рейтинг: 10
#6: 2009-06-24 18:33:31 ЛС | профиль | цитата
Классно, вот только не компилируется не FPC не Delphi
карма: 0

0
Разработчик
Ответов: 4698
Рейтинг: 426
#7: 2009-06-24 18:36:06 ЛС | профиль | цитата
В каком смысле? Выложи текст отладки(он внизу HiAsm-а). На всякий случай, чтобы вставить его используй [code]%код%[/code]
карма: 10
0
Ответов: 49
Рейтинг: 10
#8: 2009-06-24 19:28:53 ЛС | профиль | цитата
Подготовка к сборке проекта...
Генерация кода целевого языка
Компоновка проекта...
Command line: dcc32.exe "C:\Users\DirectoryNode\Desktop\HiAsm\Elements\delphi\code\Project2.dpr" "-U C:\Users\DirectoryNode\Desktop\HiAsm\." -Q
Borland Delphi Version 12.0 Copyright (c) 1983,98 Inprise Corporation

C:\Users\DirectoryNode\Desktop\HiAsm\Elements\delphi\code\hiMainForm_1730D58.pas(87) Error: Undeclared identifier: '_prop_WinStyle'

C:\Users\DirectoryNode\Desktop\HiAsm\Elements\delphi\code\Project2.dpr(7) Fatal: Could not compile used unit 'hiMainForm_1730D58.pas'
Сборка завершена.
карма: 0

0
файлы: 1code_13884.txt [659B] [115]
Ответов: 4641
Рейтинг: 334
#9: 2009-06-24 19:39:09 ЛС | профиль | цитата
MireX, версия Hiasm какая?
карма: 1
Время верстки: %cr_time% Текущее время: %time%
0
Ответов: 49
Рейтинг: 10
#10: 2009-06-24 19:46:27 ЛС | профиль | цитата
4.01 build 175
карма: 0

0
Разработчик
Ответов: 26158
Рейтинг: 2127
#11: 2009-06-24 19:47:39 ЛС | профиль | цитата
MireX писал(а):
4.01 build 175

Вот и ответ на вопрос -- почему не запускается. На дворе уже b179
карма: 22

0
Ответов: 49
Рейтинг: 10
#12: 2009-06-24 19:50:44 ЛС | профиль | цитата
Попробую (;
карма: 0

0
Ответов: 3851
Рейтинг: 159
#13: 2009-06-24 19:58:25 ЛС | профиль | цитата
мде, ставлю PageControl, пишу в список два "класса дочерних схем" - www и eee , запускаю - вижу, что страницы действительно две, но называются они tab и tab.
Запросы типа чё за фигня не обрабатываются?

------------ Дoбавленo в 19.59:
HiAsm Studio 4.2 build 179
D4
карма: 0
начавший
0
Ответов: 4641
Рейтинг: 334
#14: 2009-06-24 20:15:55 ЛС | профиль | цитата
Андрей. писал(а):
что страницы действительно две, но называются они tab и tab

А Caption зачем тогда.??
Андрей., ты прикалываешся или я прикола не понял.??
карма: 1
Время верстки: %cr_time% Текущее время: %time%
0
Ответов: 49
Рейтинг: 10
#15: 2009-06-24 20:18:21 ЛС | профиль | цитата
Все большое спасибо, Assasin - спасибо за то что подсказал компонент PageControl
карма: 0

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