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

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


 
lblProgress.Parent := progressBar;
lblProgress.AutoSize := False;
lblProgress.Transparent := True;
lblProgress.Top :=  0;
lblProgress.Left :=  0;
lblProgress.Width := progressBar.ClientWidth;
lblProgress.Height := progressBar.ClientHeight;
lblProgress.Alignment := taLeftJustify;
lblProgress.Layout := tlCenter;
 


沒有留言:

張貼留言