Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Начинающим";
Текущий архив: 2006.12.03;
Скачать: [xml.tar.bz2];

Вниз

сообщение для 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;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.45 MB
Время: 0.04 c
2-1163580497
Магедон
2006-11-15 11:48
2006.12.03
как убрать мерцание мышки?


8-1145908539
Jrek
2006-04-24 23:55
2006.12.03
Соунд карточки


15-1163147795
zdm
2006-11-10 11:36
2006.12.03
Защита


2-1163197263
superlamer
2006-11-11 01:21
2006.12.03
Как правильно удалить объект созданный в рантайме


2-1163695212
kat_nik
2006-11-16 19:40
2006.12.03
Проверка заполненности ячеек компонента TStringGrid





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский