Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > БД в Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 20.12.2009, 17:17   #1
samouelson
Пользователь
 
Регистрация: 07.12.2009
Сообщений: 46
По умолчанию проверка базы данных на корректность веденных данных

у меня есть 4 поля. я ввожу в них данные. но пользователи могут и не вести данные в определенное поле. получится строка с неполной информацией. я использую adoquery. задача такая - программно удалить все записи, некоторые поля которых не заполнены т.е. ''. как делал я:
begin
if(ADOQueryTovar.FieldByName('name' ).Text<>'')and(ADOQueryTovar.FieldB yName('price').Text<>'')
and(ADOQueryTovar.FieldByName('ed_i z').Text<>'') and (ADOQueryTovar.FieldByName('amount' ).Text<>'') then
begin
MessageDlg('База данных проверена. Ошибок не обнаружено!', mtInformation, [mbYes],0);
exit;
end
else
begin
for i:=1 to ADOQueryTovar.RecordCount do
begin
ADOQueryTovar.RecNo:=i;
if(ADOQueryTovar.FieldByName('name' ).Text='') or (ADOQueryTovar.FieldByName('price') .Text='')
or (ADOQueryTovar.FieldByName('ed_iz') .Text='') or (ADOQueryTovar.FieldByName('amount' ).Text='') then
begin
ADOQueryTovar.DeleteRecords(arCurre nt);
end;
end;
end;
частично работает- находишь запись с неполными данными, нажимаешь кнопку и запись удаляется. но мне надо чтобы программа сама находила и сразу удаляла такие строки.

Последний раз редактировалось samouelson; 20.12.2009 в 17:21.
samouelson вне форума Ответить с цитированием
Старый 20.12.2009, 17:23   #2
mihali4
*
Старожил
 
Регистрация: 22.11.2006
Сообщений: 9,201
По умолчанию

Ну и проверяйте в созданной записи все нужные поля.
И удаляйте эту запись, если она не нравится...
В чем трудность-то?
mihali4 вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Базы данных Alexoid Assembler - Ассемблер (FASM, MASM, WASM, NASM, GoASM, Gas, RosAsm, HLA) и не рекомендуем TASM 1 22.04.2008 19:59
базы данных Gromsky Помощь студентам 2 03.03.2008 15:45