为什么我在状态栏的进度条,显示的时候会把第一个PANEL的字给隐藏进度条完成后才会恢复??? ( 积分: 5 )

  • 主题发起人 主题发起人 龙之天涯
  • 开始时间 开始时间

龙之天涯

Unregistered / Unconfirmed
GUEST, unregistred user!
procedure TfrmXzxc.ReadProgress(TabSheet : Integer);
var
i : integer;
begin
PbrPreview := TProgressBar.Create(nil);
PbrPreview.BorderWidth:=0;
PbrPreview.Parent := RzStatusBar1;
PbrPreview.Left := RzFieldStatus2.Left;
PbrPreview.Width := RzFieldStatus2.Width ;
PbrPreview.Height := RzStatusBar1.Height-1;
PbrPreview.Top := 0;
end;
 
procedure TfrmXzxc.ReadProgress(TabSheet : Integer);
var
i : integer;
begin
PbrPreview := TProgressBar.Create(nil);
PbrPreview.BorderWidth:=0;
PbrPreview.Parent := RzStatusBar1;
PbrPreview.Left := RzFieldStatus2.Left;
PbrPreview.Width := RzFieldStatus2.Width ;
PbrPreview.Height := RzStatusBar1.Height-1;
PbrPreview.Top := 0;
end;
 
后退
顶部