Index: AAPClient/UI/DnaCodeReedsGescandScherm.dfm =================================================================== diff -u -r159 -r162 --- AAPClient/UI/DnaCodeReedsGescandScherm.dfm (.../DnaCodeReedsGescandScherm.dfm) (revision 159) +++ AAPClient/UI/DnaCodeReedsGescandScherm.dfm (.../DnaCodeReedsGescandScherm.dfm) (revision 162) @@ -1,5 +1,5 @@ -inherited fmDrieKnoppenScherm1: TfmDrieKnoppenScherm1 - Caption = 'fmDrieKnoppenScherm1' +inherited fmDnaCodeReedsGescandScherm: TfmDnaCodeReedsGescandScherm + Caption = 'fmDrieKnoppenScherm' ExplicitWidth = 480 ExplicitHeight = 640 PixelsPerInch = 96 Index: AAPClient/UI/DnaCodeReedsGescandScherm.pas =================================================================== diff -u -r161 -r162 --- AAPClient/UI/DnaCodeReedsGescandScherm.pas (.../DnaCodeReedsGescandScherm.pas) (revision 161) +++ AAPClient/UI/DnaCodeReedsGescandScherm.pas (.../DnaCodeReedsGescandScherm.pas) (revision 162) @@ -8,7 +8,7 @@ Vcl.StdCtrls, Vcl.ExtCtrls; type - TfmDrieKnoppenScherm1 = class(TfmDrieKnoppenScherm) + TfmDnaCodeReedsGescandScherm = class(TfmDrieKnoppenScherm) pnlWegnemen: TPanel; imgWegnemen: TImage; lblWegnemen: TLabel; @@ -26,13 +26,13 @@ end; var - fmDrieKnoppenScherm1: TfmDrieKnoppenScherm1; + fmDnaCodeReedsGescandScherm: TfmDnaCodeReedsGescandScherm; implementation {$R *.dfm} -procedure TfmDrieKnoppenScherm1.FormShow(Sender: TObject); +procedure TfmDnaCodeReedsGescandScherm.FormShow(Sender: TObject); begin inherited; fImagesScherm.ilAlgemeen128.GetIcon(11, imgWegnemen.Picture.Icon);