Button in Taskbar (during preview)

jasja

Hello,

I have a simple question, and could not find the answer on the internet
and not on this forum.

I would like to have a button (or preview) in the taskbar when I preview a Report.

Is this possible?

I would somehow like to override the:


procedure TfrxPreviewForm.CreateParams(var Params: TCreateParams);
begin
inherited CreateParams(Params);
Params.ExStyle := Params.ExStyle or WS_EX_APPWINDOW; // knop in taakbalk!
end;

Any help is very welcome
Thanks
Jasja

gpi

uses frxClass, frxPreview, ComCtrls, ToolWin, Buttons;
...

procedure TForm1.ButtonClick(Sender: TObject);
begin
     ShowMessage('My Button pressed');
end;

procedure TForm1.frxReport1Preview(Sender: TObject);
var
  Button: TSpeedButton;
begin
  Button := TSpeedButton.Create(TfrxPreviewForm(frxReport1.PreviewForm).ToolBar);
  Button.Parent:=TfrxPreviewForm(frxReport1.PreviewForm).ToolBar;
  Button.Caption:='My Button';
  Button.Width:=60;
  Button.Left:=650;
  Button.OnClick:=ButtonClick;
end;