Ver Mensaje Individual
  #6  
Antiguo 16-04-2018
Avatar de ecfisa
ecfisa ecfisa is offline
Moderador
 
Registrado: dic 2005
Ubicación: Tres Arroyos, Argentina
Posts: 10.508
Reputación: 36
ecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to behold
Hola.

Cita:
Empezado por Delphi01 Ver Mensaje
...
yo no me importa si desplace o no lo importante cuando haga click en un button por ejemplo si esta mostrando 'X1' pasa amostrar 'X2' y asi ...next ...
saludos ..
Entonces el código anterior hace exactament lo que buscas.

Si no te importan los desplazamientos, el siguiente método es una alternativa mas simple:
Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
var
  DS: TDataSet;
begin
  DS := DBLookupComboBox1.ListSource.DataSet;
  DS.Next;
  DBLookupComboBox1.KeyValue := DS.FieldValues[DBLookupComboBox1.KeyField];
end;

Saludos
__________________
Daniel Didriksen

Guía de estilo - Uso de las etiquetas - La otra guía de estilo ....
Responder Con Cita