Club Delphi  
    Paypal   FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Conexión con bases de datos
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Conexión con bases de datos

 
 
Herramientas Buscar en Tema Desplegado
  #6  
Antiguo 30-07-2013
Avatar de ecfisa
ecfisa ecfisa is offline
Moderador
 
Registrado: dic 2005
Ubicación: Tres Arroyos, Argentina
Posts: 10.508
Poder: 38
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 koalasoft.

Ahora sí está entendido

Código Delphi [-]
...
implementation

procedure TForm1.FormCreate(Sender: TObject);
begin
  btnPrimero.Tag  := 1;
  btnProximo.Tag  := 2;
  btnAnterior.Tag := 3;
  btnUltimo.Tag   := 4;
end;

// Asignado al evento OnClick de los 4 botones
procedure TForm1.ButtonsOnClick(Sender: TObject);
begin
  with TButton(Sender) do
    case Tag of
      1: tuDataSet.First;  // ir al primer registro
      2: tuDataSet.Next;   // ir al siguiente registro
      3: tuDataSet.Prior;  // ir al registro anterior
      4: tuDataSet.Last;   // ir al último registro
    end;
end;

// Mostrar campos en los Edits o ComboBox
procedure TForm1.tuDataSetAfterScroll(DataSet: TDataSet);
begin
  // (Si los campos fuesen de otro tipo, usar la conversión correspondiente)
  Edit1.Text     := tuDataSetCampo1.AsString;  
  ComboBox1.Text := tuDataSetCampo2.AsString;
end;
...

Saludos.
__________________
Daniel Didriksen

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



Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro

Temas Similares
Tema Autor Foro Respuestas Último mensaje
Saber si existe algún TComboBox o un TEdit sin llenar. Roilo OOP 4 23-12-2009 14:26:06
Resaltar TEdit, TDBEdit, TComboBox al recibir foco casacham Trucos 15 15-09-2007 23:42:05
Pasar el valor de un TEdit dentro de un StringGrid a otro TEdit que está fuera atirado Varios 4 11-09-2004 19:13:48
TcomboBox = tEdit maui Conexión con bases de datos 2 25-05-2004 02:37:46


La franja horaria es GMT +2. Ahora son las 11:30:27.


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
Copyright 1996-2007 Club Delphi