Re: Function pointer problem

Article View: comp.lang.pascal.delphi.components.misc

Article #16

Back to comp.lang.pascal.delphi.components.misc Previous Next

#16

From: Liz Kimber
Date: Tue, 14 Sep 1999 00:00

20 lines
1434 bytes

>      type
>        TCheckFunc = function (FldNr: integer): Boolean;
>        TSetParam = class(TForm)
>          ....      
>        public
>          CheckStatus: TCheckFunc;
>        end;

You have declaed the CheckStatus to need something returning a type of
TCheckFunc..

You actually should have set it as boolean according to the procuedure
you made here

>
>      function TForm1.Form1Check (FldNr: integer): Boolean;
>      begin
>      { set to True or False according to specific conditions : }
>      result:=True;  
>      end;

Technical Details

Message-ID: <FDHeN+AhvJjwsHD0yRPk60=Z7DJa@4ax.com>

Path: arc1-ca.pugleaf.net!unknown!not-for-mail

References: <37de2a8b.335943@news.spectraweb.ch>

Show Full Headers

Complete Article Headers

X-Google-Language: ENGLISH,ASCII-7-bit
X-Google-Thread: 1043cf,6601e79a50d8304
X-Google-Attributes: gid1043cf,public
X-Google-Thread: 109d99,6601e79a50d8304
X-Google-Attributes: gid109d99,public
From: Liz Kimber <liz.kimber@marlborough-stirling.com>
Subject: Re: Function pointer problem
Date: 1999/09/14
Message-ID: <FDHeN+AhvJjwsHD0yRPk60=Z7DJa@4ax.com>
X-Deja-AN: 524911422
Content-Transfer-Encoding: 7bit
References: <37de2a8b.335943@news.spectraweb.ch>
Content-Type: text/plain; charset=us-ascii
X-Complaints-To: abuse@cableinet.net
X-Trace: news1.cableinet.co.uk 937308563 7920 195.188.217.10 (14 Sep 1999 11:29:23 GMT)
Organization: Cable Internet (post doesn't reflect views of Cable Internet)
Mime-Version: 1.0
NNTP-Posting-Date: 14 Sep 1999 11:29:23 GMT
Newsgroups: comp.lang.pascal.delphi.components.misc,borland.public.delphi.objectpascal

Reply to Parent Message