🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: pl.comp.lang.pascal
Article #93058

Rzutowanie tablicy na tablice

#93058
From: webmajsterek
Date: Mon, 19 Jul 2010 17:29
31 lines
1670 bytes
mam taki problem --  fpc z jakiś powodów zle rzutuje tablice na tablice.

w obiekcie TempList mam liste obiektów 

type 
  TArray = Array[0..0] of MyObject;

var Tablica:TArray; 
    TempList:TObjectList;
Adres:=TempList.List;
// pobranie adresu gdzi znajduej sie tablica 
// ze wskaznikami do obiektow ;

Tablica:=@Adres[Stos];
//rzutowanie tablicy na tablice 

ten powyżej przykład działa . 

jednak gdy zmienie definicje TArray wstawiajacza jakąs liczbe wieksza  to 
rzutowanie przestaje działać 

type TArray  = Array[0..MaxListSize - 1] Of MyObject;

--  po rzuowaniu popraweny wynik dostaje tylko przy odwołaniu do zerowego 
elementu Tablica .
 Odwoływanie sie do kolejnych to już czysta loteria .

Któś ma pomysł na to co  jest nie tak ??

-- 
Wysłano z serwisu OnetNiusy: http://niusy.onet.pl
Technical Details
Message-ID: <47f6.000007f2.4c448b91@newsgate.onet.pl>
Path: mbox-mo1.pugleaf.net!news-archive.icm.edu.pl!news.icm.edu.pl!news.onet.pl!newsgate.onet.pl!niusy.onet.pl

Show Full Headers
Complete Article Headers
Path: mbox-mo1.pugleaf.net!news-archive.icm.edu.pl!news.icm.edu.pl!news.onet.pl!newsgate.onet.pl!niusy.onet.pl
From: webmajsterek@poczta.onet.pl
Newsgroups: pl.comp.lang.pascal
Subject: Rzutowanie tablicy na tablice
Date: Mon, 19 Jul 2010 19:29:53 +0200
Organization: Onet.pl
Lines: 31
Sender: news@newsgate.onet.pl
Message-ID: <47f6.000007f2.4c448b91@newsgate.onet.pl>
NNTP-Posting-Host: newsgate.onet.pl
Mime-Version: 1.0
X-Trace: newsgate.onet.pl 1279560593 28197 213.180.130.18 (19 Jul 2010 17:29:53 GMT)
X-Complaints-To: niusy@onet.pl
NNTP-Posting-Date: Mon, 19 Jul 2010 17:29:53 +0000 (UTC)
X-Mailer: http://niusy.onet.pl
X-Forwarded-For: 83.20.156.73, 10.174.28.53
X-User-Agent: Mozilla/4.0 (compatible; MSIE 8.0; Windows NT 5.1; Trident/4.0)
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit