Index: VerpakkingsDefinitie/UI/ProductMetaScherm.dfm =================================================================== diff -u -r607 -r608 --- VerpakkingsDefinitie/UI/ProductMetaScherm.dfm (.../ProductMetaScherm.dfm) (revision 607) +++ VerpakkingsDefinitie/UI/ProductMetaScherm.dfm (.../ProductMetaScherm.dfm) (revision 608) @@ -2,8 +2,8 @@ Left = 0 Top = 0 Caption = 'Meta kiezen' - ClientHeight = 405 - ClientWidth = 355 + ClientHeight = 391 + ClientWidth = 295 Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText @@ -13,19 +13,19 @@ OldCreateOrder = False OnCreate = FormCreate DesignSize = ( - 355 - 405) + 295 + 391) PixelsPerInch = 96 TextHeight = 13 object GroupBox1: TGroupBox Left = 0 Top = 0 - Width = 354 + Width = 294 Height = 65 Anchors = [akLeft, akTop, akRight] Caption = 'Groep' TabOrder = 0 - ExplicitWidth = 359 + ExplicitWidth = 354 object ComboBoxGroep: TComboBox AlignWithMargins = True Left = 5 @@ -36,39 +36,37 @@ Style = csDropDownList Constraints.MaxWidth = 150 TabOrder = 0 + OnChange = ComboBoxGroepChange end - object Button1: TButton - Left = 208 - Top = 24 - Width = 75 - Height = 25 - Caption = 'Button1' - TabOrder = 1 - OnClick = Button1Click - end end object GroupBox2: TGroupBox Left = 0 Top = 71 - Width = 354 - Height = 329 + Width = 294 + Height = 315 Anchors = [akLeft, akTop, akRight, akBottom] Caption = 'Meta' TabOrder = 1 - ExplicitWidth = 359 - ExplicitHeight = 322 + ExplicitWidth = 354 + ExplicitHeight = 329 object ListViewMetas: TListView Left = 2 Top = 15 - Width = 350 - Height = 312 + Width = 290 + Height = 298 Align = alClient + BevelInner = bvNone + BevelOuter = bvNone Columns = <> + ColumnClick = False + ReadOnly = True + ShowColumnHeaders = False TabOrder = 0 - ExplicitLeft = 3 - ExplicitTop = 16 - ExplicitWidth = 250 - ExplicitHeight = 150 + ViewStyle = vsList + OnClick = ListViewMetasClick + OnSelectItem = ListViewMetasSelectItem + ExplicitWidth = 255 + ExplicitHeight = 255 end end end