🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: pl.comp.lang.delphi
Article #346161

Re: Wskaźnik na typ wyliczeniowy

#346161
From: mmm
Date: Tue, 07 Nov 2017 21:19
31 lines
1746 bytes
> 
> ---------------------------
> 
> Ku mojemu zdziwieniu otrzymuję 258 zamiast oczekiwanego 2.
> Przeglądnąłem wszystko, w innych przypadkach zawsze mi to działało, na domiar złego źle działa tylko za pierwszym wejściem do procedury, za kolejnym wynik jest spodziewany.
> 
> Dlaczego tak się dzieje??

Dostałeś od kompilatora to o co poprosiłeś ;)
Integer to 4Bajty  a TJednostkiSkali to nie wiadomo jaki rozmiar 
(1,2,albo 4Bajty  domyslnie jest 1)

http://docwiki.embarcadero.com/RADStudio/Tokyo/en/Minimum_enumeration_size_(Delphi) 


Wiec traktujac wskaznik jako PINteger dostajesz "extra" bajty które 
powoduja ze nie działa tak jak trzeba , i działa czasmi OK jak trafisz w 
zera ;)

Aby Ci zadziałało mozesz np. dodać
  {$MINENUMSIZE 4}


> 
> 
> Pozdrawiam Roland
> 
> 

M
Technical Details
Message-ID: <ott82g$at4$1@portraits.wsisiz.edu.pl>
Path: mbox-mo1.pugleaf.net!news-archive.icm.edu.pl!news.icm.edu.pl!wsisiz.edu.pl!.POSTED.host-89-228-249-226.dynamic.mm.pl!not-for-mail
References: <659ee257-530b-4314-8a55-c8e8ddf8247f@googlegroups.com>

Show Full Headers
Complete Article Headers
Path: mbox-mo1.pugleaf.net!news-archive.icm.edu.pl!news.icm.edu.pl!wsisiz.edu.pl!.POSTED.host-89-228-249-226.dynamic.mm.pl!not-for-mail
From: mmm <mmm@mm.pl>
Newsgroups: pl.comp.lang.delphi
Subject: Re: Wskaźnik na typ wyliczeniowy
Date: Tue, 7 Nov 2017 22:19:36 +0100
Organization: http://www.wit.edu.pl
Message-ID: <ott82g$at4$1@portraits.wsisiz.edu.pl>
References: <659ee257-530b-4314-8a55-c8e8ddf8247f@googlegroups.com>
Mime-Version: 1.0
Injection-Date: Tue, 7 Nov 2017 21:20:16 -0000 (UTC)
Injection-Info: portraits.wsisiz.edu.pl; posting-host="host-89-228-249-226.dynamic.mm.pl:89.228.249.226"; logging-data="11172"; mail-complaints-to="abuse@wsisiz.edu.pl"
User-Agent: Mozilla/5.0 (Windows NT 10.0; WOW64; rv:52.0) Gecko/20100101 Thunderbird/52.4.0
In-Reply-To: <659ee257-530b-4314-8a55-c8e8ddf8247f@googlegroups.com>
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit