Forum: Object-Pascal / Delphi-Language
by Sir Rufo,
7. Dez 2014
@humbuck
Aus dem Grund habe ich den Quellcode auch hier veröffentlicht, weil man ihm das nicht glauben würde. Also habe ich auch nicht seine Hausaufgaben gemacht.
Aber an dem konkreten Beispiel kann man eben die oft abstrakt ans Herz gelegte Trennung zwischen Logik und Ansicht zeigen. Nur darum geht es mir dabei ;)
Forum: Object-Pascal / Delphi-Language
by Sir Rufo,
7. Dez 2014
Du bist herzlich eingeladen das zu machen. Mir ging es generell darum die Trennung zwischen Logik und Anzeige zu zeigen. Wie diese Klasse nun intern arbeitet (Sortierer in eigener Klasse oder ausgelagert auf einem Webserver in Timbuktu) ist der Anzeige völlig wurscht und so soll es sein.
Forum: Object-Pascal / Delphi-Language
by Sir Rufo,
7. Dez 2014
Nun ja, bis auf die Do...-Methoden ist es ja nur Standard abarbeiten :)
Forum: Object-Pascal / Delphi-Language
by Sir Rufo,
7. Dez 2014
Entweder du nimmst ein statisches Array oder ein dynamisches. Ein paar Beiträge zurück findest du die Dejlarationen.
Forum: Object-Pascal / Delphi-Language
by Sir Rufo,
7. Dez 2014
Es macht überigens Sinn, für einzelne Teile separate Methoden zu erstellen:
procedure TForm1.SortArray;
begin
// hier der Code zum Sortieren
end;
function TForm1.ArrayToString : string;
begin
// hier der Code um aus dem Array einen String zu machen
Forum: Object-Pascal / Delphi-Language
by Sir Rufo,
7. Dez 2014
Dann musst du dir halt merken wieweit das Array gefüllt ist. Dafür gibt es Variablen.
Daran kannst du auch festmachen, ob das Array komplett gefüllt ist (keine weitere Eingabe möglich, aber Sortieren jetzt möglich). Mit einem Reset-Button kannst du dann die Variable wieder zurücksetzen.
Forum: Object-Pascal / Delphi-Language
by Sir Rufo,
7. Dez 2014
Ein dynamisches Array var Foo : array of integer; fängt bei 0 an.
Ein statisches Array var Foo : array of integer fängt bei der angegebenen unteren Grenze an (hier 42)!