Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2005.02.06;
Скачать: [xml.tar.bz2];

Вниз

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

 
Vasya.ru ©   (2005-01-24 14:26) [0]

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


 
Vasya.ru ©   (2005-01-24 14:32) [1]

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


 
Lord Zmiy ©   (2005-01-24 14:33) [2]

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


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

TRegistry + F1


 
Cosinus ©   (2005-01-24 14:36) [4]

Что то типа того...
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;


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

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



Страницы: 1 вся ветка

Форум: "Основная";
Текущий архив: 2005.02.06;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.45 MB
Время: 0.073 c
3-1105307013
TechnoDreamer
2005-01-10 00:43
2005.02.06
Помогите разобраться с SQL запросом


3-1105067306
makz
2005-01-07 06:08
2005.02.06
Снова ХП


14-1105705510
WhiteGuy
2005-01-14 15:25
2005.02.06
Халявные com-хосты


1-1106653981
Sour Smile
2005-01-25 14:53
2005.02.06
Две иконки в exe


1-1106322651
redlord
2005-01-21 18:50
2005.02.06
проблемы после переустановки делфи





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский