| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Помогите гарны хлопчики и дивченки [D6, Win2k]
HDD © (2002-02-06 02:13:00)Как можно реализовать в текстовом редакторе последнии 5 открываемых файла.
Заранее благодарен Кирилл
vic_774N (2002-02-07 00:20:00) [1]
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 файлами разберешься.
Дремучий (2002-02-06 21:07:00) [2]в rxLib есть примеры
Андрей Сенченко (2002-02-06 10:50:00) [3]Вариант1. Записать в реестр - прочитать из реестра
ВАриант2. Записать в INI-ху - прочитать из INI-хи
Добавлять их в Меню красивее безусловно в рантайме
Mbo (2002-02-06 06:13:00) [4]ищи по MRU (most recent used)
| |
