ayuda con los botones de desplasamiento

[rayogallo]

holaa soy nuevo aca en este foro y quisiera que me ayudaran con un problema que tengo en la escuela con delhi 6 el caso es que tengo 4 bitbtn y quiero programarlos para que tengan la función de desplazamiento lo que pasa es que los botones deven tener la misma función que los cuatro primeros del DBNavigator

saludos y espero y me puedan ayudar con este problemita

[Neftali [Germán.Estévez]]

En cada botón puedes llamar a los métodos correspondientes de tu DataSet (TTable, TQuery). Next, Prior, First y Last.

Revisa la yuda sobre esos métodos.

[rayogallo]

Empezado por Neftali

En cada botón puedes llamar a los métodos correspondientes de tu DataSet (TTable, TQuery). Next, Prior, First y Last.

Revisa la yuda sobre esos métodos.

ok lo checare aver si puedo aserlo gracias pero si algien tiene los codigod para los botones que me los pase si porfavor

[[rretamar]]

No es sólo invocar a los métodos para recorrido del dataset, también los botones deberían deshabilitarse si no hay registros, el de "inicio" debería deshabilitarse si el puntero está en el primer registro, etc.

Una forma cómoda de lograr eso es usando el componente TActionList, en este caso se debe crear una "acción estándar" y dentro de las distintas variantes que ofrece el componente, seleccionar las del tipo "Dataset". Luego asocias la acción del componente (el botón, en este caso) a la acción tipo "Dataset" que corresponda y que ya tengas definida dentro del componente TActionList.

Saludos !

[rayogallo]

Empezado por Neftali

En cada botón puedes llamar a los métodos correspondientes de tu DataSet (TTable, TQuery). Next, Prior, First y Last.

Revisa la yuda sobre esos métodos.

ok pero ya lo tengo ya esta programado toso solo me ase falta un código no se si me puedas ayudar bueno los botones ya funcionan solo me ase falta qe el boton next se desactive cuando el boton prior llegue al final de los registros y lo mismo con el prior qe se desactive cuando este en el primer registro espero y y me puedan ayudar saludos

[rayogallo]

Empezado por rretamar

No es sólo invocar a los métodos para recorrido del dataset, también los botones deberían deshabilitarse si no hay registros, el de "inicio" debería deshabilitarse si el puntero está en el primer registro, etc.

Una forma cómoda de lograr eso es usando el componente TActionList, en este caso se debe crear una "acción estándar" y dentro de las distintas variantes que ofrece el componente, seleccionar las del tipo "Dataset". Luego asocias la acción del componente (el botón, en este caso) a la acción tipo "Dataset" que corresponda y que ya tengas definida dentro del componente TActionList.

Saludos !

bueno pues mi codigo es algo asi
procedure Trenta.BitBtn3Click(Sender: TObject);
var
posicion1:boolean;
begin
adotable1.prior;
posicion1:=true;
if posicion1 then
begin
BitBtn3.enabled:=TRUE;

end;
BitBtn4.enabled:=true;
BitBtn2.enabled:=true;
BitBtn1.enabled:=true;

end;


se mueve pero no se como aser qe se desactive el boton cuando este en el primer registro o cuando este en el ultimo

[rgstuamigo]

Empezado por rayogallo

...
se mueve pero no se como aser qe se desactive el boton cuando este en el primer registro o cuando este en el ultimo

Bueno para eso creo que te sirven las propiedades booleanas "Bof" y "Eof" de tu Dataset (Query.Table,etc.); Bof (Begin of) indica que se está en el principio de todos los registro y Eof(End of) indica que se está al final de todos los registro..
Cabe mencionar que lo mejor es que uses un componenteTActionList tal como te ha indicado el amigo rretamar, ya que éste componente ya te lo hace todo sin que estés programando nada.
Saludos...