Зависимость между TrackBar и Edit - [ "Начинающим" ] - Все о Delphi

05.05.2012, 14:38

Страдалецъ Страдалецъ вне форума

Гуру

Регистрация: 09.03.2009

Адрес: На курорте, из окна вижу теплое Баренцево море. Бррр.

Сообщения: 4,723

Репутация: 52347

А не надо ничего особого делать:

Код:

procedure TForm1.ScrollBar1Change(Sender: TObject);
begin
 Edit1.Text := IntToStr(ScrollBar1.Position);
end;
 
procedure TForm1.Edit1Change(Sender: TObject);
begin
 ScrollBar1.Position := StrToIntDef(Edit1.Text, 0);
end;

__________________
Жизнь такова какова она есть и больше никакова.
Помогаю за спасибо.

Последний раз редактировалось Страдалецъ, 05.05.2012 в 14:47.

« Предыдущая тема | Следующая тема »

Опции темы	Поиск в этой теме
Версия для печати Отправить на Email	Поиск в этой теме: Расширенный поиск
Опции просмотра
Линейный вид Комбинированный вид Древовидный вид

Ваши права в разделе
Вы не можете создавать темы Вы не можете отвечать на сообщения Вы не можете прикреплять файлы Вы не можете редактировать сообщения BB-коды Вкл. Смайлы Вкл. [IMG] код Вкл. HTML код Выкл.

Быстрый переход

Часовой пояс GMT +3, время: 23:58.

	Сайт	Форум	FAQ	Соглашения	Прочее
	Новости Исходники Компоненты Статьи Добавить исходник Поиск	Правила Поиск Сообщения за сегодня Пользователи Кто на форуме?	Delphi FAQ - 5000 статей DRKB - 4500 статей (ZIP-архив) Справочник функций и процедур Delphi Delphi Programming Guide Indy in Depth. Глубины Indy	Конфиденциальность Соглашение пользователя Правила обработки cookie	О сайте Donate Контакты