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

Вниз

Вопрос по StringGrid   Найти похожие ветки 

 
DECL   (2003-02-28 00:04) [0]

Здравстуйте! Извините за дурацкий вопрос, но никак не могу понять как проверить содержимое ячейки StringGrid на принадлежность типу даты, т.е. дд.мм.гг или дд.мм.гггг.
Заранее спасибо!!
Используються: Delphi 6.0, Access 2000


 
Юрий Зотов ©   (2003-02-28 00:18) [1]

function IsDate(S: string): boolean;
begin
try
StrToDate(S);
Result := True
except
Result := False
end
end;
...
if IsDate(StringGrid1.Cells[i, j]) then ...


 
DECL   (2003-02-28 00:24) [2]

Пасиба! :)


 
DECL   (2003-02-28 00:47) [3]

Хм... А при проверке StrToDate(S) он ругается и не хочет работать, говорит типа "введёное значение" is not a valid date.
Как быть???


 
Юрий Зотов ©   (2003-02-28 00:57) [4]

Никак. Это только при запуске из-под Delphi. При запуске без отладчика все будет ОК. Если уж очень хочется, отключите реакцию отладчика на EConvertError, но лучше не стоит.


 
Makhanev A.S. ©   (2003-02-28 00:57) [5]

Если включена опция "Stop on Delphi Exceptions", то IDE будет выдавать сообщение об ошибке (в случае, если s - не дата), затем после дальнейшей обработки исключения (F9) всё должно быть ОК.

В этом случае (при включённом S.O.D.E.) "Он" должен ругаться и он должен работать.
Если "он" ругается, это ещё не значит, что он не должен работать.

Если s - дата, то всё должно быть ОК без всяких исключений.


 
DECL   (2003-02-28 01:21) [6]

Всё понятно, всем большое спасибо!


 
DECL   (2003-02-28 01:52) [7]

Извиняюсь за конечно беспокойство, но у меня появился ещё один вопрос: как сделать так, чтобы вместо даты не вводилось время, т.е. при вводе в строку например 12 вместо положенных 12.02.02 формат принимается и пишется 31.12.99 12:00???



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

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

Наверх




Память: 0.47 MB
Время: 0.02 c
1-29878
AlexanderSK
2003-02-26 13:28
2003.03.10
RemoteDataModule - Interface как передать строку?


6-29981
2Ksion
2003-01-21 19:18
2003.03.10
И всё тотже tWebBrowser и Скрипты на отображаемых страницах


1-29821
Swolota
2003-02-26 11:41
2003.03.10
Чтение из ини-файла


14-30114
Vitus
2003-02-19 11:06
2003.03.10
Программы версионного контроля


14-30113
GebbelZ
2003-02-22 00:35
2003.03.10
У кого какая стипендия?