Autor Téma: Ako zistím, že ťahám za okraj panela  (Přečteno 139 krát)

Offline Stanislav Hruška

  • Padawan
  • ******
  • Příspěvků: 5140
  • Karma: 41
    • Verze Delphi: W10 + Delphi 10.4 professional
Ako zistím, že ťahám za okraj panela
« kdy: 31-01-2020, 21:44:10 »
V kóde som použil
Kód: Delphi [Vybrat]
  1.   if Self.ActiveControl = advtrckbrDays then
Len som akosi zabudol, že panel nemôže byť ako aktívny. Nemá fokus.
Nepodstatné informácie:
  • zmenou veľkosti panela posúvam bežec advtrckbrDays
  • advtrckbrDays mení veľkosť panelov
  • mám tam ešte dva komponenty, ktoré môžu mať fokus
Graficky mi všetko funguje, ale okrem iného potrebujem aktualizovať dátumy. Mám to v podstate vyriešené. Až na tú podmienku.
Prikladám obrázok. Ťahám za okraj z jedného panela na mieste ich styku.
Tu končia nepodstatné informácie
.
Jednou z možností čo mi prišla na um je pri zmene veľkosti panela ťahaním za okraj nastaviť fokus mimo advtrckbrDays. Veľmi sa mi to nepáči.
Je nejaká iná možnosť?
W10 64b, Delphi 10.4, FireBird 3.05
Expert na kladenie nejasne formulovaných otázok.