Der gute alte ORD Befehl

**ATS3788**

Delphi-Quellcode:

			type

TDIN_Format = (DinA4, DinA5);

var

DIN_Format : TDIN_Format;

......

i := ord(DIN_Format.DinA4); /// i = 0

Geht das auch umgekehrt.
DIN_Format einen Wert über eine Ordinante zuzuweisen.
Also nicht wie normal _DIN_Format := DinA4;

Ist das verständlich

**FredlFesl**

Verwende einen Typecast:

markieren

Delphi-Quellcode:

			type

  TDIN_Format = (DinA4, DinA5);

var

  DIN_Format : TDIN_Format;

......

  DIN_Format = TDIN_Format(0); // <== DinA4;

  DIN_Format = TDIN_Format(5); // <== 5 geht zwar nicht, ist aber möglich, also aufgepasst!

**webcss**

markieren

Delphi-Quellcode:

			type

TDIN_Format = (DinA4, DinA5);

var

DIN_Format : TDIN_Format;

......

i := integer(DIN_Format.DinA4); /// i = 0

**ATS3788**

Danke
Schönen 1.Mai

Der gute alte ORD Befehl

Der gute alte ORD Befehl

AW: Der gute alte ORD Befehl

AW: Der gute alte ORD Befehl

AW: Der gute alte ORD Befehl

Forumregeln

ATS3788 Registriert seit: 18. Mär 2004 Ort: Kriftel 646 Beiträge Delphi XE Starter	#1 Der gute alte ORD Befehl 30. Apr 2011, 07:42 markieren Delphi-Quellcode: type TDIN_Format = (DinA4, DinA5); var DIN_Format : TDIN_Format; ...... i := ord(DIN_Format.DinA4); /// i = 0 Geht das auch umgekehrt. DIN_Format einen Wert über eine Ordinante zuzuweisen. Also nicht wie normal _DIN_Format := DinA4; Ist das verständlich Martin MIchael
	Zitat

webcss Registriert seit: 10. Feb 2006 255 Beiträge Delphi XE2 Professional	#3 AW: Der gute alte ORD Befehl 30. Apr 2011, 13:48 markieren Delphi-Quellcode: type TDIN_Format = (DinA4, DinA5); var DIN_Format : TDIN_Format; ...... i := integer(DIN_Format.DinA4); /// i = 0 "Wer seinem Computer Mist erzählt, muss immer damit rechnen..." (unbekannt) "Der Computer rechnet damit, dass der Mensch denkt..." (auch unbekannt) mein blog
	Zitat

ATS3788 Registriert seit: 18. Mär 2004 Ort: Kriftel 646 Beiträge Delphi XE Starter	#4 AW: Der gute alte ORD Befehl 1. Mai 2011, 07:47 Danke Schönen 1.Mai Martin MIchael
	Zitat