Index: AAPClient/UI/HernoemPalletScherm.pas =================================================================== diff -u -r150 -r153 --- AAPClient/UI/HernoemPalletScherm.pas (.../HernoemPalletScherm.pas) (revision 150) +++ AAPClient/UI/HernoemPalletScherm.pas (.../HernoemPalletScherm.pas) (revision 153) @@ -16,15 +16,15 @@ edtOudeCode: TEdit; lblOudeCode: TLabel; sgToeleveringData: TStringGrid; - btnEerst: TButton; - btnVorige: TButton; - btnVolgende: TButton; - btnLaatst: TButton; lblPallet: TLabel; lblAantal: TLabel; tsNieuweCode: TTabSheet; edtNieuweCode: TEdit; lblNieuweCode: TLabel; + btnLaatst: TButton; + btnVolgende: TButton; + btnVorige: TButton; + btnEerst: TButton; procedure FormShow(Sender: TObject); procedure actHomeExecute(Sender: TObject); procedure actVolgendeExecute(Sender: TObject); Index: AAPClient/UI/HernoemPalletScherm.dfm =================================================================== diff -u -r152 -r153 --- AAPClient/UI/HernoemPalletScherm.dfm (.../HernoemPalletScherm.dfm) (revision 152) +++ AAPClient/UI/HernoemPalletScherm.dfm (.../HernoemPalletScherm.dfm) (revision 153) @@ -83,64 +83,64 @@ object sgToeleveringData: TStringGrid Left = 4 Top = 18 - Width = 186 - Height = 120 + Width = 379 + Height = 399 ColCount = 1 DefaultColWidth = 93 DrawingStyle = gdsGradient FixedCols = 0 RowCount = 2 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText - Font.Height = -13 + Font.Height = -27 Font.Name = 'Tahoma' Font.Style = [] Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRangeSelect, goRowSelect] ParentFont = False ScrollBars = ssNone TabOrder = 0 ColWidths = ( - 183) + 376) end - object btnEerst: TButton - Left = 196 - Top = 18 - Width = 25 - Height = 25 - ImageIndex = 2 - Images = ImagesScherm.ilAlgemeen16 + object btnLaatst: TButton + Left = 389 + Top = 332 + Width = 69 + Height = 69 + ImageIndex = 5 + Images = ImagesScherm.ilAlgemeen64 TabOrder = 1 - OnClick = btnEerstClick + OnClick = btnLaatstClick end - object btnVorige: TButton - Left = 196 - Top = 49 - Width = 25 - Height = 25 - ImageIndex = 1 - Images = ImagesScherm.ilAlgemeen16 - TabOrder = 2 - OnClick = btnVorigeClick - end object btnVolgende: TButton - Left = 196 - Top = 81 - Width = 25 - Height = 25 - ImageIndex = 0 - Images = ImagesScherm.ilAlgemeen16 - TabOrder = 3 + Left = 389 + Top = 234 + Width = 69 + Height = 69 + ImageIndex = 4 + Images = ImagesScherm.ilAlgemeen64 + TabOrder = 2 OnClick = btnVolgendeClick end - object btnLaatst: TButton - Left = 196 - Top = 112 - Width = 25 - Height = 25 + object btnVorige: TButton + Left = 389 + Top = 133 + Width = 69 + Height = 69 ImageIndex = 3 - Images = ImagesScherm.ilAlgemeen16 + Images = ImagesScherm.ilAlgemeen64 + TabOrder = 3 + OnClick = btnVorigeClick + end + object btnEerst: TButton + Left = 389 + Top = 32 + Width = 69 + Height = 69 + ImageIndex = 2 + Images = ImagesScherm.ilAlgemeen64 TabOrder = 4 - OnClick = btnLaatstClick + OnClick = btnEerstClick end end object tsNieuweCode: TTabSheet Index: AAPClient/UI/BestaandePalletScherm.pas =================================================================== diff -u -r149 -r153 --- AAPClient/UI/BestaandePalletScherm.pas (.../BestaandePalletScherm.pas) (revision 149) +++ AAPClient/UI/BestaandePalletScherm.pas (.../BestaandePalletScherm.pas) (revision 153) @@ -43,7 +43,7 @@ implementation uses - UiContext, PopupScherm; + UiContext; {$R *.dfm}