function header doesn't match any ... [РЕШЕНО]

[sign]

В очередной раз, пишу, никого не трогаю и вдруг!

function header doesn't match any method of this class "TForm1.bbParadoxOpenClick(TObject);"

Суть - есть на форме кнопка

Код: Выделить всё

bbParadoxOpen: TBitBtn;

Кликаю по ней и создаю тем самым процедуру

Код: Выделить всё

   
   procedure bbParadoxOpenClick(Sender: TObject);
...
procedure TForm1.bbParadoxOpenClick(Sender: TObject);
...


Запускаю на компиляцию
!!!
function header doesn't match any method of this class "TForm1.bbParadoxOpenClick(TObject);"
!!!

Удаляю содержимое процедуры, сохранить, процедура удаляется. Компиляция проходит.

Мало того, на любых автосозданных процедурах эта хрень выскакивает.

Что за чудо и куда копать, что могло поломаться в проекте?

Lazarus
IDE 0.9.31
FPC 2.4.4
SVN 31608
WIN 32 (XP)

Добавлено спустя 10 минут 57 секунд:
PS.
Прочие рабочие проекты компилируются без проблем.
Т.е. где-то что-то данном пакете возникло.

И что это могло бы быть?

[daesher]

Гипотетически такая ошибка может случиться, если в разделе implementation в секции uses используется модуль, перекрывающий любой из типов (в данном случае - возможно, TObject, или же TForm1). Попробуйте переместить как можно больше модулей (в идеале - все) в uses раздела interface.

[sign]

Ты гляди чё деется!
Помогло!!!
Большое спасибо.