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)
-   -   Form de busqueda (https://www.clubdelphi.com/foros/showthread.php?t=65598)

microbiano 29-12-2009 03:38:02

Form de busqueda
 
hola estoy en una aplicacion, pero necesito un form de busqueda que se pueda utilizar en todo el sistema.

tengo ya el form de busqueda pero no se como mandar la variable a cada form que sea necesario.

espero me puedan ayudar.

ejemplo que el form de busqueda si tengo abierto el form de facturas se pueda buscar el cliente .


y si tengo el form de clientes pendientes de pago pueda usar el mismo form.

saludos

alho asi como

http://www.ajpdsoft.com/modules.php?...rticle&sid=278

pero no tengo idea de como lo hacen ya lei la explicacion pero no le entiedo :'(

afunez2007 29-12-2009 04:08:53

Normalmente se hace toda la programacion en el boton que tiene la lupa para ejecutar el form de busqueda:

1.- Declaras una variable global en el form de los abonos.

Código Delphi [-]
unit FrMAltaMovi1;

var
  FrMAltaMovi: TFrMAltaMovi;
  Seleccion:Boolean;
implementation

uses Busq_clie_AltMov1, SConcep1, BusqVend1, Unit13, Fact_alta1;

{$R *.dfm}

procedure TFrMAltaMovi.BitBtn1Click(Sender: TObject);
begin
Seleccion:=False;
Busq_clie_AltMov := TBusq_clie_AltMov.Create(nil);
  Try
     Busq_clie_AltMov.ShowModal;
     If Seleccion=True then
     begin
              editclave.text:=Busq_clie_AltMov.qryCliente.FieldbyName('Clave').text;   
labelnombre.Camption:=Busq_clie_AltMov.qryCliente.FieldbyName('Nombre').text; 
end;  
  Finally
   freeandnil(Busq_clie_AltMov)
  End;

end;

en el boton aceptar de la forma de busqueda debes cambiar la variable a true:
Código Delphi [-]
procedure TBusq_clie_AltMov.BitBtn1Click(Sender: TObject);
begin
FrMAltaMovi1.Seleccion:=True;
close;
end;

microbiano 31-12-2009 06:38:49

hola gracias por responder
 
podrias explicarme un poco mas el codigo que proporcionas laverdad soy nuevo en delhpi muchas gracias

afunez2007 31-12-2009 17:23:16

Exactamente que parte quieres que te explique, tendrias que escribir algo del codigo que estas haciendo ya que si no puedes comprender la idea que estoy manejando yo, seria mejor desarrollar la tuya.

Saludos

Caral 31-12-2009 19:13:14

Hola
Este ejemplo sencillo muestra como usar UN solo form para hacer búsquedas.
En este caso busca clientes y artículos y los muestra en el form que los llamo.
Saludos

microbiano 24-01-2010 07:22:42

afunez gracias
 
Cita:

Empezado por afunez2007 (Mensaje 349863)
Exactamente que parte quieres que te explique, tendrias que escribir algo del codigo que estas haciendo ya que si no puedes comprender la idea que estoy manejando yo, seria mejor desarrollar la tuya.

Saludos


mira la idea que tengo es la siguiente

1.- tengo un form para registro de clientes donde el usuario al precionar un boton de busqueda aparecere otro form a donde aparecen el nombre de todos los clientes, al ir escribiendo en un Tedit el nombre en un DBgrid va filtrando a los clientes que cumplan dicha condicion.

2.- en el form de pago tengo que ingresar el nombre del clientes y quier usar el mismo form que utilizo a donde me aparece la lista de todos los clientes que tengo registrados.


aqui el problema es que no se como mandar la variable al form que corresponda

* si tengo abierto el form de registro de clientes que el form de busqueda mande esa variable al form de clientes, pero si tengo abierto el form de pago y desde este llamo al de busqueda cliente que la variable vaya al form de pagoe spero haberme explicado por tu ayuda muchas gracias.


La franja horaria es GMT +2. Ahora son las 13:41:21.

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