Текущий архив: 2003.11.13;
Скачать: CL | DM;

Вниз

Еще вопрос   Найти похожие ветки 

← →
qwe   (2003-10-28 15:44) [0]

unit UClassManager;
interface
uses
Classes;
function ClassManager: TList;
implementation
var
Manager: TList;
function ClassManager: TList;
begin
Result := Manager;
end;
initialization
Manager := TList.Create;
finalization
Manager.Free;
end.

....
var
ExporterClass: TClass;
...
ExporterClass := ClassManager[ListBox.ItemIndex];

вот последняя строка интересна что в этот момент происходит

---

← →
qwe   (2003-10-28 15:48) [1]

help

---

← →
Skier ©   (2003-10-28 15:49) [2]

> что в этот момент происходит

тоже самое что и в строке
ExporterClass := Manager[ListBox.ItemIndex];

---

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

Текущий архив: 2003.11.13;
Скачать: CL | DM;

Наверх

Память: 0.46 MB
Время: 0.022 c