🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

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

Dziedziczenie po TList<T>

#346718
From: konsul41
Date: Wed, 22 Aug 2018 09:42
26 lines
1526 bytes
Próbuję dziedziczyć po TList<T> i dodać coś po ADD


...
TCialo_Rozny = class;

...

TMyList<T> = class(TList<T>)
   private;
   public
     function Add(const Value: T): Integer; overload;
   end;

...


function TMyList<T>.Add(const Value: T): Integer;
var row : TCialo_Rozny;
begin
   result:=Self.Add(Value);

//jak prawidłowo dobrać się do listy po której dziedziczę

   row:=TCialo_Rozny(Items[Result]);
//niedziała
Technical Details
Message-ID: <5b7d3018$0$681$65785112@news.neostrada.pl>
Path: mbox-mo1.pugleaf.net!news-archive.icm.edu.pl!news.icm.edu.pl!news.nask.pl!news.nask.org.pl!news.unit0.net!newsreader4.netcologne.de!news.netcologne.de!peer01.ams1!peer.ams1.xlned.com!news.xlned.com!peer01.fr7!futter-mich.highwinds-media.com!news.highwinds-media.com!newsfeed.neostrada.pl!unt-exc-01.news.neostrada.pl!unt-spo-a-01.news.neostrada.pl!news.neostrada.pl.POSTED!not-for-mail

Show Full Headers
Complete Article Headers
Path: mbox-mo1.pugleaf.net!news-archive.icm.edu.pl!news.icm.edu.pl!news.nask.pl!news.nask.org.pl!news.unit0.net!newsreader4.netcologne.de!news.netcologne.de!peer01.ams1!peer.ams1.xlned.com!news.xlned.com!peer01.fr7!futter-mich.highwinds-media.com!news.highwinds-media.com!newsfeed.neostrada.pl!unt-exc-01.news.neostrada.pl!unt-spo-a-01.news.neostrada.pl!news.neostrada.pl.POSTED!not-for-mail
Newsgroups: pl.comp.lang.delphi
X-Mozilla-News-Host: news://news.neostrada.pl:119
From: "konsul41@wp.pl" <konsul41@wp.pl>
Subject: Dziedziczenie po TList<T>
Date: Wed, 22 Aug 2018 11:42:49 +0200
User-Agent: Mozilla/5.0 (Windows NT 6.1; rv:52.0) Gecko/20100101 Thunderbird/52.9.1
MIME-Version: 1.0
Lines: 26
Message-ID: <5b7d3018$0$681$65785112@news.neostrada.pl>
Organization: Telekomunikacja Polska
NNTP-Posting-Host: 95.48.160.163
X-Trace: 1534930968 unt-rea-a-01.news.neostrada.pl 681 95.48.160.163:50205
X-Complaints-To: abuse@news.neostrada.pl
X-Received-Bytes: 1269
X-Received-Body-CRC: 2290874620
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit