Форум: "Основная";
Текущий архив: 2002.04.04;
Скачать: [xml.tar.bz2];
ВнизКТО НИБУДЬ!!! ВОПРОС!!! Найти похожие ветки
← →
Sound (2002-03-23 01:46) [0]Есть код (NewMemo:TfsMemo;NewTabSheet:TTabSheet) котороый конструирует новые TabSheet"ы в которых находятся Memo:
// Если Количество страниц не превышает допустимое
if PageControl1.PageCount<50 then
begin
NewTabSheet:=TTabSheet.Create(PageControl1);
NewTabSheet.PageControl:=PageControl1;
NewTabSheet.Caption:="Untitled"+IntToStr(PageControl1.PageCount);
NewTabSheet.Show;
NewMemo:=TfsMemo.Create(fsMemo1);
NewMemo.Parent:=NewTabSheet;
NewMemo.Align:=alClient;
NewMemo.ScrollBars:=ssBoth;
NewMemo.WordWrap:=false;
end;
Вопрос: Как обратится к Memo на активной странице ( PageControl1.ActivePage)?
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2002.04.04;
Скачать: [xml.tar.bz2];
Память: 0.43 MB
Время: 0.005 c