(24-10-2018, 02:45 PM)h-farid كتب : [ -> ]و عليكم السلام, TdxAlertWindowManager من شركة DevExpress مكون غير مجاني.
(24-10-2018, 06:30 PM)invocker كتب : [ -> ]راح احمل devexpress واجربه
procedure TForm1.FormCreate(Sender: TObject);var R: TRect; Hauteur: Byte;begin SystemParametersInfo(SPI_GETWORKAREA, 0, @R, 0); Hauteur := Screen.Height - R.Bottom; Left := Screen.Width - Width; Top := Screen.Height - Height - Hauteur;end;