[fpc-pascal] Delphi mode

Joao Morais post at joaomorais.com.br
Thu Jul 31 16:13:37 CEST 2008


Carsten Bager wrote:
> Is there another way writing this without activating Delphi mode.
> 
> Carsten
> 
> type
>   tKeypressed=function:boolean;
> 
> Var
> pKeypressed:tKeypressed;
> 
> Function Keypressed:boolean;
> 
> Implementation
> 
> Function Keypressed:boolean;
> Begin
>   if pointer(pKeypressed)<>nil then
>     Keypressed:=pKeypressed

Changing to Keypressed := pKeypressed() ?

>   else Keypressed:=false;
> End;

Joao Morais



More information about the fpc-pascal mailing list