[Страдалецъ]

В общем вот так проводится тест активной вкладки по нужному вам критерию:

Код:

procedure TForm1.Edit4Change(Sender: TObject);
Var i: Integer;
    TS: TTabSheet;
    TestResult: Boolean;
begin
 TS := TTabSheet(TEdit(Sender).Parent);
 TestResult := True;
 for i := 0 to TS.ControlCount - 1
 do if TS.Controls[i].ClassType = TEdit
    then if TEdit(TS.Controls[i]).Text = ''
         then begin
              TestResult := False;
              Break;
              end;
 Button1.Enabled := not TestResult;
end;

Единственное что вам надо доработать, это присвоить правильной кнопке свойство Enabled