Hola amigos del clubdelphi espero que estén muy bien
Bueno lo que pasa es que tengo un problema el cual va mas o menos así
Trata de hacer una búsqueda secuencial y por tabla
La búsqueda secuencial ya esta y trabajo muy bien la cual funciona así en el evento onchange de un edit le pongo el siguiente código
Código Delphi
[-]begin
If (Edit1.text <> '') then
begin
ADOTable1.Filter := 'mitabla Like '''+ Edit1.Text +'*''';
ADOTable1.Filtered:=True;
end
Else
begin
ADOTable1.Filtered:=False;
ok todo eso esta muy bien pero que pasa si quiero buscar en diferentes tablas
bueno con mi poca experiencia manejando delphi trato de hacer lo que busco
en el evento onchange de un edit pongo este codigo
Código Delphi
[-]begin
if CheckBox1.Checked = true then
begin
If (Edit1.text <> '') then
begin
ADOTable1.Filter := 'mitabla Like '''+ Edit1.Text +'*''';
ADOTable1.Filtered:=True;
end
Else
begin
ADOTable1.Filtered:=False;
begin
if CheckBox2.Checked = true then
begin
If (Edit1.text <> '') then
begin
ADOTable1.Filter := 'mitabla2 Like '''+ Edit1.Text +'*''';
ADOTable1.Filtered:=True;
end
Else
begin
ADOTable1.Filtered:=False;
begin
if CheckBox3.Checked = true then
begin
If (Edit1.text <> '') then
begin
ADOTable1.Filter := 'mitabla3 Like '''+ Edit1.Text +'*''';
ADOTable1.Filtered:=True;
end
Else
begin
ADOTable1.Filtered:=False;
end;
tengo 3 CheckBox y supuesta mente a mi entender el evento onchange deve de ejecutar la parte de codigo que cumpla con lo requerido que en este caso es si al CheckBox esta en true lo mas curioso es que ya lo implemente pero solo me da resultado con la primer tabla (mitabla) pero cuando le pongo en otro CheckBox no hace nada
alguien me podria ayudar de ante mano muchas gracias
