Index: PlanScan/Main.pas =================================================================== diff -u -r362 -r363 --- PlanScan/Main.pas (.../Main.pas) (revision 362) +++ PlanScan/Main.pas (.../Main.pas) (revision 363) @@ -11,7 +11,6 @@ type TfmMain = class(TForm) - frmDnaCodes: TfrmDnaCodes; pnlLinks: TPanel; pnlNaam: TPanel; pnlKnoppen: TPanel; @@ -25,6 +24,7 @@ lblWegwerppallet: TLabel; lblDnaCodes: TLabel; lblGebruikers: TLabel; + frmDnaCodes: TfrmDnaCodes; procedure FormCreate(Sender: TObject); procedure FormShow(Sender: TObject); procedure FormClose(Sender: TObject; var Action: TCloseAction);