Einzelnen Beitrag anzeigen

nahpets
(Gast)

n/a Beiträge
 
#22

Re: Txt-Datei automatisch als E-Mail versenden

  Alt 22. Feb 2010, 13:19
Hallo,

mach Dir doch zwei Stringlisten, eine für's HTML eine für die CSS-Datei.

In die HTML-Datei setzt Du Dir 'nen Platzhalter, den Du durch den Text der CSS-Datei ersetzt. Ungefähr so:
Delphi-Quellcode:
slCSS.LaodFromFile('MB.CSS');
slHTML.Add('<head>');
slHTML.Add('<link rel="stylesheet" type="text/css" href="MB.css"');
slHTML.Add('<Style type="text/css"><#CSS></style>');
slHTML.Add('<title>Protokolldatei</title>');
slHTML.Add('</head>');
slHTML.Text := AnsiReplaceText(slHTML.Text,'<#CSS>',slCSS.text);
Du kannst die CSS-Datei getrennt pflegen und nutzen und nur für die Mail wird sie in die HTML-Seite "hineingewuselt".
  Mit Zitat antworten Zitat