Einzelnen Beitrag anzeigen

Popov
(Gast)

n/a Beiträge
 
#5

AW: RichEdit Format

  Alt 26. Feb 2013, 14:10
@Ykcim

Ich hab mich mal mit dem Thema näher beschäftigt und kann behaupten, dass es das was du suchst nicht in der Form gibt oder ich es nicht gefunden habe.

Was ich letztendlich gemacht habe und du es auch machen kannst ist Tricksen.

Dein erstes Problem kannst du so lösen:

Delphi-Quellcode:
procedure TForm1.RichEdit1KeyPress(Sender: TObject; var Key: Char);
begin
  if Key = #13 then Key := #0;
end;
Damit fängst du das Enter an. Wenn du den Zeilenumbruch komplett abfangen willst, also auch den durch Einfügen von Text, dann mußt du auch das abfangen.

Dein zweites Problem ist etwas komplexer, aber auch nicht unmöglich. Nur mußt du dann das machen was du eigentlich mit Delphi machen willst: programmieren. Einfach die Texteingabe überwachen. Bei der ersten Eingabe einer Zahl den Startpunkt merken, dann auch den Endpunkt merken, also die erste Nichtzahl. Schon hast du die letzte Zahl die eingegeben wurde. Jetzt das ganze formatieren und den Cursor anpassen.
  Mit Zitat antworten Zitat