Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.04.11;
Скачать: [xml.tar.bz2];




Вниз

Создание компонент 


LazorenkoX   (2002-03-29 11:02) [0]

Я создаю компоненту (TWinControl), которая будет размещятся на форме. Как мне узнать Handle, Caption и тд. этой формы, или, если проще, как мне использовать свойства парэнтной TForm?



MBo   (2002-03-29 12:19) [1]

Parent.Handle и т.д.
если свойства, специфичные для формы, то
TForm(Paren).***



Alx2   (2002-03-29 12:32) [2]

Эти свойства так и называются: Handle, Caption.
Пусть TWinControl размещаем на "чужой" форме Form1.
Тогда Form1.Handle даст то, что нужно.
Если aWinControl:TWinControl уже размещен, но неизвестно где, то можно узнать интересующее так:
if aWinControl.Parent is TForm then
with aWinControl.Parent as TForm do
Begin
<...> := Handle;
<...> := Caption;
End;



MBo   (2002-03-29 12:37) [3]

кстати, если родителем всегда будет форма, то удобно ввести поле
FParent:TForm;



Юрий Зотов   (2002-03-29 12:56) [4]

Ох, братцы, ну что за советы?

А если юзер компонента бросит его, скажем, на панель? Или в группу? Кранты будут, однако...

А надо просто вызвать GetParentForm(Self). И все.



Alx2   (2002-03-29 13:17) [5]

>Юрий Зотов © (29.03.02 12:56)
Как говорится, зри в корень :))




Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.04.11;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.72 MB
Время: 0.03 c
1-32744           Денис_                2002-03-30 12:52  2002.04.11  
Модификация ListBox


3-32652           clarin                2002-03-19 14:24  2002.04.11  
Сортировка по вычислимому полю в TQuery


7-32998           gurin                 2002-01-18 05:18  2002.04.11  
Virtual drive


6-32937           dr0Ne64               2002-01-25 00:11  2002.04.11  
Login Юзверга


1-32742           dimonf                2002-03-29 09:39  2002.04.11  
Народ, подскажите, как мне вывести на печать TConvas Panel-и?