vor

Beispiele für Routinen

weiter

Sortieren

Von großer Wichtigkeit sind Sortierroutinen. Natürlich sind sie oft vorprogrammiert. Aber manchmal muss man doch selbst eine solche Routine schreiben.

Folgendes Beispiel soll die schrittweise Realisierung eines Sortiervorganges zeigen. Dazu wird eine Tabelle (StrinGrid) Zeile für Zeile immer weiter sortiert, bis in der letzten Zeile die Zahlenfolge aufsteigend sortiert ist.

Dabei soll erkannt werden, dass die größte Zahl schon nach dem ersten Sortierdurchgang ganz rechts steht und bei jedem weiteren Durchgang immer ein Vergleich weniger notwendig ist. So kann man das Verständnis für Bubblesort vorbereiten.

Weil der Anwender hier keine Eingaben in die Tabelle machen soll, bleiben die StringGrid-Options "goEditing" und "goTabs" auf "false" gesetzt.
Sortieren
Komponente Eigenschaft Wert Bemerkungen
Form1 Caption 'Sortieren' Programmfenster mit den benötigten Komponenten
Label1 Caption 'Geben Sie nacheinander 10 beliebige Zahlen ein!' Aufgabe stellen
Edit1 Text '0' Eingabefeld
StrinGrid1 ColCount und RowCount 10 Spalten- und Zeilenzahl
FixedCols und FixedRows 0 keine Titelspalte oder -zeile
Options goEditing und goTabs false keine Editiermöglichkeit für den Anwender
Button1 Caption 'schrittweise sortieren' Aufschrift auf dem Schalter
Button2 Caption 'Start' Aufschrift auf dem Schalter
Button3 Caption 'sofort sortieren' Aufschrift auf dem Schalter
BitBtn1 Kind bkClose Schließen-BitButton
BitBtn2 Kind bkCustom Zurücksetzen-BitButton
Lösung
vor

Inhaltsverzeichnis

weiter