Combobox lookup refresh Items

[hoika]

Hallo,
hier steht was von DataSource.Active=False und wieder True setzen,
also nicht die Query.

https://delphiaball.co.uk/2015/10/21...ings-via-code/

Oder deaktivierst das LiveBinding im Code und setzt die Query danach wieder drauf.


Ich erkläre es etwas umständlich, weil ich LiveBindings nicht benutze.

[Medium]

Soo, ich konnte das nun endlich mal testen. Leider ohne Erfolg.

Die dort beschriebenen Properties gibt es so bei mir überhaupt nicht. Ich vermute der wichtige Unterschied ist, dass dort VCL LiveBindings beschrieben werden. Ich arbeite jedoch mit FMX. (Prima, dass die Interfaces da unterschiedlich zu sein scheinen.....)

Ich habe nun alles durch. Alle Komponenten die in irgendeiner Weise an den Bindings oder der Datenquelle beteiligt sind habe ich Disabled/Enabled, Refreshed, Close/Open, Tänzchen gemacht, Weihrauch verströmt. Nichts. Meine DropDowns versorgen sich EIN Mal bei Programmstart, und dann niemals wieder. Das kann's doch eigentlich nicht sein, oder? Das ist doch absolute Basis-Funktion, ein Musterbeispiel für was man LiveBindings überhaupt haben wöllte. Wie kann sowas ungetestet in einem Release landen?


Hätte sonst noch ggf. jemand eine schlaue Idee? Ich will mein Programm eigentlich nicht nach jeder Änderung in meinen Tabellen neu starten lassen um diese in den Auswahlboxen zu übernehmen...

(Sorry wenn das etwas angepinkelt klingt. Bin ich auch. Aber nicht von euch! <3 )

[DenkDirNix]

Hallo,

ich hänge mich mal an diesen Thread dran da die Überschrift passt und man ihn deshalb beim Suchen findet. Mein Problem betrifft allerdings die ComboBox unter FMX. Bin FMX-Anfänger...

Frage: Wie ändere ich die in der DropDownList anzuzeigenden Einträge zur Laufzeit? Das angehängte Beispiel zeigt, dass sich bei Änderung (durch Click auf den Button) zwar die Titelzeile der ComboBox korrekt ändert, nicht aber der betreffende Eintrag in der DropDownList.

Noch verwirrender: Beim ERSTEN Click tut er es manchmal(!) doch. Bitte mehrmals probieren.

Und on top: Bei Auswahl des geänderten (falsch angezeigten) Eintrags wird dann doch der Eintrag MIT Änderung in die Titelzeile übernommen. Ist also nur ein Anzeige-Problem.

[Carsten Hölscher]

Edit: Also bei mir geht dsa korrekt unter aktuellem Delphi 11 und Windows 11
Carsten

[DenkDirNix]

Zitat von Carsten Hölscher:

ComboBox1.Items[i]:='neuer Text'; um den i. Eintrag zu ändern

Dies scheint es nicht zu tun wie man sich das denkt, siehe angehängtes Testprojekt.
Und auch der oben angehängte Screenshot zeigt doch die eigentlich per Definition ausgeschlossene Inkonsistenz zwischen DropDownList und Titelzeile der ComboBox.

[Carsten Hölscher]

Vielleicht liegt es an Delphi 11?


Carsten

[DenkDirNix]

Ich kann mir schwer vorstellen, dass Versionen vor Delphi 11 solch ein gravierendes und offensichtliches Problem haben. Deshalb suche ich den Fehler noch in meinem Code. Jedenfalls solange hier niemand das Problem (beschrieben in Beitrag #8) mit Version 10.4 nachvollziehen kann.

Hier nochmal die ausführliche Beschreibung (Source ist auch in Beitrag #8 gepostet):

Eine FMX-ComboBox ist mit drei Einträgen "00" , "11" , "22" gefüllt. Bei Click auf den Button wird Eintrag 1 (also die "11") geändert indem die Stringlänge angehängt wird. Jetzt enthält die Titelzeile der ComboBox korrekt "112". Wenn man die DropDownListe aufklappt steht dort aber noch "11"!

Achtung: Häufig tritt dieser Fehler beim ersten Mal nicht auf sondern erst ab dem zweiten Click auf den Button. Dann also ComboBoxText "1123" und DropDownList-Item1 "112" (wie im Screenshot in Beitrag #8 gezeigt).

Kann das jemand nachvollziehen?
Habe ich in der ComboBox irgendeine Eigenschaft falsch gesetzt?

Anmerkung: In einem VCL-Projekt mit ComboBox-Style=csDropDownList (was der FMX-ComboBox wohl am nächsten kommt) tritt der Fehler nicht auf.

[himitsu]

Es gibt ja mehrere Varianten zum Füllen:
* direkt beim Erstellen/Laden der Form und dann unverändert
* irgendwann, aber nie während, bzw. kurz bevor aufgepoppt wird
* im OnClick, bzw. OnDropDown
* während schon offen ist

Erstmal zur VCL:
* TComboBox kein Problem
* TComboBoxEx geht garnicht, sobald ich einmal Items.Clear hatte (im Debugger kommt sogar eine Exception)

* erstaunlich, gab es kein Clear und es gab noch nie Items (leer erstellt), dann geht bei Beiden das Dropdown mit einer Leerzeile auf
* im FMX geht das DropDown nicht auf, wenn es nichts gibt (hätte ich von Windows auch fast erwartet)

Delphi-Quellcode:

// ComboBox1.OnDropDown + ComboBoxEx1.OnDropDown 
procedure TForm5.ComboBox1DropDown(Sender: TObject);
  ComboBox1.Items.Clear;
  ComboBoxEx1.Items.Clear;
  Timer1.Tag := 10;
  Timer1.Enabled := True;
  //Timer1Timer(nil);  // egal ob sofort auf, also erstmal ohne einen Eintrag, oder ob nicht leer ... kein Unterschied
end;

// Timer1.OnTimer mit Timer1.Enabled=False
procedure TForm5.Timer1Timer(Sender: TObject);
begin
  //ComboBox1.Items.Add(Timer1.Tag.ToString);
  //ComboBoxEx1.Items.Add(Timer1.Tag.ToString);
  SendTextMessage(ComboBox1.Handle, CB_ADDSTRING, 0, Timer1.Tag.ToString);
  SendTextMessage(ComboBoxEx1.Handle, CB_ADDSTRING, 0, Timer1.Tag.ToString);
  Timer1.Tag := Timer1.Tag - 1;
  if Timer1.Tag = 0 then
    Timer1.Enabled := False;
end;

// ComboBox1.OnCloseUp + ComboBoxEx1.OnSelect 
procedure TForm5.ComboBox1CloseUp(Sender: TObject);
begin
  Timer1.Enabled := False;
  ComboBox1.Items.Clear;
  ComboBoxEx1.Items.Clear;
end;

Beim FMX mit TComboBox oder TComboEdit
* beim TComboEdit funktioniert auch garnichts
* die TComboBox geht nur auf, wenn vor OnPopup Einträge vorhanden waren
* * und es ist, kranker Weise, auch garnicht möglich im OnDropDown die Items zu ändern > es werden die alten Items angezeigt



Fazit:
* vorher DummyItems drin
* bei FMX immer vorher füllen, da das OnDropDown absolut nutzloser Schrott ist

[DenkDirNix]

Zitat von himitsu:

* * und es ist, kranker Weise, auch garnicht möglich im OnDropDown die Items zu ändern > es werden die alten Items angezeigt

Danke @himitsu. Das gilt nicht nur für Änderungen innerhalb des OnDropDown-Events!

Es wäre vielleicht am einfachsten wenn wir anhand meines Beispiel-Projektes aus Beitrag#8 diskutieren könnten. Einfach mal herunterladen, erzeugen und den Button clicken. Ich glaube wir haben das Mißverständnis, dass ich mit "Button" von der TButton-Komponente in meinem Beispiel spreche und Du von der DropDown-Schaltfläche an der ComboBox.

[Klaus01]

.. sieht doch eigentlich ok aus.

Delphi 11 - Windows 10 21H2

Bei zweimaligem betätigen des Buttons steht dort 1123

a) Item[1] 11
b) item{1] 112 - 11 plus Länge von '11'
c) Item[1] 1123 112 plus Länge von '112'

Grüße
Klaus