Ir al contenido


Foto

Ir al FINAL de un TEdit después de inyectar un carácter.


  • Por favor identifícate para responder
No hay respuestas en este tema

#1 TiammatMX

TiammatMX

    Advanced Member

  • Miembros
  • PipPipPip
  • 1.750 mensajes
  • LocationUniverso Curvo\Vía Láctea\Sistema Solar\Planeta Tierra\América\México\Ciudad de México\Xochimilco\San Gregorio Atlapulco\Home

Escrito 19 agosto 2013 - 09:48

Buen día/tarde/noche, jóvenes Delphineros.

Tengo un TwwDbGrid (no es muy relevante, excepto por sus eventos) en el cual tengo para su evento OnKeyDown algo así:



delphi
  1. procedure TfrmRubrosSIS.grdServiciosKeyDown(Sender: TObject; var Key: Word; Shift: TShiftState);
  2. begin
  3.   if IsCharAlphaNumeric(Chr(Key)) then
  4.   begin
  5.       with edtSearch do
  6.       begin
  7.         Visible := True;
  8.         Text := Chr(Key);
  9.         SetFocus;
  10.       end;
  11.   end;
  12. end;



en el cual se activa un TEdit que no está visible para recoger los teclazos y efectuar una búsqueda dentro del conjunto de datos que se muestran en la rejilla.

Habiendo invalidado las propiedades AutoSelect y HideSelection del TEdit, me sigue guardando los teclazos, PERO el primer teclazo capturado SIEMPRE me aparece al último y el cursor de inserción al principio, por lo cual si mi teclazo activador es una letra "p", y las siguientes "rimera", el contenido de éste control SIN editarlo queda "rimerap". Desearía saber cómo MANTENER la "p" en primer puesto y mandar el cursor de edición al final para que el texto quede "primera"...

Como siempre, agradeciendo de antemano cualquier ayuda para solucionar ésta cuestión... ;)
  • 0




IP.Board spam blocked by CleanTalk.