Hi
in meinem Programm muss der Benutzer aus einer festgelegten Anzahl von Werten eines selbst definierten Typs auswählen.
ich habe eine Combobox, die ich gerne mit Werten dieses Typs füttern möchte.
Beispiel:
type FruchtTyp = (Banane, Apfel, Birne, Kiwi);
Jetzt habe ich eine Funktion, die den Ordinalwerten einen String zuordnet:
Delphi-Quellcode:
function FruchtTypToStr(FruchtTyp: FruchtTyp): String;
begin
Case FruchtTyp of
Banane: FruchtTypToStr := 'Banane';
Apfel: FruchtTypToStr := 'Apfel';
Birne: FruchtTypToStr := 'Birne';
Kiwi: FruchtTypToStr := 'Kiwi';
end;
end;
Wie kann ich alle Werte (Anzahl variabel, hab keine Lust jedesmal alle Comboboxen zu aktualisieren^^) über die Funktion FruchtTypToStr in eine ComboBox hinzufügen?
Gibts es eine Art Count Methode? Dann könnte ich mit einer simplen For-Schleife alle Einträge hinzufügen.
2. Problem:
Wie finde ich heraus, was der Benutzer ausgewählt hat? Meine Combobox ist nach Alphabet geordnet.
Danke schonmal.