Скачать: CL | DM;

Динамическое TMemo   Найти похожие ветки 

← →
Pashkerton   (2005-02-15 09:57) [0]

Есть ini файл в котором описаны файлы с "текстом". Имя секции = имени файла. Получаю секции и создаю закладки в PageControl.
Файл в мемо не загружается. В чём я ошибся?

for cx := 0 to PagesCount-1 do begin
    TabSheet := TTabSheet.Create(Self);
    TabSheet.Caption := Sections.Strings[cx];
     with TMemo.Create(Self) do begin
        Parent := TabSheet;
        Align := alClient;
        Lines.LoadFromFile(Sections.Strings[cx]); {<<<<<?}
     end;
    TabSheet.PageControl := PageControl;
end;

---

← →
Александр Иванов ©   (2005-02-15 10:00) [1]

Отладчик не поможет? Например посмотреть значение Sections.Strings[cx]

---

← →
Pashkerton   (2005-02-15 10:41) [2]

Так работает!
for cx := 0 to PagesCount-1 do begin
    TabSheet := TTabSheet.Create(Self);
    TabSheet.Caption := Sections.Strings[cx];
    memo := TMemo.Create(Self);
    memo.Parent := TabSheet;
    memo.Align := alClient;
    TabSheet.PageControl := glPageControl;
    memo.Lines.LoadFromFile(Sections.Strings[cx]);
end;

---

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

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.024 c