@@ -0,0 +1,16 @@
+{ %version=1.1}
+{ Source provided for Free Pascal Bug Report 2670 }
+{ Submitted by "marco" on 2003-09-07 }
+{ e-mail: [email protected] }
+program bugje;
+{$mode delphi}
+
+Uses Classes;
+type theenum = (hello,hi, hoi);
+ testme= class(TComponent)
+ field : theenum;
+ end;
+begin
+end.
florian