[ecfisa]

Empezado por Vales08

Mi problema es que no puedo poner el nombre del botón en el código que me pasaste, porque no me lo reconoce y es obvio porque esta ubicado en un formulario distinto del datamodule..
No se si me logro explicar? En el data module estoy haciendo referencia a un boton que no existe en el mismo.

Ahora te entiendo...

Hacé así:

Código Delphi [-]
...
 TForm1 = class(TForm)
    procedure FormCreate(Sender: TObject);
    ...
    procedure FormDestroy(Sender: TObject);
  private
    procedure TuQueryAfterScroll(DataSet: TDataSet);
  public
  end;
...
implementation

uses UnitDelDataModule;

procedure TForm1.TuQueryAfterScroll(DataSet: TDataSet);
begin
  Button1.Enabled := TuDataModule.TuQuery.FieldByName('TU_CAMPO').AsString <> '';
end;

procedure TForm1.FormCreate(Sender: TObject);
begin
  TuDataModule.TuQuery.AfterScroll:= TuQueryAfterScroll;
end;

....

procedure TForm1.FormDestroy(Sender: TObject);
begin
  TuDataModule.TuQuery.AfterScroll:= nil;
end;

end.

Un saludo.