Autor Téma: TVirtualStringTree - sám si pridá uzol  (Přečteno 471 krát)

Offline Stanislav Hruška

  • Padawan
  • ******
  • Příspěvků: 7183
  • Karma: 44
    • Verze Delphi: W10 + D11.1
TVirtualStringTree - sám si pridá uzol
« kdy: 01-09-2021, 14:26:27 »
Nateraz v jedinom prípade sa mi VST správa veľmi divne. Pri Table.Post si sám pridá uzol. Pri vymazaní uzla vymaže dva uzly. To sa deje "náhodne". Neštudoval som to. Uzol sa pridáva v samostatnej jednotke. Pridá sa 2x.
Niekedy sa poškodí TFDTable. Ale takýto prípad by predsa nemal dopad na VST

Čo som urobil:
  • Vymenil som VST
  • Dokonale som skontroloval, či niekde uzol nepridávam. NIE
  • Zablokoval som funkciu na pridanie uzla. Aj tak sa pridá
Má niekto nejaký nápad?
Veľmi zriedkavo sa mi stane, že si musím celý formulár vytvoriť znova. Predpokladám, že to bude tento prípad. Je jednoduchý, takže to pôjde rýchlo. Ale aj tak sa pýtam, či už mal niekto podobný prípad.
Win11 64b, Delphi 11.1, FireBird 4.01
Expert na kladenie nejasne formulovaných otázok.

Offline Stanislav Hruška

  • Padawan
  • ******
  • Příspěvků: 7183
  • Karma: 44
    • Verze Delphi: W10 + D11.1
Re:TVirtualStringTree - sám si pridá uzol
« Odpověď #1 kdy: 01-09-2021, 15:17:03 »
Teraz som celkom vedľa. Nepomohlo ani znovu vytvorenie subformulára. Už jedine jednotka patriaca k nemu.
Pre ilustráciu pridávam obrázky
  • Načítanie formulára
  • Pridanie záznamu do tabuľky. Bez pridania uzla vo VST
  • Výmaz uzla
« Poslední změna: 01-09-2021, 15:24:39 od Stanislav Hruška »
Win11 64b, Delphi 11.1, FireBird 4.01
Expert na kladenie nejasne formulovaných otázok.

Offline Stanislav Hruška

  • Padawan
  • ******
  • Příspěvků: 7183
  • Karma: 44
    • Verze Delphi: W10 + D11.1
Re:TVirtualStringTree - sám si pridá uzol
« Odpověď #2 kdy: 01-09-2021, 16:46:35 »
Skopíroval som obsah súvisiacej jednotky do PSPad-u a uložil ako pas. Týmto súborom som nahradil súbor v projekte. Nič to nezmenilo.
Tým som vyčerpal všetky možnosti.
EurekaLog ani FixInsight nič nehlásia.
.
Musím to nejako vyriešiť a ja netuším ako.
Vítam každú, aj na pohľad nezmyselnú radu. Je to najjednoduchší formulár aký môže byť. Pracuje s DB tabuľkou ktorá má len dve polia. Primárny kľúč a názov. Celá práca je v podstate unifikovaná. Tým myslím, že všetky formuláre používajú rovnaké postupy a triedy.
.
Jednoducho mi toto správanie po
  • overení kódu a
  • znovu vybudovaní všetkého čo sa len dalo,
nedáva žiaden zmysel.
 >:( >:( >:(   :'( :'( :'(   ??? ??? ???
Win11 64b, Delphi 11.1, FireBird 4.01
Expert na kladenie nejasne formulovaných otázok.

Offline Stanislav Hruška

  • Padawan
  • ******
  • Příspěvků: 7183
  • Karma: 44
    • Verze Delphi: W10 + D11.1
Re:TVirtualStringTree - sám si pridá uzol
« Odpověď #3 kdy: 01-09-2021, 17:46:06 »
Dúfam, že len dočasne, som to obišiel znovu naplnením stromu. Pri behu programu to nie je vidieť. Teraz sú tabuľke tri záznamy. Neviem si predstaviť, žeby tam bolo 10 záznamov.
Win11 64b, Delphi 11.1, FireBird 4.01
Expert na kladenie nejasne formulovaných otázok.

Offline Stanislav Hruška

  • Padawan
  • ******
  • Příspěvků: 7183
  • Karma: 44
    • Verze Delphi: W10 + D11.1
Re:TVirtualStringTree - sám si pridá uzol
« Odpověď #4 kdy: 01-09-2021, 17:49:58 »
Už som to našiel. Mám funkciu ApplyChanges a tam som to spúšťal :-X :-X :-X
Win11 64b, Delphi 11.1, FireBird 4.01
Expert na kladenie nejasne formulovaných otázok.