改变RichEdit的游标位置

Delphi

// 指定输入游标的位置

procedure SetCaret(RTF: TRichEdit; var Row, Col: Word);

var

i, iStopLine, iSelStart: integer;

begin

if (RTF = nil) then Exit;

if Row = 0 then Row := 1;