Formu ekranın sağ alttan yukarı....

[hido]

Selam,


Eskiden msn de bir mesaj veya mail geldiğinde sağ alt köşeden mesaj ekrana alttan yukarıya doğru ekrana gelirdi bununa benzer bir uygulamayı nasıl yapabilirim...

[ikra]

Hazir yapilmisi var. Tms yada suipack icerisinde olmasi lazim. Büyük ihtimal suipack.

[hido]

Tam olarak anlamadım sizden ricam biraz daha ayrıntı verir misiniz...

[ikra]

Tms ve suipack birer bilesen seti. Ihtiyacin olan sey bu bilesen setlerinden birinde mevcut. Tsuimsnpopup gibi birseydi ismi. Uzun zaman oldu, hatirlayamadim tam olarak.

[sako]

MsnPopup diye bir component var. Tavisye ederim

[G.Arkas]

MSN tarzı popup diye aratın. Muharrem abinin bu forumda bir örneği vardı.

[hido]

Yaptım fakat bu bu seferde bir türlü close dediğimde form kapatılmıyor bu konuda ne yapabilirim?

procedure TForm2.TftClick(Sender: TObject);
var
Desktop: TRect;
begin
if SystemParametersInfo(SPI_GETWORKAREA, 0, @Desktop, 0) then
begin
Form13.Left := Desktop.Right - Form13.Width;
Form13.Top := Desktop.Bottom - Form13.Height;
AnimateWindow(Form13.Handle, 1000, AW_VER_NEGATIVE or AW_SLIDE);
end;
end;