Hallo Leute,
ich weiss es gibt schon viele Threads dazu aber ich kann das nicht in mein Projekt einsetzen
Also folgendes Problem:
In einem RichEdit1 steht ein Text, z.B.
Quelltext
Dieser Text wird bei einem Buttonklick in ein nicht sichtbares Memo uebertragen unzwar wie folgt:
Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
| procedure TForm1.Vorschau1Click(Sender: TObject);
var
AutoSavePath, AutoSaveFile, AutoSaveName : String;
begin
Memo1.Lines.Add ('<html>');
Memo1.Lines.Add ('<head>');
Memo1.Lines.Add ('</head>');
Memo1.Lines.Add ('<body>');
Memo1.Lines.AddStrings (Richedit1.Lines);
Memo1.Lines.Add ('</body>');
Memo1.Lines.Add ('</html>');
AutoSavePath := ExtractFilePath(Application.Exename);
AutoSaveFile := ExtractFileName(SavePreview.FileName);
AutoSaveName := AutoSavePath + AutoSaveFile;
Memo1.Lines.SaveToFile(AutoSaveName);
end; |
Das ganze wird hier als eine Temporaere HTML Datei gespeichert!
Das
[b] und das
[/b] sollen aber nun durch
<b> und
</b> ersetzt werden.
Wie stelle ich das am besten an?
danke schonmal
mfg Locke
