La parte de la variable html se ve mal al poner el código con las etiquetas de código delphi:
Lo correcto seria esto:
html := TStringList.Create();
html.Add('<html>');
html.Add('<head>');
html.Add('</head>');
html.Add('<body><h1>Prueba</h1>');
html.Add('<img src="cid:logo.jpg" />');
html.Add('Ahi va la FOTO!</body>');
html.Add('</html>');
Un saludo.