Ver Mensaje Individual
  #2  
Antiguo 21-09-2011
Avatar de duilioisola
[duilioisola] duilioisola is offline
Miembro Premium
 
Registrado: ago 2007
Ubicación: Barcelona, España
Posts: 1.734
Reputación: 20
duilioisola Es un diamante en brutoduilioisola Es un diamante en brutoduilioisola Es un diamante en bruto
Busca información sobre OnKeyPress, OnKeyUp y OnKeyDown.
Este es un ejemplo de como poder hacerlo
Código Delphi [-]
procedure TForm.FormKeyUp(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
   if (Key = ) then
   begin
      // Deshabilito los controles visuales para que no "parpadee"
      DataSet.DisableControls;
      try
         // Salto al siguiente registro para ver si es lo que busco
         DataSet.Next;
         // Si no cumple la condición vuelvo atras
         if (not (CampoBuscado empieza_por EditBusqueda.Text)) then
            DataSet.Prior;
      finally
         DataSet.EnableControls;
      end;
   end;
end;
Responder Con Cita