ComboBox.ItemIndex := Cosi; Nie je zobrazený text

[Stanislav Hruška]

Týka sa to len jedného formulára a všetkých druhov ComboBox (štandardné i TMS) na ňom.
Overil som si, že ItemIndex > -1 a napriek tomu Text pri zobrazení formulára nie je vykreslený.
Potom už nie je problém.
Opäť nerozumiem a netuším kde hľadať chybu.

[pf1957]

Potom už nie je problém.
Opäť nerozumiem a netuším kde hľadať chybu.

To vypada na klasicky problem inicializace event driven prostredi tj. dochazi k asynchronnimu spousteni nekterych udalosti v nevhodnout dobu s ohledem na stav nekterych objektu.

Snazit se to poradi zmenit muze sice problem odstranit, ale pozdeji pri nejakem zasahu do kodu se zase muze nekde objevit ev. u neceho jineho.

My to resime duslednym oddelenim inicializace a normalniho provozu tj.
- po konstrukci se formular nachazi ve stavu inicializace
- ve stavu inicializace neobsluhujeme zadne udalosti
- po dokonceni inicializace provedeme aktualizaci vsech stavu vsech widgetu
- zrusime stav inicializace a zahajime normalni provoz

Mame na to predka spolecneho vsem formularum, s jehoz pomoci generujeme asynchronni udalosti odvozene od prekryte DoShow

[Stanislav Hruška]

Podľa všetkého máš pravdu. Mal som problém s vykresľovaním iných vecí. Zmenil som poradie funkcií. Na začiatok v FormShow som dal funkciu, ktorá volá udalosti komponentov. Ostali mi visieť ComboBoxy-y a dva RadioGroup-y.
Len ten popis je na mňa priveľa. Hlavne sa nechytám pri tej inicializácii.

[pf1957]

Len ten popis je na mňa priveľa. Hlavne sa nechytám pri tej inicializácii.

Tak jeste jednou v kostce:

Nekde u prapredka formulare si definujes protected member, napr.

Kód: Delphi [Vybrat]

1. FInitDone: boolean;

a ten je po konstrukci formu false.

Kazdy event handler zahajis testem

Kód: Delphi [Vybrat]

1. if not FInitDone then
2.   exit;

Pak si vyrobis nejakou asynchronni event po zobrazeni formulare, provedes aktualizaci stavu vsech widgetu a nastavis FInitDone na true.

[Stanislav Hruška]

Je vo poriadku, že mi FormShow zbehne 2 x? Obsah udalosti sa spustí len raz.

Pak si vyrobis nejakou asynchronni event po zobrazeni formulare, provedes aktualizaci stavu vsech widgetu a nastavis FInitDone na true.

Tu sa môžem akurát  . Skúsim si o tom niečo nájsť.

[Stanislav Hruška]

Prikladám taký zaujímavý obrázok. Ja mám všade použité TMS komponenty. Predpokladám, že to súvisí s nimi.
Mám funkciu na nastavenie TMSStyler-s. Tá sa spúšťa pri spustení aplikácie - t.j. Styter-s sú nastavené.

• Ak ju nespustím vo FormCreate, tak mám taký podivný výsledok. Hlavný PageControl má nastavenie nevie podľa čoho. Typujem si na Metro. Všetky ostatné sú v poriadku
• Pri jej spustení (znovu nastavenie Styler-s na tie isté hodnoty) to je v poriadku

Uvidím čo sa mi podarí urobiť. Skúsim zistiť dôvod, prečo sa to deje na tomto formulári. Predpokladám, že dôvodom je skutočnosť, že sa na formulári dá nastaviť/zmeniť téma a ja ju ihneď aplikujem.

[pf1957]

Je vo poriadku, že mi FormShow zbehne 2 x? Obsah udalosti sa spustí len raz.

Tomu nerozumim. FormShow je handler OnShow udalosti? Tak kdyz se spusti 2x, jak to, ze se "obsah udalosti" spusti jen jednou?

[Stanislav Hruška]

FormShow je handler OnShow udalosti?

Áno.

Tak kdyz se spusti 2x, jak to, ze se "obsah udalosti" spusti jen jednou?

Mám tam if..
V OnShow to bolo v rámci hľadania chýb. Ale už som to prehodil do OnCreate, lebo výsledok je ten istý.

[Stanislav Hruška]

Chyba bola nakoniec niekde úplne inde. Miešal som dokopy Color a ItemIndex.
Bez nakopnutia tu by som to ťažko našiel.