ypos := SendMessage(tr.Handle,EM_LINEFROMCHAR,tr.SelStart,0);
xpos := tr.SelStart-SendMessage(tr.Handle,EM_LINEINDEX,ypos,0);
RichEdit
Помогите!!!
Как в RichEdit можно установить и узнать где
курсор, а текже поменять цвет шрифта в определенном месте. Если в RichEdit этого сделать нельзя , то скажите где можно.
Заранее благодарен.
Как в RichEdit можно установить и узнать где
курсор, а текже поменять цвет шрифта в определенном месте. Если в RichEdit этого сделать нельзя , то скажите где можно.
Заранее благодарен.
Цитата:
Originally posted by mtx_g
Помогите!!!
Как в RichEdit можно установить и узнать где
курсор, а текже поменять цвет шрифта в определенном месте. Если в RichEdit этого сделать нельзя , то скажите где можно.
Заранее благодарен.
Помогите!!!
Как в RichEdit можно установить и узнать где
курсор, а текже поменять цвет шрифта в определенном месте. Если в RichEdit этого сделать нельзя , то скажите где можно.
Заранее благодарен.
Позиция курсора в TRichEdit
Допустим у тебя есть tr: TRichEdit
Две переменные xpos,ypos: Integer;
Чтобы получить позицию, делаем так:
Код:
Цитата:
Originally posted by Sagittarius
Код:
ypos := SendMessage(tr.Handle,EM_LINEFROMCHAR,tr.SelStart,0);
xpos := tr.SelStart-SendMessage(tr.Handle,EM_LINEINDEX,ypos,0);
xpos := tr.SelStart-SendMessage(tr.Handle,EM_LINEINDEX,ypos,0);
А кто отменял свойство CaretPos?
Цитата:
Originally posted by smartsoft
А кто отменял свойство CaretPos?
А кто отменял свойство CaretPos?
Свойство CaretPos есть не во всех версиях Delphi, а показанный способ получения позиции курсора с помощью сообщений, носит универсальный характер.
Цитата:
Originally posted by mtx_g
Помогите!!!
Как в RichEdit можно установить и узнать где
курсор, а текже поменять цвет шрифта в определенном месте. Если в RichEdit этого сделать нельзя , то скажите где можно.
Заранее благодарен.
Помогите!!!
Как в RichEdit можно установить и узнать где
курсор, а текже поменять цвет шрифта в определенном месте. Если в RichEdit этого сделать нельзя , то скажите где можно.
Заранее благодарен.
Очень просто - прийти ко мне за инфой. :)
Цитата:
Originally posted by Sagittarius
Свойство CaretPos есть не во всех версиях Delphi, а показанный способ получения позиции курсора с помощью сообщений, носит универсальный характер.
Свойство CaretPos есть не во всех версиях Delphi, а показанный способ получения позиции курсора с помощью сообщений, носит универсальный характер.
В четвертой версии появилось уже вроде. Не думаю, чтобы кто-то программировал на более ранней версии. На старых версиях только продвинутые пишут ;)
А если свойство есть, почему бы его не использовать?
Цитата:
Originally posted by smartsoft
В четвертой версии появилось уже вроде. Не думаю, чтобы кто-то программировал на более ранней версии. На старых версиях только продвинутые пишут ;)
В четвертой версии появилось уже вроде. Не думаю, чтобы кто-то программировал на более ранней версии. На старых версиях только продвинутые пишут ;)
Я иногда пишу на Delphi 3 :D
А если свойство есть, почему бы его не использовать?
Совершенно согласен. Я с TRichEdit особо не развлекаюсь, поэтому написал то, что знал.
Цитата:
Originally posted by mtx_g
Помогите!!!
Как в RichEdit можно установить и узнать где
курсор, а текже поменять цвет шрифта в определенном месте. Если в RichEdit этого сделать нельзя , то скажите где можно.
Заранее благодарен.
Помогите!!!
Как в RichEdit можно установить и узнать где
курсор, а текже поменять цвет шрифта в определенном месте. Если в RichEdit этого сделать нельзя , то скажите где можно.
Заранее благодарен.
Смотри свойства:
SelStart
SelLength
SelText
SelAttributes