Ver Mensaje Individual
  #1  
Antiguo 23-02-2011
snake25237 snake25237 is offline
Registrado
 
Registrado: jul 2010
Posts: 9
Reputación: 0
snake25237 Va por buen camino
Uso del keypress en un edit

Hola foro, acá con dos problema la cuestión va así: tengo un stringgird el cual debo llenar mediante datos ingresados en un edit, lo que no quiero es usar un botón para proceder a llenar, quiero ingresar el dato en el edit y cuando presione enter se llene el stringgrid y se mueva el cursor a la siguiente celda.

El primer problema cuando le doy enter no pasa nada, que puede estar mal.?

Código Delphi [-]
procedure TForm2.edit1keypress(Sender: TObject; var Key: Char);
begin
IF key = #13 THEN
begin
STRINGGRID1.Cells[STRINGGRID1.Col,STRINGGRID1.Row]:=EDIT1.Text;
UNIT1.ARREGLO_ALUMNO_MATERIA[STRINGGRID1.Row+1,STRINGGRID1.Col+1]:=EDIT1.Text;
end;
end;

Y la segunda duda es como luego de presionar enter se llene y el cursor se mueva a la siguiente celda probe con esto y me da un error en el segundo punto osea el el cols.move, es algo asi:
Código Delphi [-]
STRINGGRID1.Cols.Move(STRINGGRID1.Row,STRINGGRID1.Row+1);

De antemano muchisimas gracias

saludos
Responder Con Cita