Главная страница
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.015 c
3-35214
Tornado
2002-07-24 09:38
2002.08.12
как объеденить??


14-35450
Younick
2002-07-15 10:38
2002.08.12
Странная тенденция или куда мы катимся или ...


1-35250
Lola
2002-07-31 09:30
2002.08.12
Куда физически TQuery пишет сформированный запрос?


7-35488
Timon
2002-05-27 14:40
2002.08.12
---|Ветка была без названия|---


14-35451
Sniffer
2002-07-13 16:05
2002.08.12
Какая по вашему мнению лучшая книга по разработке баз данных...