Форум: "Основная";
Текущий архив: 2002.02.21;
Скачать: [xml.tar.bz2];
ВнизПомогите гарны хлопчики и дивченки Найти похожие ветки
← →
HDD (2002-02-06 02:13) [0]Как можно реализовать в текстовом редакторе последнии 5 открываемых файла.
Заранее благодарен Кирилл
← →
Mbo (2002-02-06 06:13) [1]ищи по MRU (most recent used)
← →
Андрей Сенченко (2002-02-06 10:50) [2]Вариант1. Записать в реестр - прочитать из реестра
ВАриант2. Записать в INI-ху - прочитать из INI-хи
Добавлять их в Меню красивее безусловно в рантайме
← →
Дремучий (2002-02-06 21:07) [3]в rxLib есть примеры
← →
vic_774N (2002-02-07 00:20) [4]
procedure Твоя процедура;
var
i: integer;
AllLoadFiles: integer;
MI: TMenuItem;
PM: TPopupMenu;
IniFile: TIniFile;
IniData: TStringList;
begin
for i := 0 to AllLoadFiles - 1 do begin
MI := TMenuItem.Create(Self);
PM.Items.Add(MI);
MI.Caption := IniFile.ReadString(User,IntToStr(i),"");
IniData.Append(MI.Caption);
MI.Caption := IntToStr(i)+". "+ MI.Caption;
MI.Tag := i;
MI.OnClick := FileLoadClick;
end;
end;
AllLoadFiles - твои файлы (поставь ограничение до 5)
ну а как работать с ini файлами разберешься.
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2002.02.21;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.003 c