On Wed, 13 Dec 2006 10:25:15 +0200
"Graeme Geldenhuys" <[EMAIL PROTECTED]> wrote:
> Hi
>
> When implementing a virtual abstract method, which is a class method
> in a descendant class, code completion doesn't insert the class
> keyword in the implementation. If I remove the virtual keyword form
> TForm1, it works in TMyForm, but as soon as 'virtual' is defined, it
> doesn't work.
>
> See below how Lazarus generated the code....
>
> -----------------------------
> type
> TForm1 = class(TForm)
> private
> { private declarations }
> public
> class function MyProc: integer;
> class procedure MyProc2; virtual; abstract;
> end;
>
>
> TMyForm = class(TForm1)
> public
> class procedure MyProc2; override;
> end;
>
>
> var
> Form1: TForm1;
>
> implementation
>
> { TForm1 }
>
> class function TForm1.MyProc: integer;
> begin
>
> end;
>
>
> { TMyForm }
>
> procedure TMyForm.MyProc2; // <---- class keyword missing!
> begin
> inherited MyProc2;
> end;
Fixed.
Mattias
_________________________________________________________________
To unsubscribe: mail [EMAIL PROTECTED] with
"unsubscribe" as the Subject
archives at http://www.lazarus.freepascal.org/mailarchives
