Navigacija
Lista poslednjih: 16, 32, 64, 128 poruka.

Usporavanje upisa

[es] :: Pascal / Delphi / Kylix :: Usporavanje upisa

[ Pregleda: 2088 | Odgovora: 4 ] > FB > Twit

Postavi temu Odgovori

Autor

Pretraga teme: Traži
Markiranje Štampanje RSS

juha5803

Član broj: 74797
Poruke: 88
*.teol.net.



Profil

icon Usporavanje upisa06.10.2008. u 08:21 - pre 189 meseci
Pozdrav!
Kombinacija Delphi/Firebird
Procedura u programu generiše i upisuje u datoteku nekliko desetina hiljada slogova (sa nekih 30-tak) podataka. Da provjerim brzinu dodao sam upis vremena i uvidio da kako datoreka raste upis postaje sve sporiji, ima li lijeka?!
 
Odgovor na temu

Vic
Error974
BI&SE
Beograd

Član broj: 16118
Poruke: 396
194.106.185.*



+49 Profil

icon Re: Usporavanje upisa06.10.2008. u 10:24 - pre 189 meseci
Nisi rekao koje komponente koristis i kako (append, insert) vrsis upisivanje novih slogova?
ERROR974
 
Odgovor na temu

juha5803

Član broj: 74797
Poruke: 88
*.teol.net.



Profil

icon Re: Usporavanje upisa06.10.2008. u 10:38 - pre 189 meseci
Citat:
Vic: Nisi rekao koje komponente koristis i kako (append, insert) vrsis upisivanje novih slogova?


DbExpress , a slogove dodajem sa Append
 
Odgovor na temu

Vic
Error974
BI&SE
Beograd

Član broj: 16118
Poruke: 396
194.106.185.*



+49 Profil

icon Re: Usporavanje upisa06.10.2008. u 11:03 - pre 189 meseci
U tome ti i lezi problem. Pretpostavljam da kopiras podatke iz jedne tabele u drugu. Probaj da radis insert umesto append, pa vidi kako se ponasa.
ERROR974
 
Odgovor na temu

savkic
Igor Savkić

Moderator
Član broj: 92186
Poruke: 2739



+92 Profil

icon Re: Usporavanje upisa06.10.2008. u 12:20 - pre 189 meseci
Ni Append ni Insert metode dataseta već SQL komponenta i prepared INSERT. Tačna sintaksa zavisi od komponenti ali ti je ovo osnovna ideja.

Code:

Transaction.Start;
Qry.SQL := 'INSERT INTO TABLE (ID, A) VALUES (:ID, :A);';
Qry.Prepare;
for i := 0 to 1000 do
begin
  Qry.Params[0] := i;
  Qry.Params[1] := 'A';
  Qry.ExecSql;
end;

Transaction.Commit;


 
Odgovor na temu

[es] :: Pascal / Delphi / Kylix :: Usporavanje upisa

[ Pregleda: 2088 | Odgovora: 4 ] > FB > Twit

Postavi temu Odgovori

Navigacija
Lista poslednjih: 16, 32, 64, 128 poruka.