Положение текстового курсора.

← →
Vulko © (2003-06-08 11:13) [0]

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

← →
default © (2003-06-08 11:19) [1]

"позиция текстового курсора" = "номер строки" * "число символов в строке" + "позиция символа в строке"

← →
Anatoly Podgoretsky © (2003-06-08 11:42) [2]

Это тоже весьма упрощенно, а коды возврата каретки и перевод строки.

← →
Fenik © (2003-06-08 11:43) [3]

Нет. В каждой строке может быть разное кол-во символов.
Если одинаковое то - default © (08.06.03 11:19)

← →
Vulko © (2003-06-08 12:45) [4]

Хмм...
Может тогда ответите на вопрос - как вставить в RichEdit (или Мемо) текст туда где находится курсор.

← →
Song © (2003-06-08 12:50) [5]

Insert()

> Song

Я имею в виду прямо куда курсор, ведь richedit1.lines.insert(curpos," str");

Так вот как определить curpos, что вставить именно в это место.

Ну и вопросы. Нам ведьнужна только координата Х
procedure TForm1.Button1Click(Sender: TObject); var d: string; begin D:=Richedit1.lines.Strings[RichEdit1.CaretPos.Y]; Insert("str", d, RichEdit1.CaretPos.X); Richedit1.lines.Strings[RichEdit1.CaretPos.Y]:=D; end;

Вообще лучше так:
procedure TForm1.Button1Click(Sender: TObject); var d: string; begin D:=Richedit1.lines.Strings[RichEdit1.CaretPos.Y]; Insert("str", d, RichEdit1.CaretPos.X+1); Richedit1.lines.Strings[RichEdit1.CaretPos.Y]:=D; end;

Положение текстового курсора. Найти похожие ветки