|  | 
 
 | 
| 
 | |||||||
| Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны | 
|  | 
|  | Опции темы | Поиск в этой теме | Опции просмотра | 
| 
			 
			#1  
			
			
			
			
		 | |||
| 
 | |||
|  Передача фокуса ввода в strindgrid Здравствуйте! Как можно реализовать , последовательный переход и готовую для ввода  ячейку stridgrid по нажатию enter? | 
| 
			 
			#2  
			
			
			
			
		 | |||
| 
 | |||
|   Можешь поподробнее описать, что тебе надо. Из указанного не совсем понять что же конкретно хочется... | 
| 
			 
			#3  
			
			
			
			
		 | |||
| 
 | |||
|   После нажатия мыши на первой ячейки стринггрида ,   далее фокус ввода переходил  по очереди нажатием enter. Т. е фокус перемещался и  был готов для ввода. | 
| 
			 
			#4  
			
			
			
			
		 | ||||
| 
 | ||||
|   А, что в google забанили? Код: procedure TForm1.StringGrid1KeyPress(Sender: TObject; var Key: Char);
begin
  If (Key = #13) Then
    With TStringGrid(Sender) Do
      If (Col < ColCount - 1) Then
        Col := Col + 1
      Else If (Row < RowCount - 1) Then
      Begin
        Row := Row + 1;
        Col := FixedCols;
      End;
end; | 
| 
			 
			#5  
			
			
			
			
		 | |||
| 
 | |||
|   Не, не забанили пока. Верю,  что на форуме дадут подсказку,  направление куда смотреть. Последний раз редактировалось Maks19, 26.01.2020 в 18:01. | 
| 
			 
			#6  
			
			
			
			
		 | ||||
| 
 | ||||
|   Цитата: 
 |