Forum: Object-Pascal / Delphi-Language
by Klaus01,
16. Jan 2022
ja, stimmt.
procedure TForm1.Button1Click(Sender: TObject);
begin
ComboBox1.Items := ComboBox1.Items + length( ComboBox1.Items ).ToString;
Label2.Text := ComboBox1.Items;
ComboBox1.ItemIndex := 1;
comboBox1.Repaint;
end;
Forum: Object-Pascal / Delphi-Language
by Klaus01,
16. Jan 2022
.. sieht doch eigentlich ok aus.
Delphi 11 - Windows 10 21H2
Bei zweimaligem betätigen des Buttons steht dort 1123
a) Item 11
b) item{1] 112 - 11 plus Länge von '11'
c) Item 1123 112 plus Länge von '112'