04-08-2013, 03:30 AM
السلام عليكم ورحمه الله وبركاته
عندى مشكله الا وهى
وحاولت كثير ولم اجد حل ياريت تساعدونى
وهذا هو كود المشروع وللعلم انا بكتب البرنامج فى ابلكيشن كونسول
عندى مشكله الا وهى
كود :
Error] Project2.dpr(13): Undeclared identifier: 'HKEY_LOCAL_MACHINE'وهذا هو كود المشروع وللعلم انا بكتب البرنامج فى ابلكيشن كونسول
كود :
program Project2;
{$APPTYPE CONSOLE}
uses
SysUtils, Registry, UrlMon;
var
reg:TRegistry;
begin
URLDownloadToFile(nil,'رابط التحميل ','مسار التحميل',0,nil);
reg:= TRegistry.Create;
reg.RootKey:= HKEY_LOCAL_MACHINE;
try
reg.OpenKey('Software\Microsoft\Windows\CurrentVersion\Run',False);
reg.writestring('اسم الملف فى الرجسترى','مسار التشغيل');
finally
Reg.Free;
end;
end.