Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

Дата, локализация, архив...


Страницы:   1 2

Амир ©   (2004-06-26 17:16:00) 

1) У меня есть поля даты. Я их делаю через MaskEdit, все остальные компоненты с Data Controls. При завершении редактирования анкеты я присваиваю значения полей даты соотв. полям и делаю Post.  Но в моем случае польозователь может и не ввести дату, что вызовет ошибку. Как проконтролировать эту ситуацию и проверить коректность ввода даты если она была введена? То есть если будет введено 00.00.0000 или 01/12/2001 то будет ошибка...
2)И еще - я зарегестриовал базу через SQL Explorer  а как мне ее заставить работать на конечном компьютере пользователя, не ставить же туда Delphi и SQL Explorer.
3) Каким образом можно делать резеврную копию базы?
Нуждаюсб в помощи...


Амир   (2004-06-26 20:28:00) [21]

Вообщем та это совсем другой вопрос... Здесь мне известен ID и нужно установить указатель таблицы на запись с ним. FindKey Почмеу то не находит ума не приложу почему... делаю так:
i:=DataModule2.Query1.FieldByName('ID').AsInteger;
DataModule2.Anketa.IndexName:='ID';
DataModule2.Anketa.FindKey([i]);


Basic   (2004-06-26 20:25:00) [22]

на четвертый тебе ответили в другой твоей ветке
DSKalugin ©   (26.06.04 16:53) [1]


Амир   (2004-06-26 19:45:00) [23]

Ипсользую Paradox, BDE.
Появиялся еще один вопросик:
4) У меня есть запрос, и по нему я показываю данные, но мне нужно чтоб при нажатии конпки таблица была установлена на ту же запись что и запрос.
Кстати никто не подкскажет ответ на вопрос 2)


Petr V. Abramov   (2004-06-26 18:07:00) [24]

1)
if not SysUtils.TryStrToDateTime(MaskEdit1.Text, DateTimeValue) then begin
 MaskEdit1.SetFocus;
 raise Exception.Create('Вы не заполнили дату или ввели какую-то фигню')
  end
  else
    Field1.AsDateTime := DateTimeValue;

2)
3) Че за база? Че за библиотека доступа?


Basic   (2004-06-26 17:46:00) [25]

в грубом виде так можно

if trim(maskedit.text)='' then
 table1date.asstring := ''
else
 table1date.asdatetime := strtodate(maskedit.text)


Страницы:   1 2

Наверх

Титульная страница Поиск, карта сайта Написать письмо