Ergebnis der Suchanfrage

• Forum: Datenbanken

  Re: Baumstruktur - rekursive Prodzedur???

    Delphi
    by Stevie, 14. Mär 2005
  1. pushen erst nach 24 Stunden
  
  2. Die Methode oben funktioniert 100%ig!
  procedure get_bookmarks(parent_id:integer;ebene:string);
  var
  TempQuery: TZReadOnlyQuery;
  begin
  TempQuery := TZReadOnlyQuery.Create(nil);
  TempQuery.Connection := form1.zconnection1;
  TempQuery.SQL.Text:='SELECT * FROM bookmarks WHERE parent_id='+inttostr(parent_id);
• Forum: Datenbanken

  Re: Baumstruktur - rekursive Prodzedur???

    Delphi
    by Stevie, 14. Mär 2005
  :shock: Klasse.Create <> Objekt.Create
  
  Wann kommt der Fehler, und wo steht der Debugger danach?
• Forum: Datenbanken

  Re: Baumstruktur - rekursive Prodzedur???

    Delphi
    by Stevie, 14. Mär 2005
  Sorry, Fehler oben (aber schon korrigiert). :oops:
  Es muss TempQuery := TZReadOnlyQuery.Create(nil);heißen!
• Forum: Datenbanken

  Re: Baumstruktur - rekursive Prodzedur???

    Delphi
    by Stevie, 14. Mär 2005
  Nicht getestet, aber so ungefähr:
  procedure get_bookmarks(parent_id:integer;ebene:string);
  var
  TempQuery: TZReadOnlyQuery;
  begin
  TempQuery := TZReadOnlyQuery.Create(nil);
  TempQuery.Connection := form1.zconnection1;
  TempQuery.SQL.Text:='SELECT * FROM bookmarks WHERE parent_id='+inttostr(parent_id);
  TempQuery.Open;
  TempQuery.FieldByName('id').AsString;
• Forum: Datenbanken

  Re: Baumstruktur - rekursive Prodzedur???

    Delphi
    by Stevie, 14. Mär 2005
  Genauso ist es! Du führst ja bei jedem Aufruf der Methode die Abfrage neu aus, deshalb stehen dort beim Rücksprung in die nächst höhere Aufrufebene die Daten des letzten Aufrufs drin. Wenn du das so lösen willst, wie du es in php machst, dann musst du das Abfrage-Ergebnis speichern oder in jedem Aufruf ein Query-Objekt erstellen.