پاورپوینت ترفند ها در دلفی
چکیده:
محدود کردن اندازه فرم در دلفی
گاهی اوقات نیاز است فرم ما از نظر اندازه پیرو یک الگو باشد و کاربر نتواند خارج از محدوده این فرم را تغییر اندازه دهد، راهی که پیشنهاد می شود، استفاده از Windows Messages تابع WM_GetMinMaxInfo میباشد.
unit MinMax;
interface
uses
SysUtils, WinTypes, WinProcs, Messages, Classes, Graphics, Controls,
Dialogs Forms,;
type
TForm1 = class(TForm)
private
{ Private declarations }
procedure WMGetMinMaxInfo(var MSG: Tmessage); message WM_GetMinMaxInfo;
public
{ Public declarations }
end;
var
Form1: TForm1;
implementation
{$R *.DFM}
procedure TForm1.WMGetMinMaxInfo(var MSG: Tmessage);
Begin
inherited;
with PMinMaxInfo(MSG.lparam)^ do
begin
with ptMinTrackSize do
begin
X := 300;
Y := 150;
end;
with ptMaxTrackSize do
begin
X := 350;
Y := 250;
end;
end;
end;
end.
چگونه تمامی رویدادهای یک شیء را در زمان اجرا به Nil تنظیم کنیم؟
روشی را جهت اینکه تمامی رویدادهای یک شیء تعریف شده در دلفی را در زمان اجرا به Nil تنظیم کنید برای شما بازگو میکنیم. شما میتوانید از RTTIها جهت رسیدن به اهداف خود استفاده کنید اما فقط برای زمان طراحی و اجرا و این امکان برای رویدادها وجود ندارد. استفاده از RTTI، تا حدودی پیچیده است بنابراین من رویهای را برای نسبت دادن Nil به یک شیء موجود در زمان اجرای یک برنامه در دلفی آوردهام که نحوه انجام این کار را به شما نشان میدهد.