بزرگنمایی متن پیام

[seaman202008]

با سلام می خواستم پیامی که با messagdlg نشان میدهم با فونت مثلا 14 نمایش دهم

[vcldeveloper]

می تونید با CreateMessageDialog یک پنجره دایالوگ ایجاد کنید و سپس Font اش را تغییر بدید:



var
MsgBox : TForm;
....

MsgBox := CreateMessageDialog(Text,MsgType,Buttons);
try
//Change TEXT Properties
with (MsgBox.Controls[1] as Tlabel) do
begin
Font.Name := 'Arial';
Font.Style := Font.Style + [fsBOLD];
Font.Size := 12;
WordWrap := False;
ShowModal;
end;
finally
MsgBox.Free;
end;

[ghabil]

جالب بود ممنون