Скачать: CL | DM;

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"дерево вагонка"; И обратите внимание на кавычки.

---

← →
brother ©   (2014-03-21 09:36) [4]

а там не #13#10 ?

---

← →
icWasya ©   (2014-03-21 11:28) [5]

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;

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.036 c