Einzelnen Beitrag anzeigen

Gremlin

Registriert seit: 18. Apr 2006
Ort: Im Süden
176 Beiträge
 
Delphi 7 Enterprise
 
#1

TDBComboBox: Auswahl geht verloren bei OnEditMode

  Alt 26. Mär 2024, 08:02
Datenbank: Egal • Version: 10.2 • Zugriff über: BDE, FireDAC
Hallo


ich habe eine simple TFDMemTable mit TDataSource und einer TDBComboBox.

Die Komponenten sind alle miteinander verbunden, die ComboBox geht auf ein Integer-Feld.
In TFDMemTable ist der Event OnBeforeEdit mit einer Abfrage verbunden, ob in den Edit-Modus gewechselt werden soll.
Die ComboBox ist im Style=csDropDownList und enthält diverse Integer-Werte in Items.

Code:
  if not(FDMemTable1.State=dsEdit) then
    if (MessageDlg('in Edit Mode schalten?', mtConfirmation, [mbYes, mbNo], 0) <> mrYes) then Abort;
Ist die Datenmenge im Edit-Mode, so kann über die Combo der Wert ohne Probleme geändert werden.
Ist die Datenmenge jedoch nicht im Edit-Mode und wird versucht über die Combo einen Wert auszuwählen, so enthält nach der Auswahl und der Abfrage "in Edit Mode schalten?" der Wert der Combo wieder den Anfangswert.

Wahrscheinlich ist dieses Problem schon immer vorhanden, aber jetzt erst aufgefallen.
Irgendeine Idee??

Danke
Gruss Gremlin
  Mit Zitat antworten Zitat