msn deki gibi acılan ve hep ekranda kalan ve bir sure geçtikten sonra kapanan bir form yaptım
sorunum
always on top kulanıyorum hep ekranda kalıyor ama
masa usutu göster simgesine bastıgım zaman ekrandan kalmıyor form
msn deki uyarı formu boyle değil
yani masa ustunu göster simgesimne bastıgımız zaman ekrandan kaybolmuyor
bu sıkıntıgı nasıl asabilirim?
bu komut formu hep onde tutuyor
ama masa ustu goster simgesinde ekrandan kayboluyor
SetWindowPos(Handle, HWND_TOPMOST, 0, 0, 0, 0, SWP_NOACTIVATE + SWP_NOMOVE + SWP_NOSIZE);
msn uyarı formu
Forum kuralları
Forum kurallarını okuyup, uyunuz!
Forum kurallarını okuyup, uyunuz!
Selam
- Tamamen ezber bir çözüm olduğundan direkt kod yazıcam...
- Tamamen ezber bir çözüm olduğundan direkt kod yazıcam...

Kod: Tümünü seç
private
procedure OnShowDesktop (var Msg: TWMShowWindow); message WM_SHOWWINDOW;
Kod: Tümünü seç
procedure TForm1.FormCreate(Sender: TObject);
begin
Self.FormStyle := fsStayOnTop;
end;
Kod: Tümünü seç
procedure TForm1.OnShowDesktop(var Msg: TWMShowWindow);
begin
if not Msg.Show then
Msg.Result := 0
else
inherited;
end;