2021-05-13

【Delphi】在 ProgressBar 內顯示進度文字

Form 上放一個 ProgressBar(name=progressBar)Label(name=lblProgress)


  1.  
  2. lblProgress.Parent := progressBar;
  3. lblProgress.AutoSize := False;
  4. lblProgress.Transparent := True;
  5. lblProgress.Top := 0;
  6. lblProgress.Left := 0;
  7. lblProgress.Width := progressBar.ClientWidth;
  8. lblProgress.Height := progressBar.ClientHeight;
  9. lblProgress.Alignment := taLeftJustify;
  10. lblProgress.Layout := tlCenter;
  11.  


沒有留言:

張貼留言