Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2002.07.15;
Скачать: [xml.tar.bz2];

Вниз

подключить необходимый фрейм к Panel   Найти похожие ветки 

 
yakshe   (2002-07-03 18:05) [0]

Уважаемые мастера! В архиве нашел нужный мне вопрос:
Как динамически подключить необходимый фрейм к Panel: TPanel во время выполнения программы?.
Ответ такой:

var f: TFrame2;
begin
f := TFrame2.Create(Panel1);
Panel1.InsertControl(f);
end;

Никак не могу сообразить, как подключить не один, а несколько таких фреймов (по мере необходимости) в разные места TPanel ?
Например нажимаем кнопку - появляется первый фрейм, нажимаем ещё раз - второй и т.д.
Помогите пожалйста.

С Уважением, yakshe.


 
Skier   (2002-07-03 18:09) [1]

>yakshe
Пропиши этот код в событие OnClick и
будет тебе счастье.


 
yakshe   (2002-07-03 18:23) [2]

>Skier
Да я так и сделал, но при втором нажатии выдаёт ошибку "...A component named Frame2 already exists"


 
MBo   (2002-07-03 18:31) [3]

так попробуй
f := TFrame2.Create(Panel1);
f.name:="frame"+inttostr(i);
inc(i);
Panel1.InsertControl(f);


 
yakshe   (2002-07-03 22:02) [4]

>MBo
Спасибо большое. Так работает.
С Уважением, yakshe


 
yakshe   (2002-07-03 22:36) [5]

Извините, но у меня ещё маленький вопрос:
А почему, если попробовать подключить этот фрейм к панели в Disign-Time (чтобы посмотреть как будет смотреться :)) и удалить его , то потом в Run-Time при нажатии кнопки и выполнении приведённого выше кода ничего не происходит?



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

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

Наверх




Память: 0.45 MB
Время: 0.012 c
3-47137
billybons
2002-06-24 07:37
2002.07.15
SQL - запрос (синтаксис)


8-47610
Nyuk
2002-02-13 11:56
2002.07.15
DICOM ребята, кому повезет ???


1-47498
race1
2002-07-04 12:47
2002.07.15
procedure


7-47817
Sega
2002-04-17 09:12
2002.07.15
Hibernate


1-47524
Skywalker
2002-07-01 11:23
2002.07.15
Как в BCPP узнать длину динамического массива?





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский