Status bar

rbuser

Put a status bar on a form that had a ppReport1 component.

In formCreate:
Application.OnHint := DisplayHint;

procedure TReportForm1.DisplayHint(Sender: TObject);
begin
StatusBar1.Panels[0].text:= GetShortHint(Application.Hint)
end;

Click on a menu. List index out of bounds. I remove this code, and click
on a menu. Now the hint is displayed on the status bar of the main form.

What is going on?

digitalmetaphors

I think you'll need to create a panel on the status bar before you can
reference the it. You can define the panels via the Object Inspector for
the statusbar control.


Cheers,

Jim Bennett
Digital Metaphors

rbuser

Yes, you are right. Thank you.