RichEdit

Todd

Grünschnabel
Hallo,

ich habe ein RichEdit und möchte folgendes tun.

Pseudo-Code:
Code:
 RichEdit->Aktive Zeile = erste Zeile; Alle anderen Zeilen inaktiv; 
 Fester Wert der ersten 15 Zeichen: ">> ";(Eingabe nur in erste Zeile möglich und erst nach 
 diesen ersten 15 Zeichen, Backspace nicht möglich);
 Bei Enter: Erste Zeile wird inaktiv - man kann nicht mehr in diese springen. Zweite Zeile
 wird aktiv und bekommt als feste erste 15 Werte ">> ". Alle anderen unteren Zeilen sind
 ebenfalls inaktiv.
 usw...
 usw...

Mein erster redundanter Ansatz:
Code:
void __fastcall TForm1::RichEdit1KeyPress(TObject *Sender, char &Key)
{
AnsiString keyString[25];
  keyString[0] = Key;
  if (Key=='\r')
  {//int a=RichEdit1->Lines->Count;
   RichEdit1->Paragraph->FirstIndent = 15;
   RichEdit1->Lines->Append(">> ");
  }
  else
  {}
}

Ich hab schon alles versucht, aber es nicht hinbekommen. HILFE :confused:

Todd