![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
TPageControl
TForumHelp © (2008-06-16 09:59:00)Здравствуйте!
Помогите пожалуйста! Как динамически добавить новую страницу вTPageControl?
TForumHelp (2008-06-16 16:48:00) [1]Спасибо)
{RASkov} (2008-06-16 13:15:00) [2]
begin
with TTabSheet.Create(PageControl1) do begin
PageControl := PageControl1;
Caption := 'New tab';
end;
end;
Это вариант без временной переменной :)
Olegz77 (2008-06-16 10:44:00) [3]
var TabSheet: TTabSheet;
begin
TabSheet := TTabSheet.Create(PageControl1);
TabSheet.PageControl := PageControl1;
TabSheet.Caption := 'New tab';
end;