Поиск:

Ответ в темуСоздание новой темы Создание опроса
> TDBRichEdit.ReadOnly а TRxMemoryData, думает что были изменения 
:(
    Опции темы
Delphist
Дата 28.12.2007, 15:49 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Delphist Эксперт
****


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

Репутация: 1
Всего: 3
Возникла следующая проблема: есть TRxMemoryData содержит записи, одно из полей (типа TMemoField) которого подкючено к TDBRichEdit.  У TDBRichEdit.ReadOnly = true. Когда я выделяю текст в TDBRichEdit и пытаюсь его переместить (нажимаю левую кнопку мыши на выделеном тексте и пытаюсь переместить его) - естественно он не перемещается т.е. не происходит никаких изменений, но при этом почему-то TRxMemoryData помечает что были сделаны изменения, и вот когда я пытаюсь переместиться на новую запись, он, я так понимаю, пытается делать Post и мне выдается сообщение, что мой DataSet (TRxMemoryData) не находиться в режиме Edit или Insert. Вопрос как исправить эту проблему?


--------------------
ProcessInfo 1-ая моя программа (аналог spyxx.exe с гораздо большим функц-ом - внедрение dll в адр. простр. процесса, перехват API-функций, разбор приложения на окна мн.др).
Когда-то давным-давно использовал это...
PM MAIL ICQ   Вверх
Delphist
Дата 9.1.2008, 10:39 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Delphist Эксперт
****


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

Репутация: 1
Всего: 3
Если кто-нибудь знает решение моего вопроса, пожалуйста, отзовитесь.


--------------------
ProcessInfo 1-ая моя программа (аналог spyxx.exe с гораздо большим функц-ом - внедрение dll в адр. простр. процесса, перехват API-функций, разбор приложения на окна мн.др).
Когда-то давным-давно использовал это...
PM MAIL ICQ   Вверх
FractalizeR
Дата 21.1.2008, 17:08 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


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

Репутация: нет
Всего: 4
DragMode = dmManual стоит? Если нет, попробуйте поставить.


--------------------
Чтобы поблагодарить или наоборот поругать участника форума лучше пользоваться значками "+" и "-", изменяющими репутацию. Они находятся слева от поста под именем пользователя.
PM MAIL   Вверх
Delphist
Дата 21.1.2008, 17:35 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Delphist Эксперт
****


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

Репутация: 1
Всего: 3
Цитата(FractalizeR @  21.1.2008,  18:08 Найти цитируемый пост)
DragMode = dmManual стоит? Если нет, попробуйте поставить. 

Да стоит.


--------------------
ProcessInfo 1-ая моя программа (аналог spyxx.exe с гораздо большим функц-ом - внедрение dll в адр. простр. процесса, перехват API-функций, разбор приложения на окна мн.др).
Когда-то давным-давно использовал это...
PM MAIL ICQ   Вверх
Frees
Дата 24.1.2008, 09:28 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Завсегдатай
Сообщений: 2233
Регистрация: 2.12.2005
Где: Екатеринбург

Репутация: 23
Всего: 54
пытался повторить твои действия но ошибку так и не обнаружил

может ты просто гденить не тот дата сет указал или еще какая нить подобная ошибка

Добавлено через 7 минут и 26 секунд
Цитата(Delphist @  28.12.2007,  15:49 Найти цитируемый пост)
 и вот когда я пытаюсь переместиться на новую запись, он.....


а у TRxMemoryData в событиях OnBeforeScroll или OnAfterScroll есть какой нить код? может в нем проблема?



--------------------
Кольцов Виктор Владимирович
PM MAIL ICQ   Вверх
Delphist
Дата 24.1.2008, 11:58 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Delphist Эксперт
****


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

Репутация: 1
Всего: 3
Цитата(Frees @  24.1.2008,  10:28 Найти цитируемый пост)
 у TRxMemoryData в событиях OnBeforeScroll или OnAfterScroll есть какой нить код? может в нем проблема?

нету


--------------------
ProcessInfo 1-ая моя программа (аналог spyxx.exe с гораздо большим функц-ом - внедрение dll в адр. простр. процесса, перехват API-функций, разбор приложения на окна мн.др).
Когда-то давным-давно использовал это...
PM MAIL ICQ   Вверх
Delphist
Дата 24.1.2008, 12:55 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Delphist Эксперт
****


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

Репутация: 1
Всего: 3
У меня в TDBRichEdit'e стоит свойство ScrollBar = ssBoth. Ошибка возникает следующим образом: сначала я делаю так, чтобы появился вертикальный скрол, затем уменьшаю ширину окна DBRichEdit'a, с помощью splitter'a. После этих действий перемещаю курсор TRxMemoryData на новую запись, в результате говорит, что RxMemotyData не находится в режиме редактирования.



--------------------
ProcessInfo 1-ая моя программа (аналог spyxx.exe с гораздо большим функц-ом - внедрение dll в адр. простр. процесса, перехват API-функций, разбор приложения на окна мн.др).
Когда-то давным-давно использовал это...
PM MAIL ICQ   Вверх
Frees
Дата 24.1.2008, 12:58 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Завсегдатай
Сообщений: 2233
Регистрация: 2.12.2005
Где: Екатеринбург

Репутация: 23
Всего: 54
а ты а ты TDBRichEdit или TRxDBRichEdit используеш?
может TRxDBRichEdit  не даст такой ошибки

у меня так и не появилась такая ошибка (делал вроде все также )может ты подробнее напишеш че делае или код покажеш


--------------------
Кольцов Виктор Владимирович
PM MAIL ICQ   Вверх
Delphist
  Дата 24.1.2008, 13:26 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Delphist Эксперт
****


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

Репутация: 1
Всего: 3
Сейчас стал более детально разбираться и выяснил, что ошибка возникает из-за кода расположенного в TDBRichEdit.OnResizeRequest
Код

var
  pStart: integer;
 _CaretPos: TPoint;
begin

  if dbeTip.Text <> '' then
  begin
    pStart := PosEx('Примечание:', dbeTip.Text);
    if (pStart <> 0) then
    begin
      dbeTip.SelStart := pStart - 1;
      dbeTip.SelLength := Length(dbeTip.Text) - dbeTip.SelStart;
      dbeTip.SelAttributes.Color := clRed;
      _CaretPos := dbeTip.CaretPos;
      dbeTip.SelLength := 0;
      dbeTip.CaretPos := _CaretPos;
    end;
  end;
end;

Если этот код закомментировать, то все начинает работать нормально. Этот код выделяет красным цветом текст, который начинается со слова "Примечание". Как быть?


--------------------
ProcessInfo 1-ая моя программа (аналог spyxx.exe с гораздо большим функц-ом - внедрение dll в адр. простр. процесса, перехват API-функций, разбор приложения на окна мн.др).
Когда-то давным-давно использовал это...
PM MAIL ICQ   Вверх
Frees
Дата 24.1.2008, 14:09 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Завсегдатай
Сообщений: 2233
Регистрация: 2.12.2005
Где: Екатеринбург

Репутация: 23
Всего: 54

у меня компоненты в Dfm вот так описаны событие ОnResizeRequest как у тебя...но ошибки нет ни какой!!!!
Код

object DBRichEdit1: TDBRichEdit
  Left = 118
  Top = 246
  Width = 254
  Height = 215
  Anchors = [akLeft, akTop, akRight, akBottom]
  DataField = '123'
  DataSource = DataSource1
  TabOrder = 2
  OnResizeRequest = RxDBRichEdit1ResizeRequest
end

object RxMemoryData1: TRxMemoryData
  Active = True
  AutoCalcFields = False
  FieldDefs = <
    item
      Name = '123'
      DataType = ftMemo
    end>
  AfterEdit = RxMemoryData1AfterEdit
  BeforePost = RxMemoryData1BeforePost
  Left = 221
  Top = 125
  object RxMemoryData1Field123: TMemoField
    FieldName = '123'
    BlobType = ftMemo
  end
end


Может у тебя в событии DataSource.OnChange ченить висит




--------------------
Кольцов Виктор Владимирович
PM MAIL ICQ   Вверх
Delphist
Дата 24.1.2008, 14:26 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Delphist Эксперт
****


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

Репутация: 1
Всего: 3
Цитата(Frees @  24.1.2008,  15:09 Найти цитируемый пост)
Может у тебя в событии DataSource.OnChange ченить висит

OnChange пустой. У меня ошибка возникает, если убираю код из OnResizeRequest, то ошибка пропадает.


--------------------
ProcessInfo 1-ая моя программа (аналог spyxx.exe с гораздо большим функц-ом - внедрение dll в адр. простр. процесса, перехват API-функций, разбор приложения на окна мн.др).
Когда-то давным-давно использовал это...
PM MAIL ICQ   Вверх
Frees
Дата 24.1.2008, 14:31 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Завсегдатай
Сообщений: 2233
Регистрация: 2.12.2005
Где: Екатеринбург

Репутация: 23
Всего: 54
А может не использовать TDBRichEdit а применить TRichEdit
и самому по скролу в дата сете заполнять его данными из базы...


--------------------
Кольцов Виктор Владимирович
PM MAIL ICQ   Вверх
Delphist
Дата 24.1.2008, 14:40 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Delphist Эксперт
****


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

Репутация: 1
Всего: 3
Цитата(Frees @  24.1.2008,  15:31 Найти цитируемый пост)
А может не использовать TDBRichEdit а применить TRichEdit
и самому по скролу в дата сете заполнять его данными из базы... 

Можно, конечно, но мне просто не очень понятно почему так ведет себя TDBRichEdit.


--------------------
ProcessInfo 1-ая моя программа (аналог spyxx.exe с гораздо большим функц-ом - внедрение dll в адр. простр. процесса, перехват API-функций, разбор приложения на окна мн.др).
Когда-то давным-давно использовал это...
PM MAIL ICQ   Вверх
Frees
Дата 24.1.2008, 14:56 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Завсегдатай
Сообщений: 2233
Регистрация: 2.12.2005
Где: Екатеринбург

Репутация: 23
Всего: 54
Может со свойством       Modified; у Едита поиграться





--------------------
Кольцов Виктор Владимирович
PM MAIL ICQ   Вверх
Delphist
Дата 24.1.2008, 20:05 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Delphist Эксперт
****


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

Репутация: 1
Всего: 3
Цитата(Frees @  24.1.2008,  15:56 Найти цитируемый пост)
Может со свойством       Modified; у Едита поиграться

у какого edit'a у TDBRichEdit'a, что -то я не нашел у него этого свойства. И что значит поиграться?


--------------------
ProcessInfo 1-ая моя программа (аналог spyxx.exe с гораздо большим функц-ом - внедрение dll в адр. простр. процесса, перехват API-функций, разбор приложения на окна мн.др).
Когда-то давным-давно использовал это...
PM MAIL ICQ   Вверх
Ответ в темуСоздание новой темы Создание опроса
Правила форума "Delphi: Базы данных и репортинг"
Vit
Петрович

Запрещено:

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

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


Обязательно указание:

1. Базы данных (Paradox, Oracle и т.п.)

2. Способа доступа (ADO, BDE и т.д.)


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

FAQ раздела лежит здесь!

Если Вам помогли и атмосфера форума Вам понравилась, то заходите к нам чаще! С уважением, Vit, Петрович.
 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Delphi: Базы данных и репортинг | Следующая тема »

Подписаться на тему | Подписка на этот форум | Скачать/Распечатать тему


 




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


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

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