解决窗体闪烁问题

具体代码：

1.在声明窗体类时加入：

private

procedure CreateParams(var Params: TCreateParams); override;

2.在窗体实现部分加入：

procedure TFrm_Main.CreateParams(var Params: TCreateParams);

begin

inherited;

Params.ExStyle := 33554432; //0x 02 00 00 00

end;