Форум: "Основная";
Текущий архив: 2004.08.01;
Скачать: [xml.tar.bz2];
ВнизРабота с плагинами Найти похожие ветки
← →
Fedor Sumkin © (2004-07-16 01:11) [0]Добрый всем вечер или ночь!?
Помогите пожайлуста разобраться, как организовать простейшую работу с плагинами. К примеру у меня в какойто папке специальный файл лежит, а мне надо что при событии ОнКриейт формы, в меню появлялись итемы. Или например много файлов и чтобы на каждый было по итему. Заранее благодарен!
← →
TUser © (2004-07-16 04:13) [1]Тут все от фантазии зависит. Обычно поставляют dll или bpl в качестве плагинов. Каждая экспортирует те ф-ции, котрые потом вызываются твоей программой.
Чтобы на файл было по итему - пробегаешся по каталогу FindFirst/FindNext"ом, на каждый найденный файл делаешь примерно так
var mi:TMenuItem;
Counter:integer;
begin
...
mi:=TMenuItem.Create;
mi.Caption:=SearchRec.Name;
mi.Tag:=Counter;
mi.OnClick:=AnyOnClick;
mi.Parent:=RarentItem;
...
end;
procedure AnyClick(Sender:TObject);
var mi:integer;
begin
mi:=(Sender as TComponent).Tag;
{Был выбран итем с тагом mi}
end;
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2004.08.01;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.04 c