"IMPLEMENTATION" expected

[BrainChemistry]

Just started my first Lazarus project (experienced with FP though) and after some building of the form.... suddenly a strange messege: MainUnit.pas(15,3) Fatal: Syntax error, "IMPLEMENTATION" expected but "identifier TMAINFORM" found.

Code: [Select]

unit MainUnit;

{$mode objfpc}{$H+}

interface

uses
  Classes, SysUtils, LResources, Forms, Controls, Graphics, Dialogs, Menus,
  StdCtrls, ExtCtrls;



  { TMainForm }

  TMainForm = class(TForm)
    ButtonRefresh: TButton;
    ComboBoxGames: TComboBox;
    LabelChooseGame: TLabel;
    MainMenu1: TMainMenu;
    MenuFile: TMenuItem;
    MenuClose: TMenuItem;
    MenuEdit: TMenuItem;
    MenuItemRefreshGameList: TMenuItem;
    procedure ComboBox1Click(Sender: TObject);
    procedure ComboBoxGamesClick(Sender: TObject);
    procedure FormCreate(Sender: TObject);
    procedure MenuCloseClick(Sender: TObject);
    procedure MenuItemRefreshGameListClick(Sender: TObject);
  private
    { private declarations }
  public
    { public declarations }
  end;



var
  MainForm: TMainForm;

implementation



{ TMainForm }

procedure TMainForm.MenuCloseClick(Sender: TObject);
begin
  close;
end;

procedure TMainForm.MenuItemRefreshGameListClick(Sender: TObject);
begin
  RefreshGameListProc;
end;


initialization
  {$I mainunit.lrs}

end.

I should mention that proc. RefreshGameListProc is defined and even if I comment it out the error occurs.

EDIT: v0.9.25 Beta btw.

[Zaher]

You removed Type before TMainForm

Code: [Select]


Type

  { TMainForm }

  TMainForm = class(TForm)


and you have some procedures not implementation section , remove it.

[BrainChemistry]

Damn, you are right   :roll: ... Thanks alot for the fast reply, zaher!

Btw. about the removal of procedures in implementation part... I remember from school days (many years ago) that in Delphi the unused procedures accidently created got removed automatically when compiling. Why Lazarus isn't doing this? Is there an option to imitate this behaviour?

[Zaher]

With your code Delphi not remove the unimplemented procedures, it just remove empty procedures when saving.
BTW i think Delphi started to challenge VB, so it is makd for lazy developers