Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.05.19;
Скачать: CL | DM;

Вниз

Создание визуальных обектов   Найти похожие ветки 

 
Apachi   (2003-05-07 14:13) [0]

После того как

VForm:=TForm.Create(self);
VBoot:=TButton.Create(self);

как поместить VBoot на VForm чето неполучается
Всем спасибо!


 
Radionov Alexey ©   (2003-05-07 14:15) [1]

Vboot.Parent := VForm


 
Radionov Alexey ©   (2003-05-07 14:18) [2]


Var VForm : TForm;
VBoot : TButton;
begin
VForm := TForm.Create(Self);
VBoot := TButton.Create(VForm);
VBoot.Parent := VForm;
VForm.Show;
end;


 
Apachi   (2003-05-07 14:20) [3]

у Vboot.Parent тип TWidgetControl а у VForm тип TForm короче написал мне ошибку я это уже пробывал но всеравно спасибо !


 
Radionov Alexey ©   (2003-05-07 14:22) [4]

Apachi (07.05.03 14:20)
см. справку для TButton:
property Parent: TWinControl;

TForm - потомок TWinControl. Следовательно присваивание не должно вызвать ошибки. Либо у тебя переопределен класс TButton


 
Apachi   (2003-05-07 14:24) [5]

я компонент создаю конструктор переопределяю требуется дополнительная форма вот
constructor TDBGridAsc.Create(AOwner: TComponent);
begin
inherited Create(AOwner);
VForm:=TForm.Create(self);
VForm.Top:=10;
VForm.Left:=Round(Self.Width/6);
VForm.Height:=Self.Height-30;
VForm.Width:=Round(4*Self.Width/6);
VForm.ParentWindow:=Self.Handle;
VForm.BorderStyle:=bsToolWindow;
VBoot:=TButton.Create(self);
VBoot.Parent:=VForm;
end;


 
Apachi   (2003-05-07 14:25) [6]

Зуб даю последняя строчка это ошибка :)


 
Radionov Alexey ©   (2003-05-07 14:27) [7]

Напиши что за ошибка


 
Apachi   (2003-05-07 14:28) [8]

ааааааа мля я не тот unit подключил надо было StdCtrls а я QStdCtrls этот написал всем СОРРИ ВСЕМ СПАСИБО :)



Страницы: 1 вся ветка

Текущий архив: 2003.05.19;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.019 c
1-59698
Filat
2003-04-30 20:52
2003.05.19
Как привязать доп. форму над основной и не дать её перемещать?


4-59990
DimG
2003-03-19 16:16
2003.05.19
как отловить смену положения курсора в TEdit?


1-59714
Дима
2003-05-05 17:49
2003.05.19
Директория запуска программы.


3-59605
Анатолий
2003-04-28 14:38
2003.05.19
Копировать поле типа


1-59675
anbezr
2003-05-07 14:54
2003.05.19
Можно ли компилятор Delphi сделать критичным к регистру символов