Hola.
Cita:
Empezado por Delphi01
...
yo quiero un código para ir o mostrar el siguiente keyValue o el siguiente item de la lista de mi DBLookUpComboBox1.
|
Tendrías que accionar sobre el dataset asociado.
Código Delphi
[-]
procedure LookupComboLocateNext(DS: TDataSet; DBL: TDBLookupComboBox; const fldName, fldValue: string);
begin
if DS.Locate(fldName, fldValue, []) then
begin
DS.Next;
DBL.KeyValue := fldName;
end;
end;
Ejemplo del uso:
Código Delphi
[-]
...
LookupComboLocateNext(tu_DataSet , tu_DBLookupComboBox, 'tu_FIELD_NAME', 'tu_FIELD_VALUE');
Saludos