blob: 04ea0575c5e2c62f9f4db9d83e7aa590c08ad14e (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
|
{ Source provided for Free Pascal Bug Report 4529 }
{ Submitted by "Vincent Snijders" on 2005-11-20 }
{ e-mail: vsnijders@quicknet.nl }
program Project1;
{$mode objfpc}{$H+}
uses
Classes
{ add your units here };
type
MyClass = class(TComponent)
//private
public
FClassVar: integer; static;
end;
begin
end.
|
