Динамическое 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;

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