Настройки

@Gudzik11 · Регистрация: 14.09.2011

Студворк — интернет-сервис помощи студентам

Если моя программа свёрнута в трэй при нажатии на значок правой кнопкой мышки выскакивает попменю в нём графа настройки при нажатии открывается форма2 в ней чек бокс .
Как мне сделать чтоб при установке галочки программа добавлялась в автозагрузку если нет удалялась

deathNC · 04.10.2011, 22:21

Delphi
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
function IsAutorun: Boolean;
var
  reg: TRegistry;
begin
  Result := false;
  reg := TRegistry.Create;
  reg.RootKey := HKEY_LOCAL_MACHINE;
  If Reg.OpenKey('\Software\Microsoft\Windows\CurrentVersion\Run', false) then
    begin
      If reg.ValueExists('Proga') then
        Result :=  LowerCase(reg.ReadString('Proga')) = LowerCase(ParamStr(0));
      reg.CloseKey;
    end;
  reg.Free;
end;

@AndyZorg · 05.10.2011, 01:32

Не по теме:

deathNC абалдеть... Народ что, юзать поиск не хочет? Я на этом форуме нашел сразу с ходу 2 темы:
1. Чтение ключа реестра
2. Чтение из реестра
Даже с кодом... И когда народ отвыкнет от "халявы"? Когда думать научится?

deathNC · 05.10.2011, 01:34

Не по теме:

AndyZorg, я в начале этой темы кучу ссылок дал. ТС отказался читать их, судя по тому, что тема ещё активна ;)

@Arcor · 05.10.2011, 02:30

Сообщение от AndyZorg

Даже с кодом... И когда народ отвыкнет от "халявы"? Когда думать научится?

Не по теме:

Никогда, это поколение такое, даже сравнить последние 10 лет, как молодежь изменилась... за державу обидно :(

@Gudzik11 · 05.10.2011, 19:45 **[ТС]**

кому чё обидно ? Ссылки я все прочёл которые вы мне давали . Но так как это моя первая программа и с Delphi я знаком всего лишь месяц . Ковыряю как могу .

deathNC · 06.10.2011, 13:03

Не по теме:

Gudzik11, это твоя первая программа?
Так зачем же в реестр-то лезть? Надо попроще сначала что-нибудь.
Я-то рассчитывал, что у тебя какой-нибудь опыт есть :)
Сразу сказал бы хоть, что только учишься ;)

@Gudzik11 · 09.10.2011, 08:57 **[ТС]**

А как сделать чтоб при загрузки Windows моя программа была свёрнута в трэй.

deathNC · 09.10.2011, 10:31

Тут неплохое описание: Как свернуть прогу в трей?

@Gudzik11 · 09.10.2011, 14:13 **[ТС]**

Я не правильно выразился . Как добавить в трэй я разобрался .
проблема в том что я добавил программу в авто загрузку и при загрузке windows она запускается в развёрнутом виде а мне надо чтоб запускалась в свёрнутом виде .
вычетал что можно сделать так в

OnCreate поместить
PostMessage(Handle, WM_SYSCOMMAND, SC_MINIMIZE, 1);
но проблема в том что если делать в такой способ то при загрузке Windows почему то моё окно становиться не во весь экран . Но если запускаешь с ярлыка всё работает нормально.

@Gudzik11 · 09.10.2011, 18:51 **[ТС]**

может у кого то есть какие то идеи

deathNC · 09.10.2011, 19:09

Delphi
1
ShowWindow(Handle, SW_Hide);

@Gudzik11 · 10.10.2011, 08:45 **[ТС]**

Сообщение от deathNC

Delphi
1
ShowWindow(Handle, SW_Hide);

так совсем не сворачиваться
у меня 3 формы 2 не видимых

Новые блоги и статьи Все статьи Все блоги /
Калькулятор для расчета родства russiannick 07.08.2026 1. Задача: Создать калькулятор для расчета родства. Родственных связей существует 8 ступеней, такие как: p - отец P - мать q - муж Q - жена b - брат B - сестра s - сын S - дочь	Мир по моей воле kumehtar 07.08.2026 Когда-то кажется, что всё просто. Ты весь такой светлый. Причиняешь добро. Борешься за справедливость в этом тёмном мире. Потом начинаешь замечать одну неприятную вещь. Почти каждый хороший. . .	Кредитный калькулятор Maks 05.08.2026 Решение задачи по прикладной информатике средствами 1С. Задача: Напишите приложение-калькулятор, которое помогает рассчитывать параметры кредита для аннуитетного и дифференцированного видов. . .	У нас сейчас поговорку "Опять 25" нужно переделать на "Опять +35". kumehtar 04.08.2026 С ностальгией вспоминаю времена моего детства, когда у нас и правда +25 - была максимальная температура летом. Раньше +25 °C реально казались вершиной жары, когда можно было весь день пропадать на. . .
Как ИИ начал спорить и врать (возможно почуяв опасность для себя от индустрии - уход от электроники). Hrethgir 04.08.2026 Недельный диалог, на фоне событий с НПЗ. Да, из спирта можно получать бензин, и это не сложно. Но потом в схеме я решил избавиться от насоса, при этом полностью сделав контроль подачи спирта в. . .	Термопринтер QR701 Argus19 03.08.2026 Термопринтер QR701 Купил два термопринтера QR701. На сэлф-тесте написано: Language: PC936 (GB18030). Что означает, что принтеры могут печатать только латиницу и китайские иероглифы. Так же. . .	Создание формы заимствованного документа Maks 03.08.2026 Задача: Необходимо создать собственную форму заимствованного документа. На форме должен быть реквизит "Покупатель", а также табличная часть со следующими реквизитами: - Расчетный счет покупателя. . .	Задача предоставления скидок покупателям Maks 03.08.2026 Задача: В документе "Продажи" необходимо реализовать функционал предоставления скидок покупателям. Скидка должна автоматически рассчитываться и подставляться в соответствующее поле при выборе. . .

@Gudzik11 1 / 1 / 1 Регистрация: 14.09.2011 Сообщений: 264

	Настройки 01.10.2011, 21:24. Показов 2986. Ответов 31 Метки нет (Все метки) Если моя программа свёрнута в трэй при нажатии на значок правой кнопкой мышки выскакивает попменю в нём графа настройки при нажатии открывается форма2 в ней чек бокс . Как мне сделать чтоб при установке галочки программа добавлялась в автозагрузку если нет удалялась 0

@AndyZorg
	05.10.2011, 01:32
	Не по теме: deathNC абалдеть... Народ что, юзать поиск не хочет? Я на этом форуме нашел сразу с ходу 2 темы: 1. Чтение ключа реестра 2. Чтение из реестра Даже с кодом... И когда народ отвыкнет от "халявы"? Когда думать научится? 1

deathNC
	05.10.2011, 01:34
	Не по теме: AndyZorg, я в начале этой темы кучу ссылок дал. ТС отказался читать их, судя по тому, что тема ещё активна ;) 1

@Gudzik11 1 / 1 / 1 Регистрация: 14.09.2011 Сообщений: 264
	05.10.2011, 19:45 [ТС]
	кому чё обидно ? Ссылки я все прочёл которые вы мне давали . Но так как это моя первая программа и с Delphi я знаком всего лишь месяц . Ковыряю как могу . 0

deathNC
	06.10.2011, 13:03
	Не по теме: Gudzik11, это твоя первая программа? Так зачем же в реестр-то лезть? Надо попроще сначала что-нибудь. Я-то рассчитывал, что у тебя какой-нибудь опыт есть :) Сразу сказал бы хоть, что только учишься ;) 1

@Gudzik11 1 / 1 / 1 Регистрация: 14.09.2011 Сообщений: 264
	09.10.2011, 08:57 [ТС]
	А как сделать чтоб при загрузки Windows моя программа была свёрнута в трэй. 0

deathNC 1905 / 1016 / 123 Регистрация: 08.12.2009 Сообщений: 2,792 Записей в блоге: 2
	09.10.2011, 10:31
	Тут неплохое описание: Как свернуть прогу в трей? 1

@Gudzik11 1 / 1 / 1 Регистрация: 14.09.2011 Сообщений: 264
	09.10.2011, 14:13 [ТС]
	Я не правильно выразился . Как добавить в трэй я разобрался . проблема в том что я добавил программу в авто загрузку и при загрузке windows она запускается в развёрнутом виде а мне надо чтоб запускалась в свёрнутом виде . вычетал что можно сделать так в OnCreate поместить PostMessage(Handle, WM_SYSCOMMAND, SC_MINIMIZE, 1); но проблема в том что если делать в такой способ то при загрузке Windows почему то моё окно становиться не во весь экран . Но если запускаешь с ярлыка всё работает нормально. Миниатюры 0

@Gudzik11 1 / 1 / 1 Регистрация: 14.09.2011 Сообщений: 264
	09.10.2011, 18:51 [ТС]
	может у кого то есть какие то идеи 0