URRRRRGENTE!! Crear una consulta en Delphi

[jachguate]

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.