Форум: "Система";
Текущий архив: 2002.04.29;
Скачать: [xml.tar.bz2];
ВнизПодскажите что я не так сделала.... Найти похожие ветки
← →
#Dimedrol (2002-01-31 09:46) [5]Если я все правильно понял Вы пытаетесь сохранить имя Action-а
в INI-файле. Если так предлогаю следующее:
var
iIndex: Integer;
sActName: string;
INI: TIniFile;
begin
if ActionList1.ActionCount > 0 then
begin
sActName := INI.ReadString("Buttons","AddAction","");
for iIndex := 0 to ActionList1.ActionCount - 1 do
if ActionList1.Actions[iIndex].Name = sActName then
Button1.OnClick := ActionList1.Actions[iIndex].OnExecute;
end;
end;
Страницы: 1 вся ветка
Форум: "Система";
Текущий архив: 2002.04.29;
Скачать: [xml.tar.bz2];
Память: 0.43 MB
Время: 0.009 c