AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Thema durchsuchen
Ansicht
Themen-Optionen

TRichEdit Einzelne Zeile Formatieren

Ein Thema von 5etH · begonnen am 11. Mai 2009 · letzter Beitrag vom 13. Mai 2009
 
Benutzerbild von 5etH
5etH

Registriert seit: 4. Mär 2008
Ort: Giessen
217 Beiträge
 
Delphi 2007 Professional
 
#4

Re: TRichEdit Einzelne Zeile Formatieren

  Alt 12. Mai 2009, 19:05
Guten Abend,

habe mir jetzt einmal eine Eigene Prozedur gebastelt aber irgendwie haut das nicht hin. Der Fehler zeigt sich so das er das was er Rechtsbündig setzen sollte nicht macht oder erst eine Zeile zu Spät ich kann den Fehler leider nicht finden und hoffe das ihr mir helfen könnt.

Delphi-Quellcode:
procedure ADDROW(RE : TRichedit; TEXT : String; Align : TAlignment);
var
SEL1,SEL2 : Integer;
begin
  SEL1 := 0;
  SEL2 := 0;

  SEL1 := length(RE.text);

  RE.Lines.add(TEXT);

  SEL2 := length(RE.text);

  RE.SelStart := SEL1;

  RE.SelLength := (SEL2-SEL1);

  RE.Paragraph.Alignment := Align;

end;
schon mal vielen Dank im voraus
Gruß
manu
Manuel
Lieber heimlich schlau als unheimlich dumm
  Mit Zitat antworten Zitat
 


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 23:38 Uhr.
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz