Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 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)
Как говорится, зри в корень :))



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

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

Наверх





Память: 0.45 MB
Время: 0.006 c
1-32802
Chistyakov
2002-04-01 10:13
2002.04.11
Как недопустить повторного запуска программы?


3-32698
kjj
2002-03-21 15:32
2002.04.11
что писать в UpdateSQL?


1-32905
vpc_
2002-03-29 23:44
2002.04.11
Как изменить системную дату на компьютере с помощью Delphi.


1-32856
Катерина
2002-03-28 09:14
2002.04.11
Гриды


1-32901
Clon
2002-03-29 20:26
2002.04.11
Необходимо реализовать Drag&Drop из TDBGrid в другой контрол...





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский