Einzelnen Beitrag anzeigen

ReVenGer

Registriert seit: 11. Okt 2005
Ort: Hannover
50 Beiträge
 
Delphi XE7 Architect
 
#3

AW: Delphi Richedit Parsen und Fontcolor auslesen

  Alt 7. Apr 2013, 12:45
Die RGB Werte reichen ja schon als Identifikation. Die könnte ich dann entsprechend ersetzen und den Text inkl. verarbeitetem RGB Code in ein anderes Richedit einfügen.
Nur wie Parse ich das?

void __fastcall TForm7::Button1Click(TObject *Sender)
{
int textLength, i;
TConsistentAttributes textAttribute;
TColor textColor;

textLength = RichEdit1->Text.Length() ;

for (i = 0; i < textLength; i++) {
RichEdit1->SelStart = i;
RichEdit1->SelLength = 1;
textAttribute = RichEdit1->SelAttributes->ConsistentAttributes;
if (textAttribute.Contains(caColor))
{
textColor = RichEdit1->SelAttributes->Color;
if (textColor == clRed) {

}

}

}

So würde ich es in C++ machen.

Geändert von ReVenGer ( 7. Apr 2013 um 13:42 Uhr)
  Mit Zitat antworten Zitat