Главная страница
    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
1-47532
Board
2002-06-27 19:12
2002.07.15
Загрузить из файла строки но до запятой


1-47411
AL2002
2002-06-30 22:14
2002.07.15
Нажития клавиш


3-47181
Dark Programmer
2002-06-17 09:48
2002.07.15
Подскажите пжлста как удалить все записи из таблицы?


1-47314
SDv-503
2002-07-01 00:17
2002.07.15
Как программно нажать на .... (+)


14-47683
esu
2002-06-17 18:50
2002.07.15
Звездные воины II





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