Клубове Дир.бг
powered by diri.bg
търси в Клубове diri.bg Разширено търсене

Вход
Име
Парола

Клубове
Dir.bg
Взаимопомощ
Горещи теми
Компютри и Интернет
Контакти
Култура и изкуство
Мнения
Наука
Политика, Свят
Спорт
Техника
Градове
Религия и мистика
Фен клубове
Хоби, Развлечения
Общества
Я, архивите са живи
Клубове Дирене Регистрация Кой е тук Въпроси Списък Купувам / Продавам 07:55 15.06.24 
Компютри и Интернет
   >> Delphi
Всички теми Следваща тема *Кратък преглед

Страници по тази тема: 1 | 2 | >> (покажи всички)
Тема Re: Проверка дали съществува вече даден запизнови [re: Beco_]  
Автор3aпиз (Нерегистриран)
Публикувано06.04.07 10:52



procedure TForm1.DBNavigatorClick(Sender: TObject; Button: TNavigateBtn);
begin
if button = nbpost
then
begin
proverka;
end;
end;

procedure TForm1.proverka;
begin
if table1.Locate(table1class.Value,editclass.text,[])
then ShowMessage('Record is found');
end;


table1class име на полето
editclass текстовото поле където севъвеждат стойностите


пускам програмата изтривам всички записи (т.е. няма нагледно)
в editclass въвеждам 9s натискам post button и извежда това


---------------------------
Debugger Exception Notification
---------------------------
Project Project1.exe raised exception class EDatabaseError with message 'Table1: Field '9s' not found'. Process stopped. Use Step or Run to continue.
---------------------------
OK Help
---------------------------





при абсолютно същата процедура обаче
table1.Locate(table1class.KeyFields,editclass.text,[])
и няма наличие на запизи(предварително съм ги изтрил като съм пуснал програмата) се показва съобщение Record is found




при абсолютно същата процедура
table1.Locate(table1class.KeyFields,table1class.CurValue,[])
table1class.CurValue - предполагам че това е за текуща стойност
и няма наличие на запизи(предварително съм ги изтрил като съм пуснал програмата)се показва това



---------------------------
Debugger Exception Notification
---------------------------
Project Project1.exe raised exception class EDatabaseError with message 'Table1: Not in cached update mode'. Process stopped. Use Step or Run to continue.
---------------------------
OK Help
---------------------------



Тема Re: Проверка дали съществува вече даден запизнови [re: 3aпиз]  
Авторзaпиз (Нерегистриран)
Публикувано06.04.07 11:00



procedure TForm1.proverka;
begin
if table1.Locate(table1class.Value,editclass.text,[])
then ShowMessage('Record is found');
end;

със if not table1.locate... e същата работа
на мен ми трябва същото обаче да намира за повтарящи се а не за това че няма такъв запиз



Тема Re: Проверка дали съществува вече даден запизнови [re: 3aпиз]  
Автор Beco_ (Boogie chillun)
Публикувано06.04.07 16:01



Ей тук май е ключа от бараката: Project Project1.exe raised exception class EDatabaseError with message 'Table1: Field '9s' not found'. Process stopped. Use Step or Run to continue.
т.е. нямаш поле "9s" в БД, апък ти търсиш същата стойност. И четене му е майката ...



Тема Re: Проверка дали съществува вече даден запизнови [re: Beco_]  
Автор3aпиз (Нерегистриран)
Публикувано07.04.07 14:05








Страници по тази тема: 1 | 2 | >> (покажи всички)
Всички темиСледваща тема*Кратък преглед
Клуб :  


Clubs.dir.bg е форум за дискусии. Dir.bg не носи отговорност за съдържанието и достоверността на публикуваните в дискусиите материали.

Никаква част от съдържанието на тази страница не може да бъде репродуцирана, записвана или предавана под каквато и да е форма или по какъвто и да е повод без писменото съгласие на Dir.bg
За Забележки, коментари и предложения ползвайте формата за Обратна връзка | Мобилна версия | Потребителско споразумение
© 2006-2024 Dir.bg Всички права запазени.