Thema: Delphi ComboBox alter ItemIndex

Einzelnen Beitrag anzeigen

Delphi.Narium

Registriert seit: 27. Nov 2017
2.490 Beiträge
 
Delphi 7 Professional
 
#3

AW: ComboBox alter ItemIndex

  Alt 23. Apr 2019, 12:54
Komponenten haben u. a. die Eigenschaft Tag. Die kann man für die Zwischenspeicherung von Integerwerten "missbrauchen".
Delphi-Quellcode:
// Im Objektinspektor das Attribut Tag der Combobox auf -2 setzen.
// Oder an einer anderen sinnvollen Stelle.
// Tag ist normalerweise 0, da dies ein gültiger Wert für 'nen Itemindex ist, muss er geändert werden.
// -1 ist auch eher schlecht, da -1 bedeutet, das was in der ComboBox nicht enthalten ist.
// -2 ist kein im "normalen Leben" als ItemIndex auftretender Wert ;-)
//
// Dann müsste man mit sowas arbeiten können.
procedure TForm1.ComboBox1Change(Sender: TObject);
begin
  if ComboBox.Tag <> ComboBox.ItemIndex then begin
    // alter ItemIndex <> neuem ItemIndex:
  end else begin
    // ItemIndex ist unverändert:
  end;
  // Hier merken wir uns den ItemIndex nach der Änderung.
  // Der Wert in Tag ist dann bei der nächsten Änderung der "alte" ItemIndex.
  ComboBox.Tag := ComboBox.ItemIndex;
end;
Nur mal so hingedaddelt.

Ob's nun einfacher ist, als mit 'ner eigenen Variabel, ist wohl eher Geschmacksache
  Mit Zitat antworten Zitat