Модераторы: Snowy, MetalFan, bems, Poseidon
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Многостраничный редактор, Проблемы с настройками RichEdit. 
V
    Опции темы
Addmin
Дата 4.4.2007, 16:45 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 803
Регистрация: 3.2.2006
Где: сослан в Сибирь

Репутация: нет
Всего: 15



Добрый день. У меня в программе на PageControl находится множество RichEdit, создающихся динамиченски, и когда я пытаюсь изменить свойства RichEdit на всех страницах вот таким кодом:

Код

while JustInteger< Form1.PageControl1.PageCount do
   begin
   TRichEdit(Form1.PageControl1.Pages[Justinteger]).Font.Name:= Edit1.Text;
   TRichEdit(Form1.PageControl1.Pages[Justinteger]).Font.Color:= Edit1.Font.Color;
   TRichEdit(Form1.PageControl1.Pages[Justinteger]).Color:= ColorBox1.Selected;
   JustInteger:= JustInteger + 1;
   end;


То везде меняется шрифт и цвет шрифта, но цвет самих RichEdit-ов остаётся неизменным. Подскажите, где ошибка? Заранее благодарен.


--------------------
PM MAIL   Вверх
Rennigth
Дата 4.4.2007, 16:55 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Участник Клуба
Сообщений: 1708
Регистрация: 21.6.2004
Где: Moscow

Репутация: 15
Всего: 76



Addmin, ParentColor выстави Rich-ам.


--------------------
(* Honesta mors turpi vita potior *)
PM MAIL ICQ   Вверх
aktuba
Дата 4.4.2007, 16:58 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Смышленный
***


Профиль
Группа: Завсегдатай
Сообщений: 1915
Регистрация: 24.4.2006
Где: Планета Земля

Репутация: 7
Всего: 38



А где выбор RichEdit-а? Ты везде приводишь Page к RichEdit-у и присваиваешь значения. Соответственно у тебя и меняются значения Page-ов...


--------------------
user posted image
PM MAIL WWW Skype   Вверх
Addmin
Дата 4.4.2007, 17:22 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 803
Регистрация: 3.2.2006
Где: сослан в Сибирь

Репутация: нет
Всего: 15



Rennigthaktuba, большое вам спасибо! Просто в первый раз ошибся и забыл к Pages[JustInteger] добавить Tag - указатель на номер RichEdit. Сейчас перечитал строку и уже исправил smile


--------------------
PM MAIL   Вверх
  
Ответ в темуСоздание новой темы Создание опроса
Правила форума "Delphi: Для новичков"
SnowyMetalFan
bemsPoseidon
Rrader

Запрещается!

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делиться вскрытыми компонентами

  • Литературу по Дельфи обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Вопросы по реализации алгоритмов рассматриваются здесь
  • 90% ответов на свои вопросы можно найти в DRKB (Delphi Russian Knowledge Base) - крупнейшем в рунете сборнике материалов по Дельфи


Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Snowy, MetalFan, bems, Poseidon, Rrader.

 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Delphi: Для новичков | Следующая тема »


 




[ Время генерации скрипта: 0.1023 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.