🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Thread View: pl.comp.lang.delphi
3 messages
3 total messages Started by Miroslaw Rogula Mon, 11 Apr 2022 12:00
Pewnie podstawy Delphi
#294656
Author: Miroslaw Rogula
Date: Mon, 11 Apr 2022 12:00
9 lines
582 bytes
Zastanawiam się w jaki sposób można dowiedzieć się w procedurze OnExit  jaki inny obiekt spowodował wyjście z danego obiektu. Np jesteśmy w edit1 i po naciśnięciu button1 chcę wiedzieć w procedurze editExit(Sender : TSender)  że był naciśnięty button1. Myślałem kiedyś że to Sender mi powie co zostało naciśnięte - ale okazało się że nie Nie do tego służy. Czy ktoś mnie oświeci ?  
Pozdrawiam
Mirosław Rogula
Re: Pewnie podstawy Delphi
#294657
Author: MKi
Date: Tue, 12 Apr 2022 09:29
23 lines
1311 bytes
W dniu 2022-04-11 o 21:00, Miroslaw Rogula pisze:
> Zastanawiam się w jaki sposób można dowiedzieć się w procedurze OnExit  jaki inny obiekt spowodował wyjście z danego obiektu. Np jesteśmy w edit1 i po naciśnięciu button1 chcę wiedzieć w procedurze editExit(Sender : TSender)  że był naciśnięty button1. Myślałem kiedyś że to Sender mi powie co zostało naciśnięte - ale okazało się że nie Nie do tego służy. Czy ktoś mnie oświeci ?
> Pozdrawiam
> Mirosław Rogula
>
Wpierw wypadałoby zdefiniować "obiekt spowodował wyjście
z danego obiektu". Domyślam się, że chodzi Cio kontrolkę,
w którą użytkownik kliknie myszą lub kontrolkę, która dostaje
fokus po naciśnięciu jakiegoś klawisza (TAB, różne skróty itd).

Jak dla mnie, w w OnExit program jeszcze nie wie, jaka jest
przyczyna wyjścia.
W Twoim przykładzie będzie wywołane wpierw OnExit dla Edit1,
a później OnEnter w Button1 i tam należy oprogramować
zdarzenie, w którym jest potrzebna przyczyna wyjścia z Edit1.
W ogólności tak zrobić dla wszystkich możliwych przyczyn
(na przykład naciśnięcia F10 w celu wejścia do głównego menu).

Czyli wyobrażam sobie w OnExit dla Edit1 zapamiętać, skąd
wychodzimy a w OnEnter wszystkich pozostałych kontrolek
to obsłużyć.

Pozdrowienia,
MKi
Re: Pewnie podstawy Delphi
#294659
Author: Miroslaw Rogula
Date: Wed, 13 Apr 2022 01:41
1 lines
97 bytes
Dzięki za inspirację. Przydała się do poprawy działania programu :) 
Thread Navigation

This is a paginated view of messages in the thread with full content displayed inline.

Messages are displayed in chronological order, with the original post highlighted in green.

Use pagination controls to navigate through all messages in large threads.

Back to All Threads