Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.08.12;
Скачать: CL | DM;

Вниз

Почему дублируются записи?   Найти похожие ветки 

 
maxim2 ©   (2002-07-23 09:58) [0]

Привет всем!
Люди помогите 2 день мучаюсь, немогу понять почему при копировании дублируются записи.
Код такой

for i:=1 to form19.Query1.RecordCount do
begin
form19.Query1.RecNo:=i;
form32.Table1.insert;
form32.Table1.FieldByName("pole1").asstring:=form19.Query1.fieldbyname("pole1").AsString;
form32.Table1.FieldByName("pole2").asstring:=form19.Query1.fieldbyname("pole3").AsString;
form32.Table1.FieldByName("pole3").asstring:=form19.Query1.fieldbyname("pole5").AsString;
form32.Table1.FieldByName("pole4").asstring:=form19.Query1.fieldbyname("pole8").AsString;
form32.Table1.FieldByName("pole5").asstring:=form19.Query1.fieldbyname("pole10").AsString;
form32.Table1.FieldByName("pole6").asstring:=form19.Query1.fieldbyname("pole21").AsString;
form32.Table1.FieldByName("pole7").asstring:=form19.Query1.fieldbyname("pole22").AsString;
form32.Table1.post;

end;
И после этого каждой записи по 2 штуки.


 
Lord Warlock ©   (2002-07-23 10:00) [1]

Скорре всего отсутствий уникального индекса в таблице, куда вставляются записи...


 
Desdechado ©   (2002-07-23 10:07) [2]

я бы цикл for заменил на
First;
while( not EOF ) do begin
..
Next;
end;


 
Zelius ©   (2002-07-23 10:11) [3]

А ты не вызываешь эту процедуру дважды? Поставь брякпойнт и посмотри...



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

Текущий архив: 2002.08.12;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.011 c
4-35494
Max2000
2002-06-04 17:41
2002.08.12
Мастера напомните плиз!!!!!!


6-35397
ОлегМ
2002-04-10 13:18
2002.08.12
WebSnap


3-35149
RDA
2002-07-21 10:27
2002.08.12
Express Quantum TdxDBTreeView


14-35458
Michkarus
2002-07-18 22:04
2002.08.12
А че такое САБЖ?


14-35456
Пастор
2002-07-18 22:41
2002.08.12
Кто знает сайт посвященный С , такой же крутой как этот ?