Позиция курсора в DBGrid-? Опции

[1147]

В DBGrid вставляется некоторый текст таким обрабом:

if Key = #32 then DBEdit1.text := DBEdit1.text +  ' () ';

После выполнения этого кода курсор оказывается в начале DBEdit, перед вставленным текстом, а нужно чтобы он был в конце. Что нужно для этого сделать?

Сообщение отредактировано: 1147 - 20.11.2009 11:30

[volvo]

Что нужно для этого сделать?

Для начала нужно сделать, чтоб этот код хотя бы компилировался, потому что:

[DCC Error] Unit1.pas(289): E2362 Cannot access protected symbol TControl.Text
[DCC Fatal Error] Project1.dpr(5): F2063 Could not compile used unit 'Unit1.pas'

Нет у тебя доступа к DBGrid1.Text, это защищенный член класса, а не общий.

[1147]

Ну конечно же. Незнаю как там появился грид, но это была опечатка.

[volvo]

А, ну тогда просто:

  if Key = #32 then
  begin
    DBEdit1.text := DBEdit1.text +  ' () ';
    DBEdit1.SelStart := Length(DBEdit1.Text);
    Key := #0;
  end;