Form - Transparente |
Top Previous Next |
Funcão no PUBLIC do form
procedure TForm1.CreateParams (var Params: TCreateParams); begin inherited CreateParams (Params); Params.ExStyle := Params.ExStyle or WS_EX_TRANSPARENT; end;
Obs : O nome deve ser esse mesmo(CreateParams). |