Windows10の右下にアクションセンターって、ありますよね。これです、これ。 こちらに、次のプログラムで、メッセージを送れます！ procedure TMainForm.FormCreate(Sender: TObject); var dwExStyle : Cardinal; ANotification : TNotification; begin ANot…

ちなみに、同時にフォームを半透明にする処理も加えている。 unit Unit1; interface uses Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics, Vcl.Controls, Vcl.Forms, Vcl.Dialogs, Vcl.ExtCtrls, Vcl.Me…