Moin,
Zitat von
Jelly:
Zitat von
Bobator:
speicher doch den text in formatierter-form als ressource und lade ihn dann mit LoadFromStream.
Das wäre für ne Lösung. Hast du auch ein Beispiel wie?
Gruß,
Tom
ich hatte vor kurzem das gleiche problem, habs so gelöst:
- erstellen der irgendwas.rtf - Datei mit word o.ä.
- irgendwas.rc mit folgendem inhalt erstellen:
IRGENDWAS RCDATA "irgendwas.rtf"
- die rc mit brcc32.exe compilieren
"brcc32.exe irgendwas.rc"
- dann im sourcecode folgendes einfügen:
Delphi-Quellcode:
...
implementation
{$R *.dfm}
{$R irgendwas.res} // <-- die von bcc32.exe erzeugte datei
procedure TForm1.Button1Click(Sender: TObject);
var
res: TResourceStream;
begin
res := TResourceStream.Create(hinstance, 'IRGENDWAS', RT_RCDATA);
try
Richedit1.PlainText := False;
res.Position := 0;
Richedit1.Lines.LoadFromStream(res);
finally
res.Free;
end;
end;
...