I want to show a Grid with 3 Columns with Comboboxes, so that the Customer can choose one Item from the Combobox instead of filling by Hand.
How can I show the Combobox at once in one Line, Otherwise you have to click 3 times to get the ComboboxList.
TTMSFNCGrid used.
My exsample in Form.Create:
Grid.DefaultColumnWidth := 200;
Grid.DefaultRowHeight := 24;
Grid.Columns[1].Width := 80; // Datum
Grid.Columns[5].Width := 80; // Std.
Grid.Columns[6].Width := 80; // km
Grid.Cells[1, 0] := 'Datum';
Grid.Cells[2, 0] := 'Kunde';
Grid.Cells[3, 0] := 'Wohnort';
Grid.Cells[4, 0] := 'Tätigkeit';
Grid.Cells[5, 0] := 'Std. gesamt';
Grid.Cells[6, 0] := 'km gesamt';
Grid.Columns[0].Width := 60;
Grid.Columns[2].Width := 200;
Grid.Columns[3].Width := 200;
Grid.Columns[4].Width := 200;
Grid.Columns[5].Width := 80;
Grid.Columns[6].Width := 80;
Grid.Columns[1].Editor := etDatePicker;
Grid.Columns[2].Editor := etCombobox;
Grid.Columns[3].Editor := etCombobox;
Grid.Columns[4].Editor := etCombobox;
Grid.Columns[5].Editor := etSpinBox;
Grid.Columns[6].Editor := etSpinBox;
sl := TStringlist.Create;
sl.LoadFromFile('Kunde.txt', TEncoding.UTF8);
Grid.Columns[2].ComboItems.Clear;
Grid.Columns[2].ComboItems := sl;
sl.LoadFromFile('Wohnort.txt', TEncoding.UTF8);
Grid.Columns[3].ComboItems.Clear;
Grid.Columns[3].ComboItems := sl;
sl.LoadFromFile('Tätigkeit.txt', TEncoding.UTF8);
Grid.Columns[4].ComboItems.Clear;
Grid.Columns[4].ComboItems := sl;
sl.Free;
Grid.AutoNumberCol(0);
Grid.Options.Sorting.Mode := gsmNormal;
Grid.Options.Editing.Enabled := True;