Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2007.04.01;
Скачать: CL | DM;

Вниз

Работа с реестром   Найти похожие ветки 

 
muhh   (2007-03-05 18:48) [0]

Подскажите пожалуйста как работать с реестром. Какие операции надо сделать чтобы внести туда что нибудь.
У меня конкретный пример...я хочу сделать бесплатную регистрацию своей проги. То есть как всегда вылетает окно с серийником..
Человек вбивает код и прога регистрируется.
Помогите плиз....


 
muhh   (2007-03-05 18:49) [1]

то есть в этом окне можно нажать ок..и попробывать вбить код...либо кансел...и окно исчезнет..но при следующем входе ..опять вылетит с напоминанием о регистрации


 
NiGGa[lHbs]   (2007-03-05 18:50) [2]

TRegistry ?


 
NiGGa[lHbs]   (2007-03-05 18:50) [3]

И причем серийник к реестру?


 
muhh   (2007-03-05 20:45) [4]

ну я никогда не делал такой фишки..ребята сказали что регистрация делается через реестр
был бы признателен, если поможете :)
то есть надо просто сделать регистрацию..если есть коды киньте плиз...


 
Virgo_Style ©   (2007-03-05 20:58) [5]

muhh   (05.03.07 20:45) [4]
если есть коды киньте плиз


потрут же


 
muhh   (2007-03-05 21:51) [6]

ничего не понял..почему потрут???

кинmтe тогда на мыло плизз..
muhan@inbox.ru


 
Аноним   (2007-03-05 22:07) [7]


> Человек вбивает код и прога регистрируется.


где регистрируется? В реестре чтоли?


 
IMHO ©   (2007-03-05 22:48) [8]

Вот из хэлпа для тебя скопипэйстил:

The following example shows how to tell Windows to relaunch your application when Windows starts up if it was running when the system shut down. When Windows starts up, it launches each application listed in the RunOnce key and then deletes the entry for that application.  Therefore, you do not need to remove the entry written here.

procedure TForm1.WMEndSession(var Message: TWMEndSession);
var
 Reg: TRegistry;
begin
 Reg := TRegistry.Create;
 try
   Reg.RootKey := HKEY_CURRENT_USER;
   if Reg.OpenKey("\Software\Microsoft\Windows\CurrentVersion\RunOnce", True)
   then Reg.WriteString("MyApp",""" + ParamStr(0) + """);
 finally
   Reg.CloseKey;
   Reg.Free;
   inherited;
 end;
end;

In order for this method to be called, it must be declared in the interface section of your unit as follows:

private

 procedure WMEndSession(var Msg:TWMEndSession); message WM_ENDSESSION;



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

Текущий архив: 2007.04.01;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.238 c
15-1173015018
Riply
2007-03-04 16:30
2007.04.01
Комментарии в dpr файле.


6-1161324846
frEE)styler
2006-10-20 10:14
2007.04.01
подключение через ADO к mssql server 2000


4-1163174628
SkySpeed
2006-11-10 19:03
2007.04.01
Как можно отлавливать запускаемые процессы?


1-1170835673
Krants
2007-02-07 11:07
2007.04.01
TTreeView, убрать выделение


3-1168319565
Vovan123+
2007-01-09 08:12
2007.04.01
Правильно запустить форму для проверки пароля