|
28-01-2008, 10:28
|
#1 (permalink) |
|
Banlandı
  
Üyelik tarihi: 22-11-2007
Nerden: napıcan ziyaretemi geLcen!!
Mesajlar: 0
Konular: 2724
Üye No: 11416
Ruh halim:
Rep Gücü : 0
Rep Puanı : 0
Rep Seviyesi :
 
|
Formdaki KApat Butonunu iptal etme
rocedure TForm1.FormCreate(Sender: TObject);
var hwndHandle : THANDLE; hMenuHandle : HMENU; iPos:Integer; begin hwndHandle := FindWindow(nil,PChar(Caption)); if (hwndHandle <> 0) then begin hMenuHandle := GetSystemMenu(hwndHandle, FALSE); if (hMenuHandle <> 0) then begin DeleteMenu(hMenuHandle, SC_CLOSE, MF_BYCOMMAND); iPos := GetMenuItemCount(hMenuHandle); Dec(iPos); { Make sure no errors occured i.e. -1 indicates an error } if iPos > -1 then DeleteMenu(hMenuHandle,iPos,MF_BYPOSITION); end; end; end; |
|
  
|
|
|
 |
| Bu konunun kısa yolunu aşağıdaki sitelere ekleyebilirsiniz! |
| Konu Araçları | |
| Stil | |
|
|
Benzer Konular
|
||||
| Konu | Konuyu Başlatan | Forum | Cevaplar | son Mesaj |
| Referanduma iptal talebi | Bü$Ra | Haberler | 0 | 26-10-2007 14:50 |
| Cep telefonunda 3G ihalesi iptal | Bilgisayarcı | Bilgisayar Haberleri | 0 | 19-09-2007 13:12 |
| Seyrantepe ihalesi iptal | Bü$Ra | Haberler | 0 | 01-08-2007 15:51 |
| Seyrantepe ihalesi iptal edildi | ayş€ | Haberler | 0 | 01-08-2007 15:31 |
| SEYRANTEPE’YE iPTAL SiNYALi | Bü$Ra | Haberler | 0 | 29-07-2007 08:06 |
Normal
