Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Conexión con bases de datos (https://www.clubdelphi.com/foros/forumdisplay.php?f=2)
-   -   ayuda con los botones de desplasamiento (https://www.clubdelphi.com/foros/showthread.php?t=71202)

rayogallo 07-12-2010 02:46:46

ayuda con los botones de desplasamiento
 
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] 07-12-2010 12:52:52

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 08-12-2010 03:04:21

Cita:

Empezado por Neftali (Mensaje 384229)
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 08-12-2010 14:10:33

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 10-12-2010 22:22:46

Cita:

Empezado por Neftali (Mensaje 384229)
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 10-12-2010 22:27:00

Cita:

Empezado por rretamar (Mensaje 384371)
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 11-12-2010 15:38:54

Cita:

Empezado por rayogallo (Mensaje 384653)
...
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...;)


La franja horaria es GMT +2. Ahora son las 18:38:42.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2026, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi