Index: ProScan/UI/OnvolledigeToeleveringScherm.pas =================================================================== diff -u -r444 -r445 --- ProScan/UI/OnvolledigeToeleveringScherm.pas (.../OnvolledigeToeleveringScherm.pas) (revision 444) +++ ProScan/UI/OnvolledigeToeleveringScherm.pas (.../OnvolledigeToeleveringScherm.pas) (revision 445) @@ -8,7 +8,7 @@ Vcl.StdCtrls, Vcl.ExtCtrls; type - TfmDrieKnoppenScherm1 = class(TfmDrieKnoppenScherm) + TfmOnvolledigeToeleveringScherm = class(TfmDrieKnoppenScherm) btnNieuweToelevering: TButton; btnHuidigeToelevering: TButton; lblOnvolledigeToelevering: TLabel; @@ -21,13 +21,13 @@ end; var - fmDrieKnoppenScherm1: TfmDrieKnoppenScherm1; + fmOnvolledigeToeleveringScherm: TfmOnvolledigeToeleveringScherm; implementation {$R *.dfm} -procedure TfmDrieKnoppenScherm1.FormShow(Sender: TObject); +procedure TfmOnvolledigeToeleveringScherm.FormShow(Sender: TObject); begin inherited; UiContext.ImagesScherm.ilAlgemeen128.GetIcon(13, imgCentraal.Picture.Icon); Index: ProScan/ProScan.dpr =================================================================== diff -u -r444 -r445 --- ProScan/ProScan.dpr (.../ProScan.dpr) (revision 444) +++ ProScan/ProScan.dpr (.../ProScan.dpr) (revision 445) @@ -21,7 +21,7 @@ CommonFunctions in 'UI\CommonFunctions.pas', MidasLib, DnaCodeService in 'WS\DnaCodeService.pas', - OnvolledigeToeleveringScherm in 'UI\OnvolledigeToeleveringScherm.pas' {fmDrieKnoppenScherm1}; + OnvolledigeToeleveringScherm in 'UI\OnvolledigeToeleveringScherm.pas' {fmOnvolledigeToeleveringScherm}; {$R *.res} @@ -40,7 +40,7 @@ Application.CreateForm(TfmBestaandePalletScherm, fmBestaandePalletScherm); Application.CreateForm(TfmInfoLogScherm, fmInfoLogScherm); Application.CreateForm(TfmDnaCodeReedsGescandScherm, fmDnaCodeReedsGescandScherm); - Application.CreateForm(TfmDrieKnoppenScherm1, fmDrieKnoppenScherm1); + Application.CreateForm(TfmOnvolledigeToeleveringScherm, fmOnvolledigeToeleveringScherm); Application.Run; fmProScanHoofdscherm.Visible := true; end. Index: ProScan/UI/OnvolledigeToeleveringScherm.dfm =================================================================== diff -u -r444 -r445 --- ProScan/UI/OnvolledigeToeleveringScherm.dfm (.../OnvolledigeToeleveringScherm.dfm) (revision 444) +++ ProScan/UI/OnvolledigeToeleveringScherm.dfm (.../OnvolledigeToeleveringScherm.dfm) (revision 445) @@ -1,4 +1,4 @@ -inherited fmDrieKnoppenScherm1: TfmDrieKnoppenScherm1 +inherited fmOnvolledigeToeleveringScherm: TfmOnvolledigeToeleveringScherm Caption = 'fmDrieKnoppenScherm' Color = 1513421 PixelsPerInch = 96 Index: ProScan/ProScan.dproj =================================================================== diff -u -r444 -r445 --- ProScan/ProScan.dproj (.../ProScan.dproj) (revision 444) +++ ProScan/ProScan.dproj (.../ProScan.dproj) (revision 445) @@ -133,7 +133,7 @@ -
fmDrieKnoppenScherm1
+
fmOnvolledigeToeleveringScherm
dfm