ComboBox - различить Items и Values

← →
alex123 (2004-03-30 09:50) [0]

Добрый день!
Как сделать чтобы в combobox"e выводились названия месяцев а писался в переменную номер выбранного месяца?

← →
Serge © (2004-03-30 09:55) [1]

Jan. = 0, Febr. = 1, .... - items in ComboBox;
var:=ComboBox1.ItemIndex(ComboBox1.ItemIndex+1);

← →
Serge © (2004-03-30 09:56) [2]

Ups. sorry
var:=ComboBox1.ItemIndex+1;

← →
ssk (2004-03-30 10:14) [3]

вот выдрал прямо из проекта. может и не очень оригинально, но работает. другого способа не нашел.

procedure MakeMounths; var k:integer; begin k:=2; with mainForm.ComboBox1 do begin repeat Items.Add(FormatDateTime("mmmm", k)); Inc(k, 31); until k>360; ItemIndex:=0; end; end;

ssk (30.03.04 10:14) [3]

var
i: integer;
begin
with ComboBox1.Items do
begin
Clear;
for i := Low(LongMonthNames) to High(LongMonthNames) do
Add(LongMonthNames[i]);
end;
end;

← →
alex123 (2004-03-30 10:30) [5]

Спасибо!

ComboBox - различить Items и Values Найти похожие ветки