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

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

dbf


Страницы:   1 2

lightix ©   (2004-11-17 10:01:00) 

При работе с dbf при помощи компонента UpdateSQL после удаления записи, вылетает ошибка при попытке записать сохранения ApplyUpdates&


lightix   (2004-11-17 11:19:00) [21]

Query1:
RequestLive=true;
CachedUpdates=true;


На кнопке сохранения данных:
Query1->Edit();
Query1->Post();

Query1->ApplyUpdates();
Query1->CommitUpdates();


lightix   (2004-11-17 11:14:00) [22]

UpdateSQL:Modify update "s_met_st.dbf"
set
 KST = :KST,
 POTPR = :POTPR,
 NST = :NST
where
 KST = :OLD_KST and
 POTPR = :OLD_POTPR and
 NST = :OLD_NST

UpdateSQL:Insert
insert into "s_met_st.dbf"
 (KST, POTPR, NST)
values
 (:KST, :POTPR, :NST)
UpdateSQL:Delete
delete from "s_met_st.dbf"
where
 KST = :OLD_KST and
 POTPR = :OLD_POTPR and
 NST = :OLD_NST

Query1:
Query1->Close();
Query1->RequestLive=true;
Query1->SQL->Clear();
Query1->SQL->Add("select potpr,kst,nst from s_met_st.dbf");

Query1->SQL->Add("where potpr="+AnsiString(RadioGroup2->ItemIndex));    
if (Edit1->Text!="")
{
Query1->SQL->Add("and kst="+Edit1->Text);
}

if (Edit2->Text!="")
{
Query1->SQL->Add("and nst="+AnsiUpperCase(Edit2->Text));
}

  if (Form1->RadioGroup1->ItemIndex==0)
  Form1->Query1->SQL->Add("order by kst");      
  else if (Form1->RadioGroup1->ItemIndex==1)
  Form1->Query1->SQL->Add("order by nst");

  Query1->Open();


Соловьев   (2004-11-17 11:10:00) [23]

Что в UpdateSQL?
И в Query?


Соловьев   (2004-11-17 11:10:00) [24]

Что в UpdateSQL?


lightix   (2004-11-17 11:03:00) [25]

EdatabaseEngineError: Update failed


Соловьев   (2004-11-17 10:37:00) [26]


> вылетает ошибка

Какая?


lightix   (2004-11-17 10:25:00) [27]

Изменения у меня кэшированы и после удаления надо же как-то сохранить изменения. Подскажи как мне сохранить изменения после удаления


Соловьев   (2004-11-17 10:18:00) [28]


> UpdateSQL после удаления записи, вылетает ошибка при попытке
> записать сохранения ApplyUpdates&

ApplyUpdates - это если ты юзаешь кешированные изменения
А после удаления ничего вызывать не надо.


Страницы:   1 2

Наверх

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