Club Delphi  
    Paypal   FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > OOP
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Coloboración Paypal con ClubDelphi

 
 
Herramientas Buscar en Tema Desplegado
  #11  
Antiguo 16-08-2006
Avatar de anghell77
anghell77 anghell77 is offline
Miembro
 
Registrado: may 2006
Posts: 194
Poder: 21
anghell77 Va por buen camino
A ver si ando bien... En la interfaz de Comprobantes esté el Grid con Los datos de los Clientes?....bueno, si es que es así ojalá te sirva lo siguiente.

Si deseas que al hacer CLick sobre algún Codigo o Nombre de Cliente quieres que aparezca en el Siguiente Form el Código y Nombre de Cliente, entonces creo que el codigo :

Código SQL [-]
Select *from Clientes, Comprobantes where Codigo.Clientes=Comprobantes.Cod_Cliente
and Comprobantes.Cod_Cliente=:entrada
Más

Código Delphi [-]
select_Cliente.Close;
select_Cliente.ParamByName('entrada').AsString:=trim(DBGrid1.SelectedField.Asstring);
select_Cliente.Open;
Form_Detalles.Show;

Donde, el evento onShow de éste Form:


Código Delphi [-]
TablaComprobantes.Close;
TablaComprobantes.ReadOnly:=false;
TablaComprobantes.Open;
TablaComprobantes.Append;
//Abre la tabla comprobantes sin datos visibles para que puedas agregar lo que desees.


y Coloca Dos DBEdit que vengan de la consulta select_Cliente, correspondientes a Codigo Cliente y Nombre. De ésta manera tendrás éstos dos datos visibles sin tener que capturar nuevamente el mismo codigo de cliente ni el nombre.

Ahora, al presionar Guardar o Aceptar.

Código Delphi [-]
if Application.MessageBox('Desea Agregar Otro Registro de Comprobantes para el mismo cliente?', 'Atención', MB_YesNo+Mb_IconQuestion)=IDYes then
begin
TablaComprobantes.Close;
TablaComprobantes.ReadOnly:=false;
TablaComprobantes.Open;
TablaComprobantes.Append;
end
else
Select_Cliente.CLose;//cierra la consulta que se ejecuto mediante el DBgrid
Form_Comprobantes.Close;//Devuelve al formulario original
//Si el DBGrid está ligado al DataSource de la tabla de Comprobantes 
TablaComprobantes.Active:=true;
//Si está ligado a una Consulta que despliegue los datos
Consulta.Close;
COnsulta.Open;//Para que se cargue el dato agregado

Eso es suponiendo "... En la interfaz de Comprobantes esté el Grid con Los datos de los Clientes?"

{Saludos}
__________________
"...Ayer Bastaba un Sueño..."
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
Obtener combinación de Registros de dos consultas independientes gluglu SQL 4 10-07-2006 17:43:57
llamar mi aplicacion con una combinacion de teclas gulder API de Windows 13 05-09-2005 19:56:35
Averiguar si la combinación de dos campos está en uso DarkByte Conexión con bases de datos 18 28-09-2004 16:59:04
Reporte de combinacion de tablas Choclito Impresión 1 19-07-2004 14:02:11
Combinación de teclas Jose_Pérez API de Windows 2 17-06-2003 11:57:30


La franja horaria es GMT +2. Ahora son las 22:25:50.


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