Модераторы: Poseidon, Snowy, bems, MetalFan
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Смена пользователя в Windows, Отследить 
:(
    Опции темы
SlaUr
Дата 19.10.2006, 12:57 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 408
Регистрация: 18.9.2003

Репутация: 3
Всего: 5
Вообщем мне нужно каждый раз при смене пользователя в Windows запускать свою программу , как определить что я зашел под другим пользователем?
пробовал засовывать программу в
HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Run
- не помогает
PM MAIL   Вверх
Snowy
Дата 19.10.2006, 13:03 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Модератор
Сообщений: 11363
Регистрация: 13.10.2004
Где: Питер

Репутация: 192
Всего: 484
А кем ты собрался следить, если твоя программа не запущена?
Если запущена, то WM_USERCHANGED.

Цитата(SlaUr @  19.10.2006,  12:57 Найти цитируемый пост)
HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Run- не помогает
Не могет такого быть.
Может неправильно прописываешь?
Или не тому юзеру?
PM MAIL   Вверх
SlaUr
Дата 20.10.2006, 07:28 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 408
Регистрация: 18.9.2003

Репутация: 3
Всего: 5
HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Run
запускается один раз 
при повторном измененении пользователя - уже не запускается :-(

вообще -то мне нужно следующее :
при изменении пользователя ,менять разрешение экрана.
Может есть готовое решение?


Код

WM_USERCHANGED

не хочется чтобы программа постоянно работала ..




Это сообщение отредактировал(а) SlaUr - 20.10.2006, 07:36
PM MAIL   Вверх
Akella
Дата 20.10.2006, 08:44 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Творец
****


Профиль
Группа: Модератор
Сообщений: 18485
Регистрация: 14.5.2003
Где: Корусант

Репутация: 36
Всего: 329
Цитата(SlaUr @  20.10.2006,  07:28 Найти цитируемый пост)
HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Run

определяется для конкретного пользователя, ты себе поставил программу в автозапуск, а вновьсозданному...

Я бы на твоём месте поставил программу в общий автозапук, он для того и предназначаен.
PM MAIL   Вверх
SlaUr
Дата 20.10.2006, 10:05 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 408
Регистрация: 18.9.2003

Репутация: 3
Всего: 5
общий автозаапуск IMHO  выполняется один раз а мне нужно изменять разрешение  экрана при каждом переходе на пользователя ...




Это сообщение отредактировал(а) SlaUr - 20.10.2006, 10:08
PM MAIL   Вверх
Nicholas_S
Дата 20.10.2006, 10:40 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 486
Регистрация: 12.10.2006
Где: Санкт-Петербург

Репутация: 1
Всего: 19
Пропиши в раздел "Автозагрузка" ("Startup").


--------------------
...все в мире относительно
PM   Вверх
SlaUr
Дата 20.10.2006, 18:35 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 408
Регистрация: 18.9.2003

Репутация: 3
Всего: 5
Nicholas_S, в понедельник попробую ...
PM MAIL   Вверх
Sunvas
Дата 20.10.2006, 21:06 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Соль и сахар
****


Профиль
Группа: Участник
Сообщений: 3388
Регистрация: 12.3.2006
Где: Тосно

Репутация: 28
Всего: 89
Цитата(SlaUr @  20.10.2006,  07:28 Найти цитируемый пост)
не хочется чтобы программа постоянно работала ..

Ну, а если пользователь в Пуск-Завершения сеанса ххх нажмет кнопку смена пользователя а не выход??
Если хочешь отследить именно смену пользователя а не запуск оболочки, то программа должна быть всегда запущена.


--------------------
Воспитывая детей по своему образу и подобию, родители почему-то надеются, что они будут лучше их.
PM MAIL   Вверх
DarlkElfTen
Дата 21.10.2006, 16:39 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Бывалый
*


Профиль
Группа: Участник
Сообщений: 153
Регистрация: 16.3.2006

Репутация: нет
Всего: 1
Цитата

HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Run


кхм, прога прописывается только для одного юзера...юз локал машин и пусть прога смотрит елси произошла смена юзера..или вообсче на изменеие ника реагировать через промежутока времени smile 
--------------------
"Две башни"
PM MAIL ICQ   Вверх
SlaUr
Дата 23.10.2006, 13:29 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 408
Регистрация: 18.9.2003

Репутация: 3
Всего: 5
Не могу поймать сообщение WM_USERCHANGED
Сделал простой тест и он не работает:
Код

unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs,Registry;

type
  TForm1 = class(TForm)
    procedure FormCreate(Sender: TObject);
  private
     procedure WMUserChanged(var a:TMessage); message WM_UserChanged;

    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}
procedure TfORM1.WMUserChanged(var a:TMessage);
begin
ShowMessage('Событие UserChanged');
end;


procedure TForm1.FormCreate(Sender: TObject);
VAR R:  TRegistry;
begin
IF PARAMSTR(1)='inst'  then
begin
r:=TRegistry.Create;
R.RootKey:=HKEY_LOCAL_MACHINE;
R.OpenKey('Software\Microsoft\Windows\CurrentVersion\Run',True);
r.WriteString('MyScreens',Paramstr(0));
R.CloseKey;
Halt;
end;
end;

end.




Что делаю не так?
PM MAIL   Вверх
  
 Ответ в темуСоздание новой темы Создание опроса
Правила форума "Delphi: Общие вопросы"
SnowyMetalFan
bemsPoseidon
Rrader

Запрещается!

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делиться вскрытыми компонентами

  • Литературу по Дельфи обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Вопросы по реализации алгоритмов рассматриваются здесь
  • 90% ответов на свои вопросы можно найти в DRKB (Delphi Russian Knowledge Base) - крупнейшем в рунете сборнике материалов по Дельфи

Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Snowy, MetalFan, bems, Poseidon, Rrader.
 
1 Пользователей читают эту тему (1 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Delphi: Общие вопросы | Следующая тема »

Подписаться на тему | Подписка на этот форум | Скачать/Распечатать тему


 




[ Время генерации скрипта: 0.0536 ]   [ Использовано запросов: 21 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
 По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.