

Delphide Tuş İptali Nasıl Olur Ve Başlat Çubuğunun Üstünde Tutmak
-
Kardeş öncelikle programı kapatmak için öle close mlose yazılmaz.Close komutu sadece formu ekrandan siler bellekten silmez.Programı komple kapattırmak istiyosan halt; komutunu kullanıcaksın.İyi kavramak isteyenler close komutu ile kapattıktan sora Ctrl+Alt+Delete yapıp çalışan program listesine baksın.Programın Project1.exe adında hala çalıştıgını görürsünüz.Ayrıca Programını tam ekran yapmak istiyosanda aşağıdaki verdiğim kodu kullan.Önce Formuna 1 adet buton koy ve kod bölümüne halt; komutunu ekleki programı kapatabilesin.Çünki aşağıdaki verdiğim kod ile Programın tüm Kapatma,Simge durumunda küçültme vs.. düğmeleri iptal edilir.Yani program tamamıyle tam ekran olur.Oyunlardaki gibi ;Pp.
Bu Kodu Formun OnCreate yordamına yazacaksın yani aşağıdaki gibi...
procedure TForm1.FormCreate(Sender: TObject);
begin
setwindowpos(form1.Handle,hwnd_notopmost,0,0,getsystemmetrics(sm_cxscreen),getsystemmetrics(sm_cyscreen),0);
setwindowpos(form1.Handle,hwnd_topmost,0,0,getsystemmetrics(sm_cxscreen),getsystemmetrics(sm_cyscreen),swp_nomove);
setforegroundwindow(form1.Handle);
SetWindowLongA(Handle,GWL_style,WS_EX_TOOLWINDOW);
end;
Bu kadar.
Toplam Hit: 4676 Toplam Mesaj: 12