Sign in Join

Live chat for Free Pascal, Lazarus, Delphi and every Pascal programmer.

Catalog · How the catalog works
Anything · Lazarus or Delphi
Random projectRandom project

FormCustomizationHelper

窗口自定义助手

View on GitHub

Member rating

No ratings yet.

Sign in to rate this project.

README

FormCustomizationHelper

窗口自定义助手

调用示例:

delphi
procedure TForm2.DoIdle(Sender: TObject; var Done: Boolean);
begin
  Self.Invalidate;
end;

procedure TForm2.FormCreate(Sender: TObject);
begin
  Application.OnIdle:= DoIdle;
  FCustomizationHelper:= TFormCustomizationHelper.Create(Self);
end;

效果图: