se me ocurre que a cada dbedit le pongas un número de ID en la propiedad TAG... y en el evento OnEnter del dbedit hagas algo así como:
Código Delphi
[-]
btnListado.Tag=(sender as dbedit).Tag
y para finalizar en el evento click del botón del listado:
Código Delphi
[-]
case btnListado.Tag of
1:
2:
...
end;
ring any bells??
Saludos