stringgrid

← →
anarhi (2005-06-27 10:13) [0]

Не подскажите как сделать чтобы в StrinGrid"е после нажатия Enter
курсор переходил на другую строчку в том же столбце.

← →
TUser © (2005-06-27 10:14) [1]

OnKeyPress там есть?

← →
anarhi (2005-06-27 10:16) [2]

есть

← →
TUser © (2005-06-27 10:18) [3]

А свойства Col и Row?

← →
anarhi (2005-06-27 10:19) [4]

нет

← →
TUser © (2005-06-27 10:22) [5]

Безобразие. Вчера были! А ну признавайтесь - кто КТО ЗАНЫКАЛ ЭТИ СВОЙСТВА? !!!

← →
Virgo_Style © (2005-06-27 10:22) [6]

> А свойства Col и Row?
> нет

Что, серьезно?

← →
anarhi (2005-06-27 10:26) [7]

procedure TForm5.StringGrid1KeyPress(Sender: TObject; var Key: Char);
begin

end;

Напиши там
Row:=(Row+1) mod RowCount;
if Row < FixedRows then begin
Row:=FixedRows;
Col:=(Col+1) mod ColCount;
if Col < FoxedCol then
Col:=FixedCol;
end;

with StringGrid1 do begin
[8]
end;

← →
anarhi (2005-06-27 10:34) [10]

TUser спасибо работает.

stringgrid Найти похожие ветки