|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
20.12.2009, 17:17 | #1 |
Пользователь
Регистрация: 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. |
20.12.2009, 17:23 | #2 |
*
Старожил
Регистрация: 22.11.2006
Сообщений: 9,201
|
Ну и проверяйте в созданной записи все нужные поля.
И удаляйте эту запись, если она не нравится... В чем трудность-то? |
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Базы данных | Alexoid | Assembler - Ассемблер (FASM, MASM, WASM, NASM, GoASM, Gas, RosAsm, HLA) и не рекомендуем TASM | 1 | 22.04.2008 19:59 |
базы данных | Gromsky | Помощь студентам | 2 | 03.03.2008 15:45 |