Buscador en REPORTES (TQuickRep)
Publicado por Antonio (75 intervenciones) el 21/11/2009 18:59:36
Mis estimados amigos:
en mi programa tengo una area de reportes (Report) y puedo ver los reporte por medio de un RadioButton1 y un Prever y se va al ultimo archivo de folio y todo bien.. lo que quiero es ahora.. como puedo buscar por folio sin tener que recorrer todos los folios.. quisiera tener un buscador como los que tengo dentro de Form1 en forna normal..
procedure TForm1.BitBtn1Click(Sender: TObject);
var L:boolean;
begin
L:=table1.Locate('FOLIO', edit1.text,[]);
if L then
showmessage('FOLIO' +' '+' Si Esta el Paciente') else
showmessage('FOLIO' +' '+' No Existe');
lo que quiero es que busque dentro de los reportes el folio y me lo seleccione para que yo seleccione RadioButton1 y un Prever y se vaya directo a el folio que quiero y poder imprimir.. y no tener que buscarlo dentro de los demas..
espero que me haya explicado.. si alguien me entendio.. se lo agradesco me mande un codigo o me diga como puedo hacerlo...
NOTA: es un buscador para Report (TQuickRep)
gracias,,,
saludos desde Chile
en mi programa tengo una area de reportes (Report) y puedo ver los reporte por medio de un RadioButton1 y un Prever y se va al ultimo archivo de folio y todo bien.. lo que quiero es ahora.. como puedo buscar por folio sin tener que recorrer todos los folios.. quisiera tener un buscador como los que tengo dentro de Form1 en forna normal..
procedure TForm1.BitBtn1Click(Sender: TObject);
var L:boolean;
begin
L:=table1.Locate('FOLIO', edit1.text,[]);
if L then
showmessage('FOLIO' +' '+' Si Esta el Paciente') else
showmessage('FOLIO' +' '+' No Existe');
lo que quiero es que busque dentro de los reportes el folio y me lo seleccione para que yo seleccione RadioButton1 y un Prever y se vaya directo a el folio que quiero y poder imprimir.. y no tener que buscarlo dentro de los demas..
espero que me haya explicado.. si alguien me entendio.. se lo agradesco me mande un codigo o me diga como puedo hacerlo...
NOTA: es un buscador para Report (TQuickRep)
gracias,,,
saludos desde Chile
Valora esta pregunta


0