Einzelnen Beitrag anzeigen

Hobby-Programmierer

Registriert seit: 19. Jan 2006
Ort: München
392 Beiträge
 
Delphi XE Starter
 
#5

Re: Zeilen im RichEdit Nummerieren

  Alt 27. Mär 2007, 02:48
Moin ...,
Zitat von manfred07:
Wie bekomme ich es hin das ich in 5 Schritten zählen kann.

N0005
N0010
N0015
einfach Blackhearts Code anpassen (Schleifen variable *5)
Delphi-Quellcode:
for i := 0 to Sl.Count - 1 do
  RichEdit1.Lines.add('N'+ Format('%.04d',[(i+1) *5]) + ' ' + Sl[i]);
oder aber
Delphi-Quellcode:
  with RichEdit1 do begin
  for i:= 0 to Lines.Count -1 do
    Lines.Strings[i]:= Format('N%.04d',[(i+1)*5]) + ' '+ Lines.Strings[i];
end;
LG Mario
Mario
'Lesen Sie schnell, denn nichts ist beständiger als der Wandel im Internet!'
  Mit Zitat antworten Zitat