Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2006.12.03;
Скачать: CL | DM;

Вниз

сообщение для 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)

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


 
Piero ©   (2006-11-14 16:01) [6]

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


 
Eraser ©   (2006-11-14 16:04) [7]

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


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

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

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

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


 
Piero ©   (2006-11-14 16:07) [8]

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



Страницы: 1 вся ветка

Текущий архив: 2006.12.03;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.058 c
5-1144658519
megabyte-ceercop
2006-04-10 12:41
2006.12.03
Подсветка синтаксиса


2-1163628508
Kostafey
2006-11-16 01:08
2006.12.03
Параметры в запросе


8-1145700764
QuickFinder
2006-04-22 14:12
2006.12.03
Видеозахват с помощью Delphi


2-1163594778
StriderMan
2006-11-15 15:46
2006.12.03
try ... except ... on


15-1163456184
константинов
2006-11-14 01:16
2006.12.03
Флэшки. USB port