procedure TForm1.FormKeyUp(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
if (length(combobox1.text)=длина) and (length(edit1.text)=длина) then
button1.enabled:=true;
end;

Или я торможу ? Видемой это как ? Enabled или visible ? И нуно еще в свойствах формы врубить KeyPreview в True;