频道分类

delphi 右下角滑动消息窗口

作者:admin 来源: 日期:2020/4/13 13:51:05 人气: 标签:

 
uses FoxmailMsgFrm;
//调用
procedure TForm1.Button1Click(Sender: TObject);
begin
ShowInfo('信息');
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
ShowWarning('信息');
end;

procedure TForm1.Button3Click(Sender: TObject);
begin
ShowError('信息');
end;

procedure TForm1.Button4Click(Sender: TObject);
begin
ShowSysMsg('信息');
end;





FoxmailMsgFrm.pas 单元文件下载

上一篇:delphi 屏幕DPI计算下一篇:没有资料