TComboBox!

[samlay]

Подскажите,как можно наполнить эту компоненту???сколько способов наполнения существует?спасибо!

[Makarov]

Например из файла ComboBox1.Items.LoadFromFile('имя файла');
ComboBox1.Items.Add('что хотите добавить');

[Sibedir]

ComboBox1.Items.LoadFromStream
ComboBox1.Items.Assign

Вообще-то, если ты заметил, все строки в TComboBox хрятятся в свойстве Items типа TStrings. Поэтому все что свойственно TStrings, свойственно и Items.

[samlay]

Все!разобрался!спасибо!!!!

[mihali4]

procedure TForm1.FormCreate(Sender: TObject);
var i: integer;
begin
ComboBox1.Clear;
for i:=1 to 20 do
ComboBox1.Items.Add(IntToStr(i*10)+' ms');
ComboBox1.ItemIndex:=0;
end;

Заполняет ComboBox значениями:
"10 ms"
"20 ms"
...
"100 ms"
"200 ms"
и устанавливает ComboBox на первое значение.

[Petrucci]

подскажите как в ComboBox добавлять значения в верхнюю строку? (по умолчанию добавляеться в нижнюю)

[Kn793]

Можно так, но думаю это не самый лучший способ

  ComBoBox1.Items.Add(ComBoBox1.Items[ComBoBox1.Items.Count-1]);
  for i := ComBoBox1.Items.Count-1 downto 1 do ComBoBox1.Items[i] := ComBoBox1.Items[i-1];
  ComBoBox1.Items[0] := 'что добавить';

[Petrucci]

еще предложения будут?

[mutabor]

Insert, сказали ведь что это TStrings обычный
Комбобокс это эдит совмещенный с листбоксом