Cita:
Empezado por oscarac
exactamente cual es el problema?
|
lo que pasa es que tengo un adoconection , adatable, y un datasourse
la tabla tienes tres campos yo tenia la idea de especificar en que campo si hiciera la búsqueda con unos checkbox
con este código
Código Delphi
[-]procedure TFClientes.Edit1Change(Sender: TObject);
begin
datamodule1.tarchivo.Filtered := False;
if (Edit1.Text <> '') then
begin
if CheckBox1.Checked then
begin
datamodule1.tarchivo.Filter := 'Nombre Like ''' + Edit1.Text + '*''';
datamodule1.tarchivo.Filtered := True
end
else if CheckBox2.Checked then
begin
datamodule1.tarchivo.Filter := 'Numero Like ''' + Edit1.Text + '*''';
datamodule1.tarchivo.Filtered := True
end
else
datamodule1.tarchivo.Filtered := False;
end;
end;
como podrás darte cuenta todo depende de los checkbox
el error es cuando se usa el checkbox2, me dice caral que se salta el like y por eso no a parece nada en la busqueda
espero explicarme bien y bueno caral ya medio otro ejemplo lo estoy tratando
alguna idea ?????
tu rutina esta muy bien pero no entiendo nada del codigo que has puesto ?????
disculpa me ignorante persona