Problem mit Sonderzeichen.

Melanie · Beiträge: 33

Hallo,ich habe folgendes Problem,wie bekomme ich das Sonderzeichen an den Text angefügt und nicht immer in eine neue Zeile.

markieren

Delphi-Quelltext

1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:

     procedure TForm1.RichEdit1KeyDown(Sender: TObject; var Key: Word;
     Shift: TShiftState);
     var c:char;
  begin

  c:='®';
    if key =VK_F2 then richedit1.Lines.Append(c);
 
     end;

   end.

Vielen Dank
Melly :roll:

Moderiert von Christian S.: Code- durch Delphi-Tags ersetzt.

AXMD · Verfasst: Mo 20.12.04 17:56

RichEdit2.Text := RichEdit2.Text + 'c'?

AXMD

Basti · Beiträge: 345 Windows Vista D2005 Pers, D7 Pers

markieren

Delphi-Quelltext

1:	RrichEdit1.Lines[RichEdit1.Lines.Count-1] := RrichEdit1.Lines[RichEdit1.Lines.Count-1]+c;

(AXMD: Kein Edit, so ein RichEdit, also so eine Art Memo)

_________________
Der Computer ist die logische Weiterentwicklung des Menschen: Intelligenz ohne Moral.

AXMD · Verfasst: Mo 20.12.04 18:07

@Basti: Funktioniern würds trotzdem

AXMD

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme