RichEdit->PlainText

[Gast]

Tja, weiß nicht. Die Lösung gefällt mir zwar nicht wirklich, aber mir fällt auch nichts besseres ein. Müßte ich mich mal mit auseinander setzen. Dazu fehlt mir aber die Zeit.

[Trulli]

Mir gefällt die Lösung auch nich richtich

[Nighthero]

Hallo, ich habe das mal vor einiger Zeit so gemacht:

//==============================================================================
/*!
	 \brief   set formated text (RichText) to RTF control

	 \param   AnsiString RtfCode - formated text (RichText)
	 \retval  none
	 \return  void
*/
//==============================================================================                                         
void __fastcall TfrmCommentDialog::SetText(AnsiString RtfCode)
{
	TStringStream *pStream = new TStringStream(RtfCode);

	rtfText->Lines->LoadFromStream(pStream);
	delete pStream;
}

//==============================================================================
/*!
	 \brief   get formated text (RichText) from RTF control

	 \param   void
	 \retval  none
	 \return  AnsiString - formated text (RichText)
*/
//==============================================================================                                         
AnsiString __fastcall TfrmCommentDialog::GetText()
{
	TStringStream *pStream = new TStringStream("");
	AnsiString saRtfCode;

	rtfText->Lines->SaveToStream(pStream);
	saRtfCode = pStream->DataString;
	delete pStream;
	return saRtfCode;
}

Gruß Nighthero

[Trulli]

Ja aber,
So hast Du das ganze RichEdit im TMemoryStream.
Wenn Du vorher ins Clipboard kopierst kannst Du eben auch nur die selektierte Auswahl holen

[Sunday]

du solltest statt richedit 1.0 mind. die richedit 2.0 verwenden, dort gibts dann multilevel undo/redo

siehe MDSN:

EM_GETTEXTMODE, EM_GETUNDONAME, EM_GETREDONAME, EM_SETUNDOLIMIT

http://msdn.microsoft.com/library/default.asp?url=/library/en-us/shellcc/platform/commctls/richedit/richeditcontrols/aboutricheditcontrols.asp

[Trulli]

Danke für den Tip.

Verstehe aber nur ein Viertel.
z.B CreateWindowEx? geht gar nich rein.

[Sunday]

http://home.att.net/~robertdunn/Yacs.html
http://home.att.net/~robertdunn/CodeSamples/RichEdit20.zip

[Trulli]

Probiere gerade den Code aus und werde mit Fehlern bombardiert.

Erst fing es an in der Funktion
bool TRichEdit20::FindTextEx(AnsiString text, int startPos,
TFindOptions findOptions, int& foundPos, int& foundLength)

in class richedit20
Da kam es zu Zweideutigkeiten mit
FINDTEXTEX.
Ich habe dann daraus Richedit::FINDTEXTEX gemacht.

Das wurde zwar akzeptiert, aber jetzt hagelt es andere Fehler
Alles voll mit "......Typname erwartet"

[Sunday]

fang doch erstmal klein an und nimm nur den teil der die richedit20.dll laedt und das entspr. steuerelement auf deinem formular erzeugt. damit du erst einmal sichre sein kannst, dass es ueberhaupt funktioniert.

[Trulli]

Jetzt funktioniert alles,
Weiß auch nicht so genau warum.

Danke erst mal.