Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.02.25;
Скачать: CL | DM;

Вниз

Scroll в StringGrid . ~по моему событию~   Найти похожие ветки 

 
Talla2k ©   (2004-02-08 20:24) [0]

Сделал обработчик для StringGrida по нажатию кл.Enter.
Теперь,после нажатия попадаю в след.ячейку(как в Excel).
procedure TForm1.StringGrid1KeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
var MyRect:TGridRect;
begin
if key = vk_return then begin
myRect.Left := Stringgrid1.Selection.Left;
myRect.Right := Stringgrid1.Selection.Right;
myRect.Top := Stringgrid1.row+1; // без проверки на выход за границы Grida
myRect.Bottom := Stringgrid1.row+1;
StringGrid1.Selection := myRect;
Stringgrid1.EditorMode:=true;
end; end;
НО,пропало позиционирование !!!Т.е.раньше, когда нажимал стрелку вверх или стрелку вниз двигался Scroll,
а теперь стоит на месте(имеется ввиду по нажатию Enter).
Подскажите, как заставить Scroll позиционировать в моем случае ????


 
Talla2k ©   (2004-02-09 16:08) [1]

Что никто не знает???



Страницы: 1 вся ветка

Текущий архив: 2004.02.25;
Скачать: CL | DM;

Наверх




Память: 0.46 MB
Время: 0.031 c
1-79898
Dr.Karter
2004-02-10 08:26
2004.02.25
Восстановление удаленных файлов


14-80112
N169
2004-02-02 16:32
2004.02.25
Программист назвал сына версией 2.0 :)


14-80098
Maxim Vetera
2004-02-03 12:11
2004.02.25
Дианетика!!!


14-80151
Soft
2004-02-01 17:11
2004.02.25
Черствеем мы, спасите наши души.


7-80324
big_bugzy
2003-12-04 14:53
2004.02.25
Как получить список всех DialUp соеденений которые есть на компе?