[lazarus] Stange error message

[Marc Weustink]

When compileing my new selection stuff I get the following error:

controlselection.pp(140,1) Error: Symbol can't be published, can be only a 
class

I get this message on the line of begin, for each function which declares a 
local var. I can't see why or what this message means.

procedure TContolSelection.Clear;
var
   n:  Integer;
begin <-- error is pointing here
...
end;


Marc