hallo, lange Rede kurzer Sinn.
Ich hab eine Combobox und eine Editfeld, wo ich per click
den Inhalt des editfeld ind die Combobox schreibe.
Delphi-Quellcode:
procedure TForm1.BtnEditTextClick(Sender: TObject);
var
LText : String;
begin
LText := eComboAddText.text;
cbOpenForm2.Items.Add(LText);
eComboAddText.text := '';
end;
Nun will ich das ausgewählte Item in der Combobox im Editfeld anzeigen Lassen.
Das haut soweit nicht hin, da er wenn er was anzeigt zwei schwarze Balken mit anzeigt.
Delphi-Quellcode:
procedure TForm1.cbOpenForm2Change(Sender: TObject);
begin
eComboAddText.text := '';
eComboAddText.text := cbOpenForm2.Items.Text;
end;