Zitat von
oogie:
und was ist eigentlich ein "set"?
ein Set ist eine Sammlung von ordinalen Typen (also z.B. Zahlen, Chars, aber keine Strings, Klassen usw).
Delphi-Quellcode:
type
TFrucht = (Apfel, Banane, Birne, Kiwi);
TFruechte = set of TFrucht;
var
Fruehstueck: TFruechte;
begin
//Das Set festlegen
Fruehstueck := [Apfel, Birne];
//Ein Element zum Set hinzufügen
Include(Fruehstueck, Banane);
//Ein Element aus dem Set entfernen
Exclude(Fruehstueck, Apfel);
//Abfragen, ob ein Element im Set enthalten ist
If Birne in Fruehstueck then ShowMessage('Heute gibt''s eine Birne zum Frühstück.');
end;
Wenn du dir z.B. den OnMouseMove Event eines Panels anguckst, da gibt es einen Parameter "Shift". Das ist ein Set, mit dem du prüfen kannst, ob z.B. die linke Maustaste oder STRG gedrückt ist.
Gruß,
Dani
Dani H.
At Least I Can Say I Tried