ComboBox überweisung

[mav]

hi jungs..

ich habe hier ein problem.. was zimlich komisch erscheint :D

also zuerst..
ich lade meine combobox items aus einer xml datei

AddUnit.pas

Delphi-Quellcode:

  xmldoc := CoDOMDocument40.Create;
  xmldoc.setProperty('NewParser', true);
  xmldoc.load(MainForm.fAppPath + 'settings.xml');

  box := xmldoc.documentElement.selectNodes('box');

  for i:=0 to box.length - 1 do begin
  ComboBox3.Items.Add(box.item[i].selectSingleNode('name').text);
  end;

Wenn ich nun den Eintrag gespeichert habe, und den Eintrag editieren möchte überweise ich die elemente Modal

MainUnit.pas

Delphi-Quellcode:

curNode := xmlDoc.documentElement.selectSingleNode('/movies_db/mov[id="'+AppsList.Selected.Caption+'"]');

  with EditingForm do begin
    Edit1.Text := curNode.selectSingleNode('name').text;
    ComboBox1.ItemIndex := ComboBox1.Items.IndexOf(curNode.selectSingleNode('mediatyp').text);
    Edit2.Text := curNode.selectSingleNode('date').text;
    ComboBox2.ItemIndex := ComboBox2.Items.IndexOf(curNode.selectSingleNode('language').text);
    Edit5.Text := curNode.selectSingleNode('cds').text;
    ComboBox3.ItemIndex := ComboBox3.Items.IndexOf(curNode.selectSingleNode('box').text);
    CheckBox1.Checked := StrToBool(curNode.selectSingleNode('need').text);
    CheckBox2.Checked := StrToBool(curNode.selectSingleNode('borrowed').text);
    Edit3.Text := curNode.selectSingleNode('borrowedto').text;
    Memo2.Text := curNode.selectSingleNode('comment').text;
    ShowModal;
  end;

Diese Daten werden übertragen, jedoch werden die ComboBoxen nicht gefühlt, erst wenn ich es das 2te mal versuche..

EditUnit.pas

Delphi-Quellcode:

xmldoc := CoDOMDocument40.Create;
  xmldoc.setProperty('NewParser', true);
  xmldoc.load(MainForm.fAppPath + 'settings.xml');

  box := xmldoc.documentElement.selectNodes('box');

  for i:=0 to box.length - 1 do begin
  ComboBox3.Items.Add(box.item[i].selectSingleNode('name').text);
  end;

[mav]

hat sich erledigt :)