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

Вниз

Перевод из String в дату   Найти похожие ветки 

 
John Doe ©   (2005-10-30 12:33) [0]

procedure TfrmAddRecord.btnSaveClick(Sender: TObject);
var
       Aux: TEvent;
 ArraySize: Word;
 
begin
 edtName.Text:="";
 edtDate.Text:="";
 ArraySize:=Length(Events)+1;
 SetLength(Events,ArraySize+1);
 Aux.Name:=edtName.Text;
 Aux.Date:=StrToDate(edtDate.Text);//Эта строчка вызывает ошибку. - EConvertError "" is not a valid Date

 Events[ArraySize+1]:=Aux;
end;

Ввожу в edtDate дату в формате DD/MM/YYYY.
В соответствии с ShortDate,который я посмотрел у себя в Regional Settings.


 
Zacho ©   (2005-10-30 12:40) [1]

John Doe ©   (30.10.05 12:33)
edtName.Text:="";
edtDate.Text:="";

[SKIP]

Aux.Date:=StrToDate(edtDate.Text);//Эта строчка вызывает ошибку. - EConvertError "" is not a valid


Естественно, попытка преобразования пустой строки в дату вызывает ошибку. Убери отмеченную строку. Да и конструкция
edtName.Text:="";
...
Aux.Name:=edtName.Text;

довольно бессмысленна. Тогда уж можно сразу Aux.Name:=""


 
John Doe ©   (2005-10-30 13:20) [2]

Спасибо огромное.
Это у меня была механическая ошибка,так бы не нашел.



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

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

Наверх




Память: 0.47 MB
Время: 0.043 c
2-1131213661
Michael5
2005-11-05 21:01
2005.11.20
Есть программа, у которой свой графический интерфейс. Она может


11-1110379673
Boguslaw Brandys
2005-03-09 17:47
2005.11.20
TRegExpr in KOL ?


3-1128578227
jiny
2005-10-06 09:57
2005.11.20
Пробл. с объединением 4 таблиц


1-1130522541
x.pro
2005-10-28 22:02
2005.11.20
как узнать, на каким комтролом находится курсор?


2-1130643453
gdaujk
2005-10-30 06:37
2005.11.20
TListView с функциональностью TValueListEditor.