Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)
-   -   Delphi Aufzählung in Byte casten (https://www.delphipraxis.net/93467-aufzaehlung-byte-casten.html)

dr. love 6. Jun 2007 11:56


Aufzählung in Byte casten
 
Hallo ich habe eine Aufzählung wie

Delphi-Quellcode:
TAuto = (BMW, AUDI, VW, FIAT, SEAT, SKODA)
und eine Variable v diesem Typ zugewiesen:

Delphi-Quellcode:
var v: TAuto;
und einem Auto zugeweisen:

Delphi-Quellcode:
v := VW
Jetzt möchte ich einer bytevariablen b aber gerne den bytewert von v zuweisen.

Delphi-Quellcode:
b := byte(v)
funktioniert nicht. Wieso? Was muss ich ändern?

CCRDude 6. Jun 2007 12:02

Re: Aufzählung in Byte casten
 
"Funktioniert nicht" ist so ne tolle Fehlerbeschreibung, die daran schuld ist, daß die meisten Informatiker in jungen Jahren bereits kaum noch Haare auf dem Kopf haben :mrgreen:

Könntest Du vielleicht wenigstens die Fehlermeldung posten, die kommt, oder was Du erwartest und was stattdessen passiert, wenn es keine Fehlermeldung gibt? Dürfte wahrscheinlich helfen Dir zu helfen...

Dani 6. Jun 2007 12:03

Re: Aufzählung in Byte casten
 
probier mal ord(v)

dr. love 6. Jun 2007 12:08

Re: Aufzählung in Byte casten
 
hat sich erledigt, habe eine variable zur zwischenspeicherung eingebaut (eigentlich vollkommener quatsch - aber auch delphi hat so seine macken :lol: ) trotzdem danke für eure antworten... und damit ich noch den ansprüchen gerecht werde: es kam die meldung dass der operator nicht auf den operandentyp passt... warum auch immer

NicoDE 6. Jun 2007 12:19

Re: Aufzählung in Byte casten
 
Zitat:

Zitat von dr. love
es kam die meldung dass der operator nicht auf den operandentyp passt... warum auch immer

Du musst auf einen ordinalen Typ der selben Größe casten (wenn {$MINENUMSIZE 4} aktiv ist, dann wäre das LongInt).


Alle Zeitangaben in WEZ +1. Es ist jetzt 20:55 Uhr.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz