.. ich habs noch nicht geschafft
...
Ich hab z.B.:
Delphi-Quellcode:
my_temp_Query1 :TZQuery
...
TZQuery1 - Select wert1,wert2 from Tabelle1
TZQuery2 - Select wert1,wert2 from Tabelle2
TZQuery3 - Select wert1,wert2 from Tabelle3
TZQuery4 - Select wert1,wert2 from Tabelle4
TZQuery5 - Select wert1,wert2 from Tabelle5
TZQuery6 - Select wert1,wert2 from Tabelle6
TZQuery7 - Select wert1,wert2 from Tabelle7
...
und eine Schleife...
Delphi-Quellcode:
while not TZQuery1.EOF do
begin
if wert1 = x1 then my_temp_Query1:=TZQuery1;
if wert1 = x2 then my_temp_Query1:=TZQuery2;
if wert1 = x3 then my_temp_Query1:=TZQuery3;
if wert1 = x4 then my_temp_Query1:=TZQuery4;
if wert1 = x5 then my_temp_Query1:=TZQuery5;
if wert1 = x6 then my_temp_Query1:=TZQuery6;
my_temp_Query1.append irgendwas...
my_temp_Query1.post
my_temp_Query1:=nil;
TZQuery1.next;
end;
Wenn das so ausgeführt wird, steigt die Speicherauslastung extrem an und wird nicht mehr freigegeben..
ich hab my_temp_Query schon created .. nicht created.. Refresh'ed .. free gesetzt .. ect..
hat jemand eine idee ?
vielen Dank
Erich
[edit=mkinzler]Delphi-Tags eingefügt Mfg, mkinzler[/edit]
Erich Wanker - for life:=1971 to lebensende do begin ..