| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

Как определить, запущено ли приложение впервые или нет?

Vasya.ru ©   (2005-01-24 14:26:00) 

Необходимо при первом запуске программы вывести окно настроек. Так как определить, чт это первый запуск на данном компьютере?

---

Weare   (2005-01-24 14:39:00) [1]

Попробуй при старте программы писать чего-нибудь в созданную тобой ветку регистра. А потом при каждом запуске проверять наличие ключа в данной ветке. Если есть такой ключ, то прога здесь уже запускалась

---

Cosinus   (2005-01-24 14:36:00) [2]

Что то типа того...
function IsAppFirst(RunName: string): Boolean;
var
  Reg: TRegistry;
begin
  Reg := TRegistry.Create;
  with Reg do
  begin
    RootKey := HKEY_LOCAL_MACHINE;
    OpenKey('Software\MyProg', False);
    Result := ValueExists(RunName);
    CloseKey;
    Free;
  end;
end;

---

Ega23   (2005-01-24 14:35:00) [3]

TRegistry + F1

---

Lord Zmiy   (2005-01-24 14:33:00) [4]

импровизируй ... сделай ини файл и храни в нем к примеру start если = 1 то запускалось если = 0 то нет

---

Vasya.ru   (2005-01-24 14:32:00) [5]

изменю вопрос: как проверить ключ реестра на существование?

---

Наверх