Да знаю я это. Я просто не понял. Ему начали давать советы и везде используют Enabled. Я подумал, может я такой тупой что не могу догнать. А так тогда получится

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

И нуно еще в свойствах формы врубить KeyPreview в True; (в свое время когда забывал это ставить и код не работал когти рвал не тока на руках... )