Bei Enter wort einfügen und neue Zeile

[ByteLord]

jo thx Stanley.

[Stanlay Hanks]

Kein Problem. Wenn du irgendwo nicht weiterkommst, kannst du ja nochmal fragen. :wink:

PS: Stanlay :wink:

Man liest sich, Stanlay :hi:

[ByteLord]

OH Sorry!
Natürlich Stanlay. :mrgreen:

[ByteLord]

Zitat:

Zitat von Stanlay Hanks

Kein Problem. Wenn du irgendwo nicht weiterkommst, kannst du ja nochmal fragen. :wink:

Komm doch nicht weiter mit dem farbig machen.
Kenn mich noch so aus mit delphi. Hab die ganze zeit versucht des irgendwie hinzubasteln aber bekomms nicht hin.

[Stanlay Hanks]

Hi! Dann setz mal das da statt dem bisherigen QT ein:

Delphi-Quellcode:

if key = VK_RETURN then
    begin
    RichEdit1.SelAttributes.Color := clred;
    IF RichEdit1.CaretPos.y <> 0 THEN
    RichEdit1.Lines.Add('');
    richedit1.Lines[richedit1.CaretPos.Y] := richedit1.Lines[richedit1.CaretPos.Y] + '
';
    RichEdit1.SelAttributes.Color := clblack;
    end;
end;

Damit müsste es gehen. Ich hab den Ansatz von Illuminator-23-5 verwendet.

Man liest sich, Stanlay :hi:

[sakura]

Zitat:

Zitat von Stanlay Hanks

PS: Ich will den alten :hi : smiley wieder!

Wie ist der neue Kompromiss?

Im Vergleich mit den Standards :) :( :? 8) :x

Der neue :hi:
Der alte http://www.delphipraxis.net/images/smiles/wave2.gif

...:cat:...

[Stanlay Hanks]

Ich .... will ... meinen .... alten .... <weinkrampf kriegt :cry:> ... smiley....bitte!!!!!

Der alte war soooo cool. So ein richtiger Standard Smiley. :love: Also mir persönlich gefällt der am besten...Nett, dass du nen Kompromiss vorschlägst, aber ich persönlich find den alten am besten! :wink:

Man liest sich, Stanlay <hier wäre normalerweise der : hi : Smiley :mrgreen: >

[ByteLord]

@ Stanlay: Thx nochmal. Hat wunderbar funktioniert. :hello:
cya
ByteLord

[Aya]

Hi,

das ganze geht noch viel leichter... ;)
mit Richedit.SelText kannst du einen Text an der CursorPosition einfügen:

Delphi-Quellcode:

procedure TForm1.RichEdit1KeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
  if Key=VK_RETURN then begin
    RichEdit1.SelAttributes.Color:=clRed;
    RichEdit1.SelText:='
';
    RichEdit1.SelAttributes.Color:=RichEdit1.Font.Color;
  end;
end;

Au'revoir,
Aya~

[Stanlay Hanks]

Naja....da kommen am schluss sachen wie



Hallo

Hallo

Hallo


raus. :wink:
und so sollte es aussehen:



Hallo


Hallo


Hallo

Man liest sich, Stanlay :hi: