WMQueryEndSession nie działa kiedy aplikacja jest procesem w tle.

Question

Dzień dobry.

Pisze program który działa w tle. Ma on zapisywać pewne informację w momęcie zamykania wystemu windows. Program zapisuję wszyskie pliki poprawie, ale tylko wtedy gdy okno jest wyświetlane na ekranie. Kiedy aplikacja działa w tle poprostu się wyłącza nie zapisując niczego. Co musze poprawić aby aplikacja poprawnie zapisywała dane tagrze kiedy działa w tle?

Mam natepujacy kod: (*.cpp)

void __fastcall TForm1::WMQueryEndSession(TWMQueryEndSession & Message)
{

     //Tutaj mam linie kodu które zapisuja dane do plików.

Message.Result=1;
}

(*.h)

protected:
        void __fastcall WMQueryEndSession (TWMQueryEndSession& Message);
public:
        BEGIN_MESSAGE_MAP
        MESSAGE_HANDLER(WM_QUERYENDSESSION, TWMQueryEndSession, WMQueryEndSession);
        END_MESSAGE_MAP(TForm)

Z góry dziękuje i prosze o proste wytłumaczenia poniewarz dopiero zaczynam się uczyć.

Answer 1

Spróbuj subclassować to okno funkcją SetWindowSubclass - czyli podmieniasz funkcję obsługi okna swoją wersją, w której przechwytujesz i obsługujesz WM_QUERYENDSESSION . Resztę komunikatów przekazujesz do oryginalnej procedury.

Comments

Przepraszam, że znowy zabieram czas, ale dopiero się ucze programować i zabardzo nie wiem jak to zrobić. Szukałem informacji i powstał taki bubel, co źlę robię?

class TForm1 : public TForm
{
__published:	// IDE-managed Components
        TLabel *Teraz;
        (...)
        TTrayIcon *TrayIcon1;
        TApplicationEvents *ApplicationEvents1;
        AnsiString __fastcall napisz(int cz);
        AnsiString __fastcall napiszG(int cz);
        void __fastcall CzasTimer(TObject *Sender);
        void __fastcall TrayIcon1Click(TObject *Sender);
        void __fastcall FormClose(TObject *Sender, TCloseAction &Action);
        void __fastcall FormCreate(TObject *Sender);
public:
        TForm1Subclass(HWND hWndButton)
        {
        SetWindowSubclass(hWndTForm1, MyTForm1SubclassProc, 1, (DWORD_PTR) this);
        }
        ~TForm1Suclass()
        {
        RemoveWindowSubclass(hWndTForm1, MyTForm1SubclassProc, 1, (DWORD_PTR) this);
        }
protected:
        static LRESULT CALLBACK MyTForm1SubclassProc(
        HWND hWnd, UINT Msg, WPARAM w, LPARAM l, DWORD_PTR RefData)
        {
        TForm1Subclass* o = reinterpret_cast<TForm1Subclass*>(RefData);

        if (Msg == WM_QUERYENDSESSION)
        {
                //Liniki kodu odpowiedzialne za zapis
                return TRUE;
        }
        return DefSubclassProc(hWnd, Msg, w, l);
        }
        void __fastcall WMQueryEndSession (TWMQueryEndSession& Message);
public:
        BEGIN_MESSAGE_MAP
        MESSAGE_HANDLER(WM_QUERYENDSESSION, TWMQueryEndSession, WMQueryEndSession);
        END_MESSAGE_MAP(TForm)



private:	// User declarations
public:		// User declarations
        __fastcall TForm1(TComponent* Owner);
};

Pewnie jest to głupie pytanie i bzdury popisałem ale ciągle mi wyskakuje: Call to undefined function 'SetWindowSubclass',pomimo iż dodałem biblioteki

#include <windows.h>
#include <Commctrl.h>

 

---

Tak to widzę:

class TForm1 : public TForm {

	/* ... */

public:
    ~TForm1()
    {
    }

protected:
    virtual void __fastcall CreateWnd()
    {
    	TForm::CreateWnd();
        SetWindowSubclass(Handle, MyTForm1SubclassProc, 1, (DWORD_PTR) this);
    }

private: 
    static LRESULT CALLBACK MyTForm1SubclassProc(HWND hWnd, UINT Msg, WPARAM w, LPARAM l, UINT_PTR id, DWORD_PTR RefData)
    {

        if (Msg == WM_QUERYENDSESSION) {
		    TForm1* o = reinterpret_cast<TForm1*>(RefData);
            o->OnQueryEndSession(w, l);
            return TRUE;
        }
        
        return DefSubclassProc(hWnd, Msg, w, l);
    }

    void __fastcall OnQueryEndSession(WPARAM w, LPARAM l) 
    {
    	//Linijki kodu odpowiedzialne za zapis
    }
    
public: 
    __fastcall TForm1(TComponent* Owner);
};

ciągle mi wyskakuje: Call to undefined function 'SetWindowSubclass'

Musisz ustawić w ustawieniach projektu wersję Windowsa, dla jakiej kompilujesz projekt (minimum WinXP).

Może to wystarczy:

#define WINVER 0x0601 
#define _WIN32_WINNT 0x0601
#include <windows.h>
#include <commctrl.h>

Jeśli nie, wtedy opcje projektu.

---

Wyskakuje błąd na tej linijce

    ~TForm1Suclass()

pomyslałem, że jest to literówka ale na

    ~TForm1Subclass()

też wyskakuje bląd: "Type name expected"

zadeklarowałem

#define WINVER 0x0601 
#define _WIN32_WINNT 0x0601

ale nie umiem zmienić opcji projektu. Czy ten bład wynika z tego, że niezmieniłem opcji projektu?

---

Wyskakuje błąd na tej linijce

Powieliłem twój błąd. Tam oczywiście powinno być ~TForm1() {} (choć pewnie destruktor już został wygenerowany przez kreatora).

ale nie umiem zmienić opcji projektu.

Pisałem "albo, albo"

Czy ten bład wynika z tego, że niezmieniłem opcji projektu?

Jeśli "ten" błąd to "Type name expected", to nie, nie dlatego.

---

Na te linijce 

SetWindowSubclass(Handle, MyTForm1SubclassProc, 1, (DWORD_PTR) this)

wyskakują błędy:

"Cannot convert 'long (__stdcall *)(void *,unsigned int,unsigned int,long,unsigned long)' to 'long (__stdcall *)(void *,unsigned int,unsigned int,long,unsigned int,unsigned long)' "

" Type mismatch in parameter 'pfnSubclass' (wanted 'long (__stdcall *)(void *,unsigned int,unsigned int,long,unsigned int,unsigned long)', got 'long (__stdcall *)(void *,unsigned int,unsigned int,long,unsigned long)') "

nie wiem co one oznaczają

 

---

Wystarczy przeczytać treść, by wiedzieć, co jest nie tak. Błędem jest niewłaściwa ilość parametrów funkcji MyTForm1SubclassProc (porównaj z SUBCLASSPROC).

Popraw:

static LRESULT CALLBACK MyTForm1SubclassProc(HWND hWnd, UINT Msg, WPARAM w, LPARAM l, UINT_PTR id, DWORD_PTR RefData)
{
    /* ... */
}

 

---

Bardzo dziękuje ze pomoc, miłego wieczoru (lub dnia) :)

---

No ale subclassing rozwiązał problem, czy nie?

---

Niestety nie, pojawił się kolejny błąd, a nie chciałem zabierać więcej Pana\ni czasu.

Błąd wyskakiwał w linijce 

o->OnQueryEndSession();

Poniewarz było za mało parametrów funkcji wiec napisałem tak

o->OnQueryEndSession(w,l);

Poniewarz do funkcji trzeba wysłać WPARAM i LPARAM.

Teraz wyskakuje taki błąd:

[Linker Error] Unresolved external '__fastcall TForm1::OnQueryEndSession(unsigned int, long)' referenced from ADRES_APLIKACJI\UNIT1.OBJ

Wiem (tak mi sie wydaje), że dotyczy on niepoprawnych typów zmienych, które wysyłam do tej funkcji. Tylko nie wiem co mam do niej wysłać.

---

a nie chciałem zabierać więcej Pana\ni czasu.

Po to jest to forum, by zadawać takie pytania.

Poniewarz do funkcji trzeba wysłać WPARAM i LPARAM

Tak, mój błąd. Poprawione.

Wiem (tak mi sie wydaje), że dotyczy on niepoprawnych typów zmienych

To błąd konsolidatora, więc nie o typy chodzi a o brak implementacji TForm1::OnQueryEndSession. Co jest dziwne, bo implementacja jest... chyba że coś pozmieniałeś lub masz inaczej niż w tym przykładowym kodzie.

Zgaduję, że przeniosłeś implementację do pliku źródłowego, tylko zapomniałeś dodać TForm1:: do nazwy.

---

Aplikacja działa, bardzo dziekuje, problem rozwiązany. Faktycznie zapomniałem o TForm1::. Jeszcze raz bardzo dziekuje za pomoc.