我用DELPHI写了一个过程,怎么在点按钮时触发?
来源:百度知道 编辑:UC知道 时间:2024/06/03 21:08:31
procedure SetSystemEnvironmentVariable(const name, value: string);
var
rv: DWORD;
begin
with TRegistry.Create do
try
RootKey := HKEY_LOCAL_MACHINE;
OpenKey('SYSTEM\CurrentControlSet\Control\Session ' +
'Manager\Environment', False);
WriteString(name, value);
SendMessageTimeout(HWND_BROADCAST, WM_SETTINGCHANGE, 0, LParam
(PChar('Environment')), SMTO_ABORTIFHUNG, 5000, rv);
finally
Free
end.
end;
------------------------------------------------------------
这个过程,我应该在Button1Click事件里写什么来调用它呀?
不是uses SetSystemEnvironmentVariable('aa','aa');这样吗
var
rv: DWORD;
begin
with TRegistry.Create do
try
RootKey := HKEY_LOCAL_MACHINE;
OpenKey('SYSTEM\CurrentControlSet\Control\Session ' +
'Manager\Environment', False);
WriteString(name, value);
SendMessageTimeout(HWND_BROADCAST, WM_SETTINGCHANGE, 0, LParam
(PChar('Environment')), SMTO_ABORTIFHUNG, 5000, rv);
finally
Free
end.
end;
------------------------------------------------------------
这个过程,我应该在Button1Click事件里写什么来调用它呀?
不是uses SetSystemEnvironmentVariable('aa','aa');这样吗
SetSystemEnvironmentVariable('aa','aa');
就可以了
如果这个过程没有声明
把这个过程写在按钮事件的上面
应该是
一步登天的天才啊,过程都会写了,还不会调用?
用delphi写计算器
关于Delphi的一个过程函数请教!
我写了一个简单的Delphi登陆代码,登陆进去过后,主窗体出来了,登陆窗体没有消失,是怎么回事,请高手看看!
再vc里面写了一个dll文件,再delphi调用应该怎么办
我用delphi编了一个服务器,使用了一个按键来断开服务器,请问应该怎么做
delphi一行写不下了如何换行
用 delphi写个程序把SQLserver一个表中的数据逐行写入txt文件
用DELPHI写一个代码,将EXCEL文件读取成TXT文本
为什么我用Delphi写的程序在我自己的XP系统下能用,换了一台同样是XP的系统就不能用了!!???
求求帮我写一个班会的过程