сообщение для TProgressBar

← →
Piero © (2006-11-14 15:46) [0]

Можно ли отправить, сообщение для TProgressBar, что бы поменять текущую позицию индикатора.
как это выглядит?

← →
Eraser © (2006-11-14 15:48) [1]

> [0] Piero © (14.11.06 15:46)

VCL пока что с исходниками идет.
см. реализацию TProgressBar.SetPosition.

procedure TProgressBar.SetPosition(Value: Integer); begin if not F32BitMode and ((Value < 0) or (Value > Limit16)) then ProgressLimitError; if HandleAllocated then SendMessage(Handle, PBM_SETPOS, Value, 0) else FPosition := Value; end;

думай.

← →
Сергей М. © (2006-11-14 15:53) [2]

MyProgressbar.Update;

← →
Piero © (2006-11-14 15:55) [3]

а что такое PBM_SETPOS?

← →
Джо © (2006-11-14 15:57) [4]

> [3] Piero © (14.11.06 15:55)
> а что такое PBM_SETPOS?

Это константа.

← →
Eraser © (2006-11-14 15:57) [5]

> [3] Piero © (14.11.06 15:55)

константа очевидно.

Eraser, а где смотреть реализацию TProgressBar.SetPosition, где объявлена PBM_SETPOS?

> [6] Piero © (14.11.06 16:01)

> а где смотреть реализацию TProgressBar.SetPosition

в исходниках VCL.

> где объявлена PBM_SETPOS?

там же.
----
поиск рулит!
+ в IDE Delphi есть такая удобная весч, как ctrl+LMB_Click.

Eraser, спасибо, нашел

сообщение для TProgressBar Найти похожие ветки