Форум программистов
 
Контакты: о проблемах с регистрацией, почтой и по другим вопросам пишите сюда - alarforum@yandex.ru, проверяйте папку спам! Обязательно пройдите активизацию e-mail.

Вернуться   Форум программистов > Delphi > Общие вопросы Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Ответ
 
Опции темы
Старый 07.02.2018, 21:53   #1
Вася Иванов
 
Регистрация: 27.12.2015
Сообщений: 6
Репутация: 10
По умолчанию RichEdit Delphi

Всем привет. Есть вопрос...
Как можно привязать ProgressBar к прокрутке текста в RichEdit?
Есть код: SpinEdit1.Text:= IntToStr(RichEdit1.Lines.Count);
При открытии файла в SpinEdit имеется ТОЧНОЕ число строк текста.
Пытаюсь объявить в глобальную /n/ ОДНУ строку текста.
Чтобы потом попробовать крутить ProgressBar так:
ProgressBar1.Position:= n;
Не получается у меня строку в n загнать...
Как это сделать, дайте совет.
Возможно, есть другие пути решения... буду признателен за информацию.
Хочу, чтобы ProgressBar отображал прокрутку текста ТОЧНО... Но своих умений не хватает. Лопатил в Нете... тоже глухо.
Заранее спасибо.
Вася Иванов вне форума   Ответить с цитированием
Старый 08.02.2018, 08:57   #2
Heneken87
Форумчанин
 
Регистрация: 27.04.2012
Сообщений: 168
Репутация: 39
По умолчанию

Попробуйте через ProgressBar1.position := GetScrollPos(RichEdit1.Handle, SB_VERT) где нибудь на таймере
ProgressBar1.max примерно (RichEdit1.Lines.Count * 13) - RichEdit1.height

P/S Только скролбар включите в RichEdit
__________________
Пишу много и развернуто
Heneken87 вне форума   Ответить с цитированием
Старый 08.02.2018, 14:33   #3
Вася Иванов
 
Регистрация: 27.12.2015
Сообщений: 6
Репутация: 10
По умолчанию

Цитата:
Сообщение от Heneken87 Посмотреть сообщение
Попробуйте через ProgressBar1.position := GetScrollPos(RichEdit1.Handle, SB_VERT) где нибудь на таймере
ProgressBar1.max примерно (RichEdit1.Lines.Count * 13) - RichEdit1.height

P/S Только скролбар включите в RichEdit
Спасибо.
Вася Иванов вне форума   Ответить с цитированием
Ответ

Опции темы

Ваши права в разделе
Вы не можете создавать новые темы
Вы не можете отвечать в темах
Вы не можете прикреплять вложения
Вы не можете редактировать свои сообщения

BB коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.

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

Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
RichEdit Delphi 7 Fotal Общие вопросы Delphi 0 15.02.2017 11:31
Delphi RichEdit River_ Помощь студентам 2 24.01.2016 18:03
RichEdit в Delphi !abiturient! Общие вопросы Delphi 3 21.02.2012 13:29
Richedit. Delphi Pudge Помощь студентам 2 14.02.2012 02:02
RichEdit в Delphi Valerich Помощь студентам 0 02.05.2009 13:53


17:08.


Powered by vBulletin® Version 3.8.8 Beta 2
Copyright ©2000 - 2018, Jelsoft Enterprises Ltd.

RusProfile.ru


Справочник российских юридических лиц и организаций.
Проекты отопления, пеллетные котлы, бойлеры, радиаторы
интернет магазин respective.ru