Thema: Delphi Performance verbessern

Einzelnen Beitrag anzeigen

Luncustaf

Registriert seit: 31. Jan 2003
80 Beiträge
 
Delphi 6 Enterprise
 
#89

Re: Performance verbessern

  Alt 7. Jan 2007, 17:40
hi marabu,

so nach weihnachten sylvester und dem ganzen stress bin ich nun mal wieder dazugekommen mich meinem problem zu widmen.
klappt nun soweit auch alles ganz gut nur 2 kleine problemchen hab ich noch.

1. ich bekomme mit deiner abfrage zwar die gesamtanzahl der rezepte in den kategorien aber nicht die anzahl der rezepte in den unterkategorien.


2. wie füge ich nun den jeweiligen kategorien die richtige unterkategorie zu? wenn ich es so wie immer mache

Delphi-Quellcode:
   with tv_kategorien.Items do
   begin
     t := AddChildObject(nil,sqlq.FieldByName('NAME').AsString + ' ('+sqlq.fieldbyname('COALESCE(R.ANZAHL, S.ANZAHL, 0)').AsString+')', Pointer(sqlq.FieldByName('iPos').AsInteger));
     AddChildObject(t,sqlq.fieldbyname('NAME?').AsString+ ' (' + sqlq.fieldbyname('COALESCE(R.ANZAHL, S.ANZAHL, 0)?').AsString +')', Pointer(sqlq.FieldByName('iPos').AsInteger));
   end;
   sqlq.Next;
dann ieht es so wie auf dem bild aus - mir ist klar das ich bei den fieldbyname wo die fragezeichen mit dabei stehen etwas anderes reinschreiben muss aber ich weis nicht genau was - oder das ich eine abfrage machen muss. kannst du mir da vllt nochmal auf die sprünge helfen?

gruß und ein gutes neues jahr
Simon
Miniaturansicht angehängter Grafiken
baum_396.jpg  
  Mit Zitat antworten Zitat