[ecfisa]

Hola wile777.

Empezado por wile777

ME DA ESTOS ERRORES:

[Error] Unit1.pas(97): Undeclared identifier: 'btnSearchOneClick'
[Error] Unit1.pas(97): ';' expected but '(' found
[Error] Unit1.pas(99): Undeclared identifier: 'SearchData'
[Error] Unit1.pas(99): Undeclared identifier: 'Edit1'
[Error] Unit1.pas(100): Statement expected, but expression of type 'Text' found
[Error] Unit1.pas(102): Undeclared identifier: 'ButtonFilterClick'
[Error] Unit1.pas(102): ';' expected but '(' found
[Error] Unit1.pas(104): Undeclared identifier: 'FilterData'
[Error] Unit1.pas(104): Undeclared identifier: 'Edit1'
[Error] Unit1.pas(105): Statement expected, but expression of type 'Text' found
[Error] Unit1.pas(108): Undeclared identifier: 'btnFilterOffClick'
[Error] Unit1.pas(108): ';' expected but '(' found
[Error] Unit1.pas(110): Undeclared identifier: 'ADOTable1'
[Error] Unit1.pas(113): '.' expected but ';' found
[Error] Unit1.pas(35): Unsatisfied forward or external declaration: 'TForm1.Button2Click'
[Fatal Error] Project1.dpr(6): Could not compile used unit 'Unit1.pas'

Por órden de aparición, controla que:

1. En tu form exista un componente TButton y se llame "btnSearchOneClick".
2. ¿ Copiaste y pegaste la función "SearchData" ?.
3. En tu form exista un componente TEdit y se llame "Edit1".
4. En tu form exista un componente TButton y se llame "ButtonFilterClick".
5. ¿ Copiaste y pegaste la función "FilterData" ?.
6. En tu form exista un componente TButton y se llame "btnFilterOffClick".
7. En tu form exista un componente TADOTable y se llame "ADOTable1".
8. Que el componente "Button2" tenga asociado el método "Button2Click".
9. Que tu form se llame "Form1".

Saludos