Delphi ComboBox alter ItemIndex

Thema durchsuchen

Ansicht

Themen-Optionen

ComboBox alter ItemIndex

Ein Thema von Pytroxis · begonnen am 23. Apr 2019 · letzter Beitrag vom 24. Apr 2019

Vorheriger Beitrag

Nächster Beitrag

mkinzler

(Moderator)

Registriert seit: 9. Dez 2005
Ort: Heilbronn
39.880 Beiträge

Delphi 11 Alexandria

AW: ComboBox alter ItemIndex

23. Apr 2019, 23:02

Dann aber besser so

markieren

Delphi-Quellcode:

			procedure TForm1.ComboBoxDropDown(Sender: TObject);

begin

  (Sender as TCombobox).Tag := (Sender as TCombobox).ItemIndex;

end;

procedure TForm1.ComboBoxKeyDown(Sender: TObject; var Key: Word;

  Shift: TShiftState);

begin

  (Sender as TCombobox).Tag := (Sender as TCombobox).ItemIndex;

end;