Скачать: CL | DM;

Key violation   Найти похожие ветки 

← →
Russko ©   (2003-10-02 13:00) [0]

Подскажите пожалуйста, почему в таблице при переходе ко второй записи: DataModule2.Table2.Next возникает ошибка:"Key violation".

---

← →
Reindeer Moss Eater ©   (2003-10-02 13:04) [1]

Потому что переход ко второй записи инициирует insert записи в таблицу в которой нарушается ограничение первичного ключа

---

← →
Russko ©   (2003-10-02 13:08) [2]

И как это можно исправить???

---

← →
MsGuns ©   (2003-10-02 13:09) [3]

Перед Next проверять конец ли это НД

---

← →
Russko ©   (2003-10-02 13:25) [4]

Извеняюсь, но представьте что я профан. Подскажите какими свойствами воспользоваться???

---

← →
DenK_vrtz ©   (2003-10-02 13:27) [5]

DataModule2.Table2.eof

---

← →
Russko ©   (2003-10-02 13:31) [6]

До такого я и сам дошёл. Вот сам кусок, где возникает ошибка:
DataModule2.Table2.First;
while not DataModule2.Table2.Eof do begin
DataModule2.DataSource3.Edit;
DataModule2.Table3.FieldByName("N").AsString:=DataModule2.Table2.FieldByName("N").AsString;
DataModule2.Table3.FieldByName("Oboznachenie").AsString:=DataModule2.Table2.FieldByName("Oboznachenie").AsString;
DataModule2.Table3.FieldByName("Material").AsString:=DataModule2.Table2.FieldByName("Material").AsString;
DataModule2.Table3.FieldByName("Priznak").AsString:=DataModule2.Table2.FieldByName("Priznak").AsString;
DataModule2.Table3.FieldByName("Profil").AsString:=DataModule2.Table2.FieldByName("Profil").AsString;
DataModule2.Table3.FieldByName("Width").AsString:=DataModule2.Table2.FieldByName("Width").AsString;
DataModule2.Table3.FieldByName("Height").AsString:=DataModule2.Table2.FieldByName("Height").AsString;
DataModule2.Table3.FieldByName("Number").AsString:=DataModule2.Table2.FieldByName("Number").AsString;

DataModule2.Table2.Next;
DataModule2.Table3.Append;
end;

---

← →
Johnmen ©   (2003-10-02 13:33) [7]

>Reindeer Moss Eater © (02.10.03 13:04)
>Потому что переход ко второй записи инициирует insert записи в
>таблицу

:)) Кем/чем инициируется ???

---

← →
Anatoly Podgoretsky ©   (2003-10-02 13:33) [8]

Ты создаешь жве пустые записи, а больше одной никак не получится.

---

← →
Johnmen ©   (2003-10-02 13:36) [9]

Срочно Edit, Append, Post, Next + F1 !!!

---

← →
DenK_vrtz ©   (2003-10-02 13:37) [10]

Круто!!!!
А для копирования данных BatchMove не помогает?

---

← →
Russko ©   (2003-10-02 13:45) [11]

Всё путём, всем спасибо. Я просто поставил DataModule2.Table3.Append; в начало цикла ивсё)))

---

← →
MsGuns ©   (2003-10-02 13:47) [12]

Да уж, код супертяжелый ! А вот использовать вместо этажерок типа
DataMudule2.Table1.FieldByName().As...

структурных записей (record) или хотя бы конструкции with .. do слабо ?

---

← →
Russko ©   (2003-10-02 13:49) [13]

Нет, не слабо, просто не покатит.

---

← →
Johnmen ©   (2003-10-02 13:51) [14]

>Russko © (02.10.03 13:49)
>...просто не покатит.

а если просто полетит ?

---

← →
Russko ©   (2003-10-02 13:53) [15]

>Johnmen может и полетит)))

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.47 MB
Время: 0.013 c