(Co-Admin)
Registriert seit: 29. Mai 2002
Ort: Hamburg
11.120 Beiträge
Delphi 11 Alexandria
|
20. Dez 2002, 19:58
Moin Chris,
die einfache Variante wäre ein Konstanten Array mit den Texten zu erzeugen.
Delphi-Quellcode:
const
_asShapeNames : array [TVierEckTyp] of string = ('Parallelogramm','Quadrat','Trapez','Rechteck');
Darauf kannst Du dann direkt mit einem der Werte Deines Typs als Index zugreifen.
Tschüss Chris
Die drei Feinde des Programmierers: Sonne, Frischluft und dieses unerträgliche Gebrüll der Vögel.
Der Klügere gibt solange nach bis er der Dumme ist
|