Items einer Listbox an einer Combobox übergeben???

[mlspider]

Das einzige Ereignis ist DropDown:

Delphi-Quellcode:

procedure TBrowser.ComboBox1DropDown(Sender: TObject);
var i:Integer;
begin
 with ComboBox1 do begin
  if Text = '' then
  begin
   Items.Delete(ix);
    ix:=-1
  end else begin
   for i := 0 to Items.Count-1 do
    if Text = Items[i] then Exit;

    Items.Add(Text)
  end
 end
end;

[Catbytes]

Hallo,

ist das die Standardkomponente von Borland (TComboBox)? spSkinComboBox1 hört sich nach Fremdkomponente an - eventuell gibt es da bei den Eigenschaften einen Filter oder sowas? Oder Du hast die Sortierung eingeschalten und der Eintrag ist zwar da, aber eben nicht an erster Stelle.

Leg' Dir doch mal zwei Labels auf das Formular und lass Dir die Anzahl der Einträge anzeigen - jeweils für Die ComboBox und die ListBox.

Übrigens: Bei mir klappt das auch wundrbar...

[Die Muhkuh]

Aha,

ich gehe mal von folgender Situation aus:

Du startest dein Prog und das lädt nun die ComboBox. Im Text der ComboBox (also das was angezeigt wird) steht nichts drin. Wenn du nun auf die ComboBox klickst wird der erste Eintrag gelöscht.

Kommentier mal diese Zeile zum Test aus:

Items.Delete(ix);

[shmia]

Zitat von mlspider:

Jetzt werden wie von Geisterhand die Werte übernommen. Nur leider nicht alle!!!! Der erste Eintrag wird in der Combobox einfach abgeschnitten!

In der Listbox ist alles vollständig aufgelistet!

Was ist das denn nun wieder für ein Phänomen?

Deine Datei enthält irgendwelche "Dreckzeichen".
Nimm einen HexEditor und schau mal rein.

[mlspider]

Jupp, das wars gewesen!!!

Items.Delete(ix); auskommentieren. Jetzt geht alles nach Plan. Ja es handelt sich um eine Fremdkompo "spSkinComboBox". Ist aber vom Typ ComboBox.

Danke nochmals an alle!!!