<html>
<head>
<style><!--
.hmmessage P
{
margin:0px;
padding:0px
}
body.hmmessage
{
font-size: 10pt;
font-family:Tahoma
}
--></style>
</head>
<body class='hmmessage'>
Hi All,<div><br></div><div>I have copied the relevant unit to pastebin.com and here it is:</div><div><br></div><div><meta http-equiv="content-type" content="text/html; charset=utf-8"><a href="http://pastebin.com/2v4xw4ep">http://pastebin.com/2v4xw4ep</a></div><div><br></div><div><a href="http://pastebin.com/2v4xw4ep"></a><meta http-equiv="content-type" content="text/html; charset=utf-8"><div style="text-indent: 0px !important; ">unit1.pas(191,18) Error: No member is provided to access property</div><div style="text-indent: 0px !important; ">unit1.pas(192,21) Error: No member is provided to access property</div><div style="text-indent: 0px !important; ">unit1.pas(193,20) Error: No member is provided to access property</div><div style="text-indent: 0px !important; ">unit1.pas(194,10) Error: No member is provided to access property</div><div style="text-indent: 0px !important; ">unit1.pas(195,10) Error: No member is provided to access property</div><div style="text-indent: 0px !important; ">unit1.pas(196,24) Error: No member is provided to access property</div><div style="text-indent: 0px !important; ">unit1.pas(197,14) Error: No member is provided to access property</div><div><br></div><div><div>line 191 follows:</div><div>constructor TIsland.Create(const ATerrain : Terrain_type;</div><div> const ATerrain_char : char;</div><div> const Adescription : description_type;</div><div> const Ax, Ay, Alocation_number : integer;</div><div> const Aexits : exit_type );</div><div>begin</div><div> // Save the passed parameters</div><div> self.Terrain := ATerrain;</div><div> self.Terrain_char := ATerrain_char;</div><div> self.description := Adescription;</div><div> self.x := Ax;</div><div> self.y := Ay;</div><div> self.location_number := Alocation_number;</div><div> self.exits := Aexits;</div><div>end;</div></div><div><br></div><div>Can anyone see what I am doing wrong here, and how do I fix this?</div><div><br></div><div>Best Regards,</div><div>PEW</div><div><br></div><br><hr id="stopSpelling">From: pewilliams2010@live.com<br>To: lazarus@lists.lazarus.freepascal.org<br>Date: Fri, 6 May 2011 17:17:36 +1000<br>Subject: [Lazarus] dtm_maker project compile errors with TList code.<br><br>
<meta http-equiv="Content-Type" content="text/html; charset=unicode">
<meta name="Generator" content="Microsoft SafeHTML">
<style>
.ExternalClass .ecxhmmessage P
{padding:0px;}
.ExternalClass body.ecxhmmessage
{font-size:10pt;font-family:Tahoma;}
</style>
<style>
.ExternalClass .ecxhmmessage P
{padding:0px;}
.ExternalClass body.ecxhmmessage
{font-size:10pt;font-family:Tahoma;}
</style>
<div>Hi All,</div><div><br></div><div>I have uploaded my project with compile time errors to here:</div><div><br class="ecxApple-interchange-newline">> Download link: <br style="text-indent:0px !important">> http://hotfile.com/dl/116917459/8effac0/dtm_maker_002.zip.html<br style="text-indent:0px !important"><br style="text-indent:0px !important"></div><div>And I am getting these errors:</div><div><br></div><div><div>Options changed, recompiling clean with -B</div><div>Hint: Start of reading config file /etc/fpc.cfg</div><div>Hint: End of reading config file /etc/fpc.cfg</div><div>Free Pascal Compiler version 2.4.2-0 [2010/11/11] for i386</div><div>Copyright (c) 1993-2010 by Florian Klaempfl</div><div>Target OS: Linux for i386unit1.pas(191,18) Error: No member is provided to access property</div><div>unit1.pas(192,21) Error: No member is provided to access property</div><div>unit1.pas(193,20) Error: No member is provided to access property</div><div>unit1.pas(194,10) Error: No member is provided to access property</div><div>unit1.pas(195,10) Error: No member is provided to access property</div><div>unit1.pas(196,24) Error: No member is provided to access property</div><div>unit1.pas(197,14) Error: No member is provided to access property</div><div>Compiling island_maker.lpr</div><div>Compiling unit1.pas</div><div>Compiling set_max.pas</div><div>unit1.pas(191,18) Error: No member is provided to access property</div><div>unit1.pas(192,21) Error: No member is provided to access property</div><div>unit1.pas(193,20) Error: No member is provided to access property</div><div>unit1.pas(194,10) Error: No member is provided to access property</div><div>unit1.pas(195,10) Error: No member is provided to access property</div><div>unit1.pas(196,24) Error: No member is provided to access property</div><div>unit1.pas(197,14) Error: No member is provided to access property</div><div>unit1.pas(498,37) Error: Incompatible type for arg no. 3: Got "Array[1..2] Of AnsiString", expected "description_type"</div><div>unit1.pas(184,21) Hint: Found declaration: constructor TIsland.Create(const Terrain_type,const Char,const description_type,const LongInt,const LongInt,const LongInt,const exit_type);</div><div>unit1.pas(503,15) Error: Identifier not found "myList"</div><div>unit1.pas(521,12) Error: Illegal qualifier</div><div>unit1.pas(529,14) Warning: range check error while evaluating constants</div><div>unit1.pas(540,26) Error: Illegal qualifier</div><div>unit1.pas(542,17) Error: Illegal qualifier</div><div>unit1.pas(544,43) Error: Illegal qualifier</div><div>unit1.pas(545,34) Error: Illegal qualifier</div><div>unit1.pas(546,34) Error: Illegal qualifier</div><div>unit1.pas(550,43) Error: Illegal qualifier</div><div>unit1.pas(559,12) Error: Illegal qualifier</div><div>unit1.pas(588,63) Error: Incompatible type for arg no. 7: Got "Pointer", expected "exit_type"</div><div>unit1.pas(184,21) Hint: Found declaration: constructor TIsland.Create(const Terrain_type,const Char,const description_type,const LongInt,const LongInt,const LongInt,const exit_type);</div><div>unit1.pas(607) Fatal: There were 18 errors compiling module, stopping</div></div><div><br></div><div>These errors relate to me modifying my code to try to use a TList. </div><div><br></div><div>Could someone please look at my code and see if you can point of my errors and fixes.</div><div><br></div><div>Best Regards,</div><div>Peter E Williams</div><div>Hobart, Australia</div><div><br></div><div><br></div><div><br></div><div><br></div><div><br></div><div><br></div>
<br>--
_______________________________________________
Lazarus mailing list
Lazarus@lists.lazarus.freepascal.org
http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus</div> </body>
</html>