Club Delphi  
    Paypal   FTP   CCD     Buscar   Trucos   Trabajo   Foros

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

Coloboración Paypal con ClubDelphi

 
 
Herramientas Buscar en Tema Desplegado
  #6  
Antiguo 06-08-2006
Avatar de courtois
courtois courtois is offline
Miembro
 
Registrado: abr 2006
Ubicación: Mexico DF
Posts: 200
Poder: 21
courtois Va por buen camino
podria ser algo asi?
Código Delphi [-]
procedure TMenuImpAsig.BtRepAsigImpClick(Sender: TObject); Var texto1,texto2: String; begin
 texto1:=Edit1.Text;
 texto2:=Edit2.Text;

With module.QrReporteAsignaturas do begin 
close; 
Sql.Clear; 
Sql.add('SELECT Insc.Cod_Est, insc.Fecha_Insc,Est.Nombre, Prof.Nombre, Asigna.Asig');  sql.add('FROM  Isnc, Est, Prof, Asigna');  
Sql.add('WHERE Insc.cod_Est = Est.Cod_Est AND Insc.Cod_Prof =  Prof.Cod_Prof AND Insc.Cod_Asig = Asigna.Cod_Asig And Asigna.Cod_Asig like ' +texto1+' and otro_campo = '+texto2);
  Open;

end;

end;

claro es una solución que se puede mejorar mucho...
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
Una ayudita con TShape JerS Varios 8 28-04-2010 04:07:11
ayudita please, sencillo Otei OOP 3 18-11-2005 22:25:10
una ayudita en un reporte Ricky Martin SQL 1 07-08-2005 15:24:16
una ayudita Delphius Varios 4 16-01-2005 11:24:58
ayudita con el tquery vetustas SQL 3 27-10-2003 20:07:22


La franja horaria es GMT +2. Ahora son las 07:29:46.


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