ali_mohamadi8928
جمعه 10 اسفند 1386, 15:34 عصر
سلام دوستان .... من یک مسئله ی واقعا عجیب برام پیش اومده .... من یکسری کد رو که مربوط به API ویندوز هستن و در کتابخانه ی Windows.H قرار گرفتن رو از Delphi به VC++ تبدیل کردم .... جالب اینجاست که این کدها در Delphi به خوبی اجرا شده و جواب میدن ولی توی VC++ اجرا میشن ولی جواب نمیدن .... این کدها مربوط به پاک کردن یک Value از ریجستری ویندوز هستن ... من هم کد Delphi رو میزارم که اجرا میشه و جواب میده هم کد VC++ رو میزارم که اجرا میشه ولی جواب نمیده ( واقعا برام عجیبه ).
کد Delphi
var
key1,key2:HKEY;
begin
RegOpenKeyEx(HKEY_CURRENT_USER,'SOFTWARE\Microsoft \Windows\CurrentVersion',0,KEY_ALL_ACCESS,key1);
RegOpenKeyEx(key1,'Run',0,KEY_ALL_ACCESS,key2);
RegDeleteValue(key2,'GoldenSoft');
RegCloseKey(key2);
RegCloseKey(key1);
end;
کد VC++
HKEY key1,key2;
key1 = 0;
key2 = 0;
RegOpenKeyEx(HKEY_CURRENT_USER,"SOFTWARE\Microsoft\Windows\CurrentVersion",NULL,KEY_ALL_ACCESS, &key1);
RegOpenKeyEx(key1,"Run",NULL,KEY_ALL_ACCESS, &key2);
RegDeleteValue(key2,"GoldenSoft");
RegCloseKey(key2);
RegCloseKey(key1);
به نظرتون کد VC++ چه اشکالی داره که اجرا میشه ولی کار نمیکنه ؟؟
کد Delphi
var
key1,key2:HKEY;
begin
RegOpenKeyEx(HKEY_CURRENT_USER,'SOFTWARE\Microsoft \Windows\CurrentVersion',0,KEY_ALL_ACCESS,key1);
RegOpenKeyEx(key1,'Run',0,KEY_ALL_ACCESS,key2);
RegDeleteValue(key2,'GoldenSoft');
RegCloseKey(key2);
RegCloseKey(key1);
end;
کد VC++
HKEY key1,key2;
key1 = 0;
key2 = 0;
RegOpenKeyEx(HKEY_CURRENT_USER,"SOFTWARE\Microsoft\Windows\CurrentVersion",NULL,KEY_ALL_ACCESS, &key1);
RegOpenKeyEx(key1,"Run",NULL,KEY_ALL_ACCESS, &key2);
RegDeleteValue(key2,"GoldenSoft");
RegCloseKey(key2);
RegCloseKey(key1);
به نظرتون کد VC++ چه اشکالی داره که اجرا میشه ولی کار نمیکنه ؟؟