Combox füllen

**sephraina**

Hallo Zusammen

oder besser HILFE!

Bin ziemlich am verzweifeln. Schreibe zur Zeit an einer App diese soll bei Start Daten (in Form eines XML-Streams) holen und in eine Combox packen. Hat am Sonntag auch funktioniert. -Heute nicht mehr

obwohl ich nichts geändert habe. Beim Starten der App im Emulator kommt sie nur bis zum füllen und stürzt dann ab.
also in Ersten Form rufe ich diesen Code auf:

markieren

Delphi-Quellcode:

			procedure TFProbenbearbeitung.FormActivate(Sender: TObject);

begin

    showmessage('hier');

    FillCombox(cbmethode);

    showmessage('nachher');

end;

die showmessages habe ich verwendet um zu sehen wie weit er kommt.
das FillCombox kommt aus einem anderen Unit:

zusammenfalten · markieren

Delphi-Quellcode:

			procedure FillCombox(cb: TCombobox);

var s: TMemorystream;

    str: TStringstream;

    a, p: string;

    y, i: integer;

    xm: IXMLDocument;

    Node1 : IXMLNode;

begin

      str := TStringstream.Create;

      a := ('4' + '|');

      p := ('http://127.0.0.1/' + a);

      s := DataModule1.GetXMLData(p);

      s.Position := 0;

      str.LoadFromStream(s);

      if xm = nil then xm := newXMLDocument else xm.XML.Clear;

      xm.LoadFromXML(str.DataString);

      with xm.DocumentElement do

          begin

          for y := 0 to ChildNodes.Count-1 do

              begin

                   Node1 := childnodes[y];

                   for i := 0 to Node1.ChildNodes.Count-1 do

                   begin

                    cb.items.add(Node1.ChildNodes.Nodes[i].GetAttributeNS('TXT_Methode','')+'|'+ Node1.ChildNodes.Nodes[i].GetAttributeNS('INT_MethodeID','')); 

                  end;

              end;

          end;

end;

Am Auslesen des XMl-Streams kann es nicht liegen, dies habe ich getested, und funktioniert. Auch funktioniert das cb.items.add() dessen Inhalt zeigt er mir in einem showmessage an und dann stürzt die App ab.

Jetzt weiss ich einfach nicht mehr weiter

hoffe jemand hat eine Idee. Zumal das Ding am Sonntag ja noch funktioniert hat. Wenn ich das FillCombox(cbmethode); auskommentiere läuft die Chose ohne Problem...

Combox füllen

Combox füllen

Forumregeln