Форум: "Базы";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.03.07;
Скачать: [xml.tar.bz2];




Вниз

Написал кодик через SQL но уж лчень медленно, как его под Table переделать не могу понять :) 


Dreamer   (2002-02-07 19:01) [0]

Помогите плз.

Form3.Query2.Close;
Form3.Query2.ParamByName("Sec").AsInteger := Time3;
Form3.Query2.Open;
e2:=Form3.Query2.FieldByName ("nalet"+IntToStr(Schetchik)).AsInteger;
with form3.Query2 do
begin
edit;
if 0<FieldValues["nalet"+IntToStr(Schetchik)] then
FieldValues["nalet"+IntToStr(Schetchik)]:=FieldValues["nalet"+IntToStr(Schetchik)]+e1
else
FieldValues["nalet"+IntToStr(Schetchik)]:=e1;
post;
end;



Shaman_Naydak   (2002-02-07 20:14) [1]

Во-первых, всю эту бессмысленную бодягу можно свести
в один SQL-запрос UPDATE..
Во-вторых если сильно хочется юзать таблицу,
то первые 3 строчки меняшь на

if Table2.Locate("Sec", [Time3], []) then
begin
// фылорыварывал

end;

если же у тебя это поле не уникально, тогда надо подходить
немного по другому :)



Дремучий   (2002-02-07 21:51) [2]

2 Dreamer ©
я так понимаю, это все должно было быть в цикле или как?
в любом случае, послушай Shaman_Naydak ©, сделай через
SQL-запрос UPDATE - протащишься, я уже через это прошел.




Форум: "Базы";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.03.07;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.72 MB
Время: 0.051 c
1-19192           cypher                2002-02-17 21:13  2002.03.07  
NetFileEnum


3-19050           Dreamer               2002-02-07 19:01  2002.03.07  
Написал кодик через SQL но уж лчень медленно, как его под Table переделать не могу понять :)


1-19195           sammy                 2002-02-18 14:16  2002.03.07  
условие в Install Shield


3-19099           kserg@ukr.net         2002-02-07 10:53  2002.03.07  
Нужен совет: что лучше использовать для создания отчетов?


1-19257           phantom2040           2002-02-20 11:13  2002.03.07  
Число дней в текущем месяце