Ver Mensaje Individual
  #3  
Antiguo 26-08-2004
Avatar de jachguate
jachguate jachguate is offline
Miembro
 
Registrado: may 2003
Ubicación: Guatemala
Posts: 6.254
Reputación: 30
jachguate Va por buen camino
Hola Ariotto.

En primer lugar, bienvenido al club delphi. Te recomiendo una lectura de la guia de estilo de los foros, que tiene las normas básicas de convivencia en este lugar.

Como la guia te explicará, el título que has puesto a este hilo no es el mas apropiado.

Por otro lado, comentarte que lo que pretendes puede conseguirse fácilmente con un dbLookupComboBox asociado con su propiedad ListSource asociada a un DataSource que a su vez apunte a la tabla de cobradores, y su propiedad ListField al nombre del cobrador (o lo que querras mostrar).

Luego, una consulta SQL con un parámetro para el cobrador, algo como:

Código SQL [-]
Select *
  from cobros
 where cod_cobrador = :cobrador

En el onclick de un boton (o el evento que te parezca mas apropiado), haces la asignación del parámetro y apertura del query, digamos:

Código Delphi [-]
Procedure Tform1Button1Click(sender : TObject);

Begin
  qCobros.Close;
  qCobros.ParamByName('cobrador').AsInteger := LookupCobradores.KeyValue;
  qCobros.Open;
end;

Faltaria un grid o los controles que prefiras para mostrar los resultados del query y listo.

Ya que estas iniciando con delphi, te recomiendo la lectura de un buen libro, tal como la cara oculta de delphi, cuyo autor Ian Marteens ha publicado la edición para delphi 4 en formato pdf descargable gratuitamente desde su web.

Hasta luego.

__________________
Juan Antonio Castillo Hernández (jachguate)
Guía de Estilo | Etiqueta CODE | Búsca antes de preguntar | blog de jachguate
Responder Con Cita