🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

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

Re: Proszę odpowiedź na pytanie

#80340
From: Wiktor S.
Date: Mon, 20 Oct 2003 14:22
28 lines
1486 bytes
> > 1. odpalamy FreePascala lub Delphi
> > 2. wpisujemy
> > 3. próbujemy skompilować i widzimy
>
> chyba samego tego nie skompiluje, bo nie ma pozostalego kodu klasy,

a po co?

{$mode objfpc}

type bubu=class
  function getI:integer;
  procedure seti(v:integer);
  property A:Integer read getI write setI;
  property B:Integer read getI;
  property C:Integer read getI write setI; default;
  #### Error: The default property must be an array property
end;

function bubu.getI:integer;
begin
end;


--
Azarien

my e-mail address ends in .fm not .fmv
Technical Details
Message-ID: <bn0r42$t3q$1@flis.man.torun.pl>
Path: mbox-mo1.pugleaf.net!news-archive.icm.edu.pl!mat.uni.torun.pl!news.man.torun.pl!not-for-mail
References: <bn0ksu$rt6$1@korweta.task.gda.pl> <bn0lv9$7rm$1@flis.man.torun.pl> <bn0nsq$q7u$1@korweta.task.gda.pl>

Show Full Headers
Complete Article Headers
Path: mbox-mo1.pugleaf.net!news-archive.icm.edu.pl!mat.uni.torun.pl!news.man.torun.pl!not-for-mail
From: "Wiktor S." <wswiktor@poczta.fmv>
Newsgroups: pl.comp.lang.pascal
Subject: Re: Proszę odpowiedź na pytanie
Date: Mon, 20 Oct 2003 16:22:44 +0200
Organization: TORMAN
Lines: 29
Message-ID: <bn0r42$t3q$1@flis.man.torun.pl>
References: <bn0ksu$rt6$1@korweta.task.gda.pl> <bn0lv9$7rm$1@flis.man.torun.pl> <bn0nsq$q7u$1@korweta.task.gda.pl>
NNTP-Posting-Host: azi.wmc.com.pl
Mime-Version: 1.0
X-Trace: flis.man.torun.pl 1066659778 29818 82.160.11.135 (20 Oct 2003 14:22:58 GMT)
X-Complaints-To: usenet@man.torun.pl
NNTP-Posting-Date: 20 Oct 2003 14:22:58 GMT
X-MimeOLE: Produced By Microsoft MimeOLE V6.00.2800.1106
X-Priority: 3
X-MSMail-Priority: Normal
X-Newsreader: Microsoft Outlook Express 6.00.2800.1106
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit