Текущий архив: 2003.12.16;
Скачать: CL | DM;
Вниз
Позиция курсора в TMemo Найти похожие ветки
← →
KF111 (2003-12-02 20:32) [0]Как определить позицию курсора в TMemo, тоесть номер строки, символ(положение) в строке?
← →
dataMaster © (2003-12-02 20:35) [1]Не знаю насчет D6, но вот в D7 можно так: Memo1.CaretPos
Попробуй, может получится
← →
KF111 (2003-12-02 20:39) [2]Так это он координаты на экране выдаст, а тексте?
← →
dataMaster © (2003-12-02 20:45) [3]Текст и есть:
Memo1.CaretPos.X - позиция в строке
Memo1.CaretPos.Y - номер строки
← →
KF111 (2003-12-02 21:14) [4]Точно, уже разобрался....
А вот как бы ограничить длину строки до определенного количества сиволов?
← →
dataMaster © (2003-12-02 21:32) [5]Один из способов:
procedure TForm1.Memo1KeyPress(Sender: TObject; var Key: Char);
begin
if (Length(Memo1.Lines[Memo1.CaretPos.Y])= _твое_значение_) and
(Key<>#8) and (Key<>#13) then
Key:=#0
end;
← →
KF111 (2003-12-02 22:13) [6]Это при наборе с клавы
А если из буфера вставили, что все строки Memo в цикле гонять на предмет длины?:))
← →
dataMaster © (2003-12-03 00:14) [7]А "хвосты" куда денешь? Придется переносить. В итоге - все делаем руками и если надо, применяем циклы.
← →
KF111 (2003-12-03 21:27) [8]
> А "хвосты" куда денешь?
Однозначно рубить:)))
Страницы: 1 вся ветка
Текущий архив: 2003.12.16;
Скачать: CL | DM;
Память: 0.48 MB
Время: 0.018 c
