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

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

Использование TrackBar [D7, XP]


murlokotan61 ©   (2009-06-21 23:57:00) 

На форме TrackBar и Label. Как написать исходник, чтобы положение ползунка отображалось в виде Integer от 0 до 100 именно в Label?


brother   (2009-06-22 05:41:00) [1]

или
TrackBar1.MaxValue:=100;
...
Label1.Caption:= inttostr(TrackBar1.Position);


brother   (2009-06-22 05:40:00) [2]

> ну и "лабел.капшен=инттостр(тракбар.позишэн)" - примерно
> это нужно в OnChange трэкбара набрать(!) с клавиатуры)

уточню:
if TrackBar1.Position>100 then TrackBar1.Position:= 100;
Label1.Caption:= inttostr(TrackBar1.Position);


Германн   (2009-06-22 00:57:00) [3]

Ооо!. Столь классических "батонокидателей" давно тут не было.
:)
Да ещё с таким "высокохудожественным" ником!
:)


{RASkov}   (2009-06-22 00:08:00) [4]

ну и "лабел.капшен=инттостр(тракбар.позишэн)" - примерно это нужно в OnChange трэкбара набрать(!) с клавиатуры)


{RASkov}   (2009-06-22 00:03:00) [5]

ну хотябы переключись с дизайнера формы на редактор кода сначала)


Наверх

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