[serhioli]

Делаешь событие

Код:

procedure btnOkay.OnClick(Sender: TObject);
begin
If (Length(Edit1.Text) > 0) and (Length(Edit2.Text) > 0) then btnStart.Enabled:= true 
end;