Pourquoi ne pas demander seulement le nom du fichier (sans l'extension) dans ton TEdit puis ajouter par programmation cette extension (MonTitreDeFichier := MonEdit.Text + '.html';) ?
;)