RichEdit

[RomanK]

Zitat von Jelly:

wie ich formatierten Code reinkrieg zu Laufzeit ist mir klar

Wer lesen kann ist klar im Vorteil

[Cuchulainn]

Zitat von Jelly:

Zitat von Cuchulainn:

...aber möglicherweise könntest du das im OnCreate-Ereignis des Formulars erledigen.

OK, und weiter? Ich krieg einfach keine Formatierungen rein.

Gruß,
tom

Im OnCreate kannst du ja dann mit SelStart, SelLength, SelAttributs arbeiten.

[Matze]

Das Problem ist nur, wie soll man aus der Zwischenablage etc. die Formatierung auslesen.

[Jelly]

Zitat von Matze:

Das Problem ist nur, wie soll man aus der Zwischenablage etc. die Formatierung auslesen.

Du hast es genau erfasst...
Aber ich such mal nach einer alternativen Richedit Lösung... Gibts doch bestimmt irgendwo bei DSP o.ä.

Danke für alle Antworten,
Gruß,
Tom

[Bobator]

speicher doch den text in formatierter-form als ressource und lade ihn dann mit LoadFromStream.

[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

[gothic_mike]

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; 
...

[Jelly]

Danke gothic_mike ,

deine Lösung klappt einwandfrei...

Gruß,
Tom