Добро пожаловать! Это — архивная версия форумов на «Хакер.Ru». Она работает в режиме read-only.
 

Delphi | RichEdit

Пользователи, просматривающие топик: none

Зашли как: Guest
Все форумы >> [Веб-программинг] >> Delphi | RichEdit
Имя
Сообщение << Старые топики   Новые топики >>
Delphi | RichEdit - 2005-07-31 15:08:03   
Chimera

Сообщений: 19
Оценки: 0
Присоединился: 2005-04-01 20:52:31
Как сделать в RichEdit(или в Memo) так, чтобы при нажатии клавиши Enter курсор не переходил на новую строку?
Post #: 1
Delphi | RichEdit - 2005-07-31 17:43:33   
DeRek-X

Сообщений: 13
Оценки: 0
Присоединился: 2004-10-28 09:37:20

надо отслеживать нажатие клавиши enter, по её коду

по другому например,если есть одна строка и ты хочешь во вторую(по номеру), то удалить вторую и курсор на первую

отслеживай Memo1.CaretPos.Y

_________
а зачем тогда использовать Memo
используй edit
Post #: 2
Delphi | RichEdit - 2005-08-01 12:48:08   
Chimera

Сообщений: 19
Оценки: 0
Присоединился: 2005-04-01 20:52:31
quote:

—————-<BR>Цитата: Дата:31.07.2005 17:43:33, Автор:DeRek-X ::
<BR>надо отслеживать нажатие клавиши enter, по её коду <BR>
—————-


procedure TForm1.RichEdit1KeyPress(Sender: TоЬjесt; var Key: Char);
begin
if Key = #13 then {КОД клавиши Enter}
begin
ЧТО ПИСАТ&#1068; ТУТ???
end;
end;
Post #: 3
Delphi | RichEdit - 2005-08-01 18:28:55   
DeRek-X

Сообщений: 13
Оценки: 0
Присоединился: 2004-10-28 09:37:20
проверяем сколько строк
MainMemo.Lines.Count = Chimera ; // Chimera integer
затем
MainMemo.Lines.Delete(MainMemo.CaretPos.Y);
удаляем последнюю, т.е. где наш курсор
и гоним курсор на предыдущую
MainMemo.CaretPos.Y = Chimera -1

както так

писал по памяти
может работает

и ещё так можно :
символы конец строки и перевод каретки,
их найти и удалить, строки не будут переноситься

попробуй :
Memo1.Lines.Delete(Memo1.CaretPos.Y-1);

итого :
<BR><BR>procedure TForm1.RichEdit1KeyPress(Sender: Tо&#1068;jесt; var Key: Char);<BR>begin<BR> if Key = #13 then {КОД клавиши Enter}<BR> begin<BR> Memo1.Lines.Delete(Memo1.CaretPos.Y-1);<BR> end;<BR>end;<BR><BR>

всё работает , кроме тегов на этом форуме

по нажатию на крючок, курсор не переводиться на следующую строку
но становится в начало текущей строки, можно ещё накрутить, чтобы он вставал
в конец текущей строки

но это как хочешь


Post #: 4
Страниц:  [1]
Все форумы >> [Веб-программинг] >> Delphi | RichEdit







Связаться:
Вопросы по сайту / xakep@glc.ru

Предупреждение: использование полученных знаний в противозаконных целях преследуется по закону.