| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

Динамическое TMemo [D6, Win2k]

Pashkerton ©   (2005-02-15 09:57:00) 

Есть 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;

---

Pashkerton   (2005-02-15 10:41:00) [1]

Так работает!
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;

---

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

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

---

Наверх