Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.04.18;
Скачать: CL | DM;

Вниз

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;


 
Романов Р.В. ©   (2004-03-30 10:23) [4]

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]

Спасибо!



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

Текущий архив: 2004.04.18;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.036 c
14-1079759294
Chcnger
2004-03-20 08:08
2004.04.18
Сколько нулей


14-1080036709
Zoloto
2004-03-23 13:11
2004.04.18
Объясните, что за ерунда


8-1072800141
Pa5ha
2003-12-30 19:02
2004.04.18
Хром


9-1066025914
@ndrew
2003-10-13 10:18
2004.04.18
обработка клавишь в DelphiX


14-1080119346
DEN75
2004-03-24 12:09
2004.04.18
передача звука по сети