Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Поиск

Страницы: 1 2 >
dumka © (2007-11-07 14:19:00)
Как избавится от несовместимости типов при поиске, в датах, и числах.
case ComboBox1.ItemIndex of
0:dm.Table2.Locate('Nazvanie_teatra',Edit4.Text,[locaseInSensitive,loPartialKey] );
1:dm.Table2.Locate('Nazvanie_stektakl',Edit4.Text,[locaseInSensitive,loPartialKe y]);
//2:dm.Table2.Locate('Data',Edit4.Text,[]);
//3:dm.Table2.Locate('Nomer_seans',Edit4.Text,[locaseInSensitive,loPartialKey]);
end;

dumka (2007-11-08 10:04:00) [1]
2: if trystrtodate(Edit4.Text,pr) then dm.Table2.Locate('Data',pr,[]);
Я сделала это, черт, Вам лень подсказать. Хотя я теперь точно не забуду.

dumka (2007-11-08 09:46:00) [2]
Да могу я переодить, что в этой записи нужно переводить. Я уже все перепробовала.
2:dm.Table2.Locate('Data',(Edit4.Text),[]);
А другой компонент я не могу взять, это же поиск и для текстовых значений, и для дат, и для чисел.

ЮЮ (2007-11-08 04:58:00) [3]
> ошибка "is not a valid date"
> и после этого он прекрано ищет, как избавиться от ошибки.

Замени Edit4 на компонент, предназначенный для ввода даты, коль справится с переводом стоки в дату не можешь

Virgo_Style (2007-11-07 16:12:00) [4]
> Я помню, что использовала функцию fry. Но как...

Есть телепаторы и есть Телепаторы, а есть Телепаторы Вне Категорий, и это явно для них задача.

Поскольку try - это как бы не очень функция, полагаю, что использовались функция TryStrToDate или же StrToDateDef, если таковые существуют, в противном случае - блок try..except...end.

dumka (2007-11-07 15:52:00) [5]
Я помню, что использовала функцию fry. Но как...

agv (2007-11-07 15:51:00) [6]
Зачет

agv (2007-11-07 15:49:00) [7]
ну тогда не жалуйся

korneley (2007-11-07 15:48:00) [8]

> dumka (07.11.07 14:54) [17]
> ...ошибка "is not a
> valid date"и после этого он прекрано ищет, как избавиться
> от ошибки...

> Reindeer Moss Eater © (07.11.07 14:55) [19]
> ввести валид дату

Вот! И не забыть про установленные DateSeparator, ShortDateFormatи иже с ними...

dumka (2007-11-07 15:39:00) [9]

> agv

Нет ничего, т.е пусто

agv (2007-11-07 15:28:00) [10]
>> agv (07.11.07 14:47) [14]

dumka (2007-11-07 15:24:00) [11]
Я здаюсь, я совсем запуталась.

Anatoly Podgoretsky (2007-11-07 15:00:00) [12]
Это факт.
Ты для начала добейся, чтобы у тебя работало Date := StrToDate(D)

dumka (2007-11-07 14:55:00) [13]

> Anatoly Podgoretsky

это вопрос или факт?

Reindeer Moss Eater (2007-11-07 14:55:00) [14]
ввести валид дату

dumka (2007-11-07 14:54:00) [15]

> agv

Ну и что я умею декодировать дату.
ошибка "is not a valid date"
и после этого он прекрано ищет, как избавиться от ошибки.

Anatoly Podgoretsky (2007-11-07 14:54:00) [16]
> dumka (07.11.2007 14:23:03) [3]

Отлично работает

agv (2007-11-07 14:50:00) [17]
StrToDate('01.01.2001') = EncodeDate(2001, 01, 01)

подумай...

dumka (2007-11-07 14:48:00) [18]
ну что то так pr:=StrToDate(Edit4.Text); а затем

2:dm.Table2.Locate('Data',pr,[]);

agv (2007-11-07 14:47:00) [19]
в этом что?

Edit4.Text

Reindeer Moss Eater (2007-11-07 14:45:00) [20]
Вот над этим думай:
StrToDate(Edit4.Text);

А про локейт забудь пока.

Страницы: 1 2 >

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »