como inserir o conteudo arq .html no body do idmessage

como inserir o conteudo arq .html no idmessage.body da minha
mensagem de email

trecho do programa

IdMessage1.ContentType:=´text/html´;
IdMessage1.Body.Clear;
m_Sl := Tstringlist.Create;
m_Sl.LoadFromFile(FilenameEdit1.Filename);
IdMessage1.Body.Assign(m_SL);
m_sl.Free;

mas não funciona