Delphi dicas

Form com sombra

// Declare o método CreateParams com protected //



protected

procedure CreateParams(var Params: TCreateParams); override;





// sobrescreve o método //

procedure TForm1.CreateParams(var Params: TCreateParams);

begin

        inherited;

        Params.WindowClass.Style := Params.WindowClass.Style or $00020000;

end;

por : Fábio Romão De Oliveira