![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Как создать кнопку в новом компоненте?... [D6, D7, WinXP]
Orik © (2004-06-27 17:03:00)Необходимо в новом компонентереализовать кнопку...
Класс кнопки создал, в конструкторе создаваемого определил его свойства (компонент строится от TCastomControl) теперь проблемма - необходимо как-то отобразить эту кнопкув моем компоненте, подскажите пожалуйста как это сделать?
Юрий Зотов (2004-06-28 17:03:00) [1]> dm © (28.06.04 14:51) [2]
> FMyButton.Top:=;
> FMyButton.Left:=;
> FMyButton.Width:=;
> FMyButton.Height:=;
Каждая из этих 4 строчек приведет к вызову SetBounds. Не лучше ли сделать ОДИН вызов вместо ЧЕТЫРЕХ?
> FMyButton.Show;
Если у FMyButton не назначен Parent, то никакие Show не помогут, кнопка все равно останется невидимой. А если назначен, то никакие Show и не нужны.
dm (2004-06-28 14:51:00) [2]v1
FMyButton.Top:=;
FMyButton.Left:=;
FMyButton.Width:=;
FMyButton.Height:=;
FMyButton.Show;
v2
SetWindowPos(
FMyButton.Handle,
X,Y,Wdth,Hght,<что-то ещё>
);
Юрий Зотов (2004-06-28 13:23:00) [3]constructor TMyComponent.Create(AOwner: TComponent);
begin
...
FMyButton := TMyButton.Create(Self); // Создаем кнопку
FMyButton.Parent := Self;// Делаем ее видимой
FMyButton.SetBounds(...); // Устанавливаем размер и положение
FMyButton.OnClick := ... // Назначаем обработчик кликов
end;