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

Вниз

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

 
Geoji   (2004-07-20 12:09) [0]

Добрый день! Такая проблема, - есть файлы: **0201.dbf, **0302.dbf, **0303.dbf, **0304.dbf..., **0401.dbf, **0402.dbf, **0403.dbf..., где первые две цифры -год, вторые - месяц. Если в запросе from m_s0401..., все нормально, но нужно в RadioGroup1 выбирать год, а в RadioGroup2 месяц. Как разделить строку from на две?


 
Соловьев ©   (2004-07-20 12:13) [1]

"from ms_"+RadioGroup1.Items[RadioGroup1.ItemIndex][3]+RadioGroup1.Items[RadioGroup1.ItemIndex][4]+RadioGroup1.ItemIndex]+".db f"


 
Geoji   (2004-07-20 12:13) [2]

Может быть непонятно объяснил:
...
...
Query1.Close;
  Query1.SQL.Clear;
  Query1.SQL.Add("select...............
case RadioGroup1.ItemIndex of
 0: s:= "??????????";
 1: s:= "??????????";
 2: s:= "??????????";
 end;
 Query1.SQL.Add(s);
 case RadioGroup2.ItemIndex of
 0: s:= "??????????";
 1: s:= "??????????";
 2: s:= "??????????";
 3: s:= "??????????";
 4: s:= "??????????";
 5: s:= "??????????";
 И т.д.
 Query1.SQL.Add(s);


 
Соловьев ©   (2004-07-20 12:15) [3]

обшибочка

> ]+RadioGroup1.ItemIndex]+".db f"

]+IntToStr(RadioGroup1.ItemIndex)+".dbf"


 
Geoji   (2004-07-20 12:16) [4]

[1]
Но у меня в RadioGroup1 - 2003, RadioGroup2 - Январь


 
Соловьев ©   (2004-07-20 12:17) [5]


> Но у меня в RadioGroup1 - 2003, RadioGroup2 - Январь

попробуй - и удивишся:)


 
Соловьев ©   (2004-07-20 12:20) [6]


> ]+IntToStr(RadioGroup1.ItemIndex)+".dbf"

но еще одно условие
if RadioGroup1.ItemIndex <=9 then
sMonth := "0"+IntToStr(RadioGroup1.ItemIndex+1)
else
sMonth := IntToStr(RadioGroup1.ItemIndex+1);

]+sMonth+".dbf"


 
Deniz ©   (2004-07-20 12:22) [7]

s:=copy(RadioGroup1.Text, 3, 2) + Format("%.2d", [RadioGroup2.ItemIndex + 1]) + ".dbf";


 
Geoji   (2004-07-20 12:22) [8]

[1]
>"from ms_"+RadioGroup1.Items[RadioGroup1.ItemIndex][3]+RadioGroup1.Items[RadioGroup1.ItemIndex][4]+
А в RadioGroup2 что писать?


 
Geoji   (2004-07-20 12:30) [9]

[6]
В RadioGroup1 < 9 , а в RadioGroup2 = 12 (месяцев)
Так, что все таки в:
case RadioGroup2.ItemIndex of
0: s:= "??????????";...........


 
Соловьев ©   (2004-07-20 12:33) [10]


> Format("%.2d", [RadioGroup2.ItemIndex + 1])

тебе же написали. вот это красивее:)


 
Geoji   (2004-07-20 12:34) [11]

Спасибо!!! Не сразу увидел. Всем удачи!!!!!!!



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

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

Наверх




Память: 0.49 MB
Время: 0.021 c
3-1090049583
Valer
2004-07-17 11:33
2004.08.15
Access, изменение содержимого запроса.


1-1090931891
goshi
2004-07-27 16:38
2004.08.15
Как создать что-то на подобие Object Inspector?


3-1089992515
MORA
2004-07-16 19:41
2004.08.15
DataSet.Locate()


1-1091174254
Fate
2004-07-30 11:57
2004.08.15
Не могу разобраться с полиморфизмом


14-1091193438
dtm
2004-07-30 17:17
2004.08.15
А книжечку по SQL Server 2К присоветуйте, а?