Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

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


Piero ©   (2006-11-14 15:46:00) 

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


Piero   (2006-11-14 16:07:00) [1]

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


Eraser   (2006-11-14 16:04:00) [2]

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


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

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

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

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


Piero   (2006-11-14 16:01:00) [3]

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


Джо   (2006-11-14 15:57:00) [4]

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

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


Eraser   (2006-11-14 15:57:00) [5]

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

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


Piero   (2006-11-14 15:55:00) [6]

а что такое PBM_SETPOS?


Сергей М.   (2006-11-14 15:53:00) [7]

MyProgressbar.Update;


Eraser   (2006-11-14 15:48:00) [8]

> [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;


думай.


Наверх

Титульная страница Поиск, карта сайта Написать письмо