可爱的 CreateMessageDialog
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls;
type
TForm1 = class(TForm)
Button1:
原创
2021-04-30 23:54:59
221阅读
with CreateMessageDialog(Messaggio,TipoDialogo,BottVisualizzati)
do try
Caption := 'This is a new persoanal dialog';
Color := clAqua;
Font.Color := clRed;
Width := 250;
ShowModal;
finally
Free;
end;
原创
2021-07-29 15:25:46
1268阅读
对话框是用户与应用程序交换信息的最佳途径之一。使用对话框函数或过程可以调用Delphi 的内部对话框，这种方法具有操作简单及快速的特点。Delphi 提供的内部对话框有如下两种。第一种:信息输出对话框。包括 ShowMessage 过程、ShowMessageFmt 过程、MessageDlg函数、MessageDlgPos 函数和 CreateMessageDialog 函数. 第二
转载
2024-06-08 19:33:56
201阅读
