Facebook'ta Paylaş
Tweetle
Google Plus'ta Paylaş

Programı Başlangıca Yazmak

0
Konuyu Beğen
0
#1
PHP Kod:
PHP Kod:
// Başlangıçta başlatmak için Registry'e yazar
procedure RunOnStartup(value:string);
var 
R:Tregistry;
begin
R
:=TRegistry.Create;
R.RootKey:=HKEY_LOCAL_MACHINE;
R.OpenKey('\\Software\\Microsoft'
 
  '\\Windows\\CurrentVersion\\Run',false);
 
R.WriteString(value,application.exename);
 
 R.CloseKey;
R.free;
end;

// Az önce yazdığımız değeri silmek istersek:
procedure DoNotRunOnStartup(value:string);
var 
R:Tregistry;
begin
R
:=TRegistry.Create;
R.RootKey:=HKEY_LOCAL_MACHINE;
R.OpenKey('\\Software\\Microsoft'
 
  '\\Windows\\CurrentVersion\\Run',false);
if 
R.ValueExists(valuethen
R
.DeleteValue(value); 
 
 R.CloseKey;
R.free;
end


    Programı Başlangıca Yazmak
Bu konuyu görüntüleyen kullanıcı(lar): 1 Ziyaretçi



Bu Konudaki Mesajlar
Programı Başlangıca Yazmak - tarafından Karayel - 17-05-2017, Saat: 16:26