Forum: Algorithmen, Datenstrukturen und Klassendesign
by -187-,
25. Mär 2011
Um dir eine weitere Methode vorzustellen hab ich noch eine Lösung für dich. Du behälst deinen alten Code und nach der Schleife fügst du diesen Code ein: (Natürlich ist die andere Lösung sinnvoller - Dient nur zur Demonstration)
AusgabeBox.Text:=StringReplace(AusgabeBox.Text, sLineBreak, ',',);
Zum PageControl gibts erstmal nicht viel zu sagen. Einfach auf die Form ziehen, die Subpages...
Forum: Algorithmen, Datenstrukturen und Klassendesign
by -187-,
25. Mär 2011
if zahl > 0 then
AusgabeBox.Text:=AusgabeBox.Text+','+(IntToStr(i));
Oder hab ich das Problem falsch verstanden ?
Edit:
Problem2: TPageControl