Hola...
ecfisa, yo creo que más bien se refiere a donde coloca el código del método y no desde donde hace la llamada al método...
En dado caso, sería algo así:
Código Delphi
[-]
type
TMyForm = class(TForm)
private
procedure DateSearch(ADate: TDate; AQuery: TQuery);
end;
implementation
procedure TMyForm.DateSearch(ADate: TDate; AQuery: TQuery);
begin
AQuery.Close;
AQuery.SQL.Text := 'select * from Tabla where Fecha = :Fecha';
AQuery.ParamByName('Fecha').AsDate := ADate;
AQuery.Open
end;
end.
Saludos...