implements Keyword does not function in D8 !?

Article View: borland.public.delphi.language.objectpascal

Article #181

Back to borland.public.delphi.language.objectpascal Previous Next

#181

From: Liviu Uba
Date: Mon, 26 Jan 2004 12:09

26 lines
1613 bytes

In Delphi 8 does <implements> keyword  not function anymore?
Example:

type
 IMyInterface = interface
  ['{5ADDDDA1-52DD-4638-9E94-D0B1B80EFE9C}']
  procedure Test;
end;

TMyObject = class( TComponent, IMyInterface )
  procedure Test;
end;

TMyTestUser = class( TComponent, IMyInterface )
protected
  FMyObject : TMyObject;
public
    ---> property MyObject : TMyObject read FMyObject implements
IMyInterface; <--- compiler error !!
end;

compiler fails at marked line with error: " ; expected but "implements"
found"

This is a basic functionality and in D8 help we have also an example of it
What is to do ?

Technical Details

Message-ID: <401501e7@newsgroups.borland.com>

Path:

arc1-ca.pugleaf.net!archiver1.google.com!news2.google.com!news.maxwell.syr.edu!newsfeed.icl.net!newsfeed.fjserv.net!newsfeed00.sul.t-online.de!newsfeed01.sul.t-online.de!t-online.de!newsgroups.borland.com!not-for-mail

Show Full Headers

Complete Article Headers

X-Google-Language: ENGLISH,ASCII-7-bit
X-Google-Thread: 109d30,a881fbc5e3e5b146,start
X-Google-Attributes: gid109d30,public
X-Google-ArrivalTime: 2004-01-26 04:09:37 PST
Reply-To: "Liviu Uba" <luba@totalsoft.ro>
From: "Liviu Uba" <luba@totalsoft.ro>
Newsgroups: borland.public.delphi.language.objectpascal
Subject: implements Keyword does not function in D8 !?
Date: Mon, 26 Jan 2004 14:09:44 +0200
Lines: 38
Organization: Totalsoft
X-Priority: 3
X-MSMail-Priority: Normal
X-Newsreader: Microsoft Outlook Express 6.00.2800.1158
X-MimeOLE: Produced By Microsoft MimeOLE V6.00.2800.1165
NNTP-Posting-Host: 217.10.201.170
Message-ID: <401501e7@newsgroups.borland.com>
X-Trace: newsgroups.borland.com 1075118567 217.10.201.170 (26 Jan 2004 04:02:47 -0700)
Path: arc1-ca.pugleaf.net!archiver1.google.com!news2.google.com!news.maxwell.syr.edu!newsfeed.icl.net!newsfeed.fjserv.net!newsfeed00.sul.t-online.de!newsfeed01.sul.t-online.de!t-online.de!newsgroups.borland.com!not-for-mail