ComboBox

← →
alexdn © (2014-03-21 03:46) [0]

Можно ли задать записи ComboBox кодом, т.е. есть ComboBox с записями
пластик
панели мдф
дерев вагонка
Как это будет? -
ComboBox1.items:="пластик#13панели мдф#13дерев вагонка";?

← →
alexdn © (2014-03-21 04:00) [1]

Написал по простому -
ComboBox1.Items[0]:="пластик"; ComboBox1.Items[1]:="панели мдф"; ComboBox1.Items[2]:="дерев вагонка";

← →
ixen (2014-03-21 07:10) [2]

Combobox1.Items.Append("пластик"); Combobox1.Items.Append("панели мдф"); Combobox1.Items.Append("дерев вагонка");

← →
icWasya © (2014-03-21 09:28) [3]

А если хочется в одну строку то
ComboBox1.Items.Text:="пластик"#13"панели мдф"#13"дерево вагонка"; И обратите внимание на кавычки.

а там не #13#10 ?

procedure TStrings.SetTextStr(const Value: string); var P, Start: PChar; S: string; begin BeginUpdate; try Clear; P := Pointer(Value); if P <> nil then while P^ <> #0 do begin Start := P; while not (P^ in [ #0, #10, #13]) do Inc(P); SetString(S, Start, P - Start); Add(S); if P^ = #13 then Inc(P); if P^ = #10 then Inc(P); end; finally EndUpdate; end; end;

ComboBox Найти похожие ветки