Place a panel on a form. In the Object Inspector set the bevelInner
to 'bvRaised', then set the
BevelOuter to 'bvLowered'. Add this text to the Panel.Caption Starting
Browser...
Add a Timer. Double-click on the Timer and add this code:
procedure TForm1.Timer1Timer(Sender: TObject);
begin
if Panel1.Caption = '' then
begin
Panel1.Caption :=
'Starting Browser...';
end
else
begin
Panel1.Caption := '';
end
end;