Come faccio? - parte XVI

Salve a tutti! Di cosa ci occuperemo questo mese? Continueremo a migliorare la prima versione della calcolatrice e aggiungeremo qualche funzione. Le aggiunte sono abbastanza piccole, ma ne discuteremo piuttosto estesamente. Penso che in questo articolo la teoria sarà superiore alla pratica.

OK, iniziamo con le migliorie. Ho ricevuto un messaggio da Cindy, che mi ha fatto notare un modo di semplificare il mio codice. Nello scorso articolo ho presentato un modo per togliere gli zeri finali e il punto dal risultato, usando questo codice:

   sprintf(achOutput, "%f", flLeftMember);



   while (achOutput[strlen(achOutput)-1] == '0')   // togli gli zeri

           achOutput[strlen(achOutput)-1] = 0;

   if (achOutput[strlen(achOutput)-1] == '.')      // togli il punto

           achOutput[strlen(achOutput)-1] = 0;

    sprintf(achOutput, "%g", flLeftMember);

Mi sono ritrovato a usare sempre più la calcolatrice per calcoli semplici. Usandola, ho trovato alcune cose fastidiose. Indovinato -- ce ne occuperemo, sperando di impararne qualcosa.

Una delle cose che non mi piacciono è di non poter usare il backspace se inserisco una cifra sbagliata. Come in una calcolatrice normale, devo premere il tasto di cancellazione. Questo però cancella tutto il numero, non solo la cifra sbagliata -- questo è il lato negativo di aver usato i tasti 'mnemonici' dei dialog. L'entryfield è di sola lettura, quindi non può gestire il backspace al posto nostro. Questo significa che dovremo trovare il modo di gestire l'evento della pressione del tasto backspace.

Prima di tutto, come facciamo a sapere che è stato premuto un tasto, e in particolare il backspace? Ovviamente OS/2 ha un messaggio apposito: WM_CHAR. Questo messaggio viene inviato alla finestra attiva ogni volta che l'utente preme un tasto. I parametri del messaggio WM_CHAR contengono le informazioni sul carattere premuto, ma qui le cose cominciano a diventare complesse. I parametri sono impostati come segue:

mp1 31------24 L'ultimo byte (bit 31-24) contiene lo scan code

    23------16 Questo byte contiene il conteggio di ripetizione

    15------00 Il primo short contiene dei flag (ne parliamo dopo)



mp2 Lo short superiore contiene il codice di tasto virtuale (virtual key)

    Lo short inferiore contiene il codice carattere (16 bit)

Il codice di tasto virtuale è contenuto nello short superiore di mp2. I tasti virtuali sono ad esempio i tasti funzione, il delete, il backspace, ecc. -- in pratica, tutti i tasti non caratteri, esclusi <ALT>, <SHIFT> e <CTRL>. Torneremo a parlarne tra poco, visto che il backspace è tra questi.

L'ultimo codice è il codice carattere contenuto nello short inferiore di mp2. Contiene il codice ASCII del tasto premuto, per cui sarà influenzato da <SHIFT> e <CTRL> (anche se <CTRL> è un caso particolare).

Ci serve il backspace. Come sappiamo se è premuto? Ho detto che è un tasto virtuale. Ci sono vari modi per leggere il campo apposito dai parametri di WM_CHAR. Potremmo separarli a mano, ma c'è un modo più semplice. L'API di OS/2 contiene una macro per gestire il messaggio WM_CHAR. Se per sempio voglio il flag fs da mp1, posso scrivere:

    CHARMSG(&msg)->fs

    CHARMSG(&msg)->fs & KC_VIRTUALKEY

    if (CHARMSG(&msg)->vkey == VK_BACKSPACE)

Ora che sappiamo riconoscere il backspace, scriviamo il gestore dell'evento. Vogliamo eliminare l'ultimo carattere della stringa contenuta nell'entryfield. Per prima cosa dobbiamo quindi otttenere tale stringa. Il modo più semplice di procedere è mettere un carattere NULL nel penultimo posto della stringa. Questo accorcerà la stringa di un carattere, poiché le stringhe in C sono terminate da NULL. Per inserirlo, dobbiamo conoscere la lunghezza della stringa. Possiamo agire sulla stringa solo se ha una lunghezza maggiore di zero, quindi anche per questo ci serve la lunghezza. Otteniamo il codice seguente:

//-----------------------------------------------------------------------

// Gestisce il tasto backspace.

//-----------------------------------------------------------------------

case WM_CHAR:

    {

    if (CHARMSG(&msg)->vkey == VK_BACKSPACE)

        {

        char achValue[32];

        long ValueLength;



        WinQueryDlgItemText(hwndDlg , ENTRYFIELD1, 32, achValue);

        ValueLength = strlen(achValue);



        if (ValueLength)

            {

            achValue[ValueLength-1] = 0;

            WinSetDlgItemText(hwndDlg, ENTRYFIELD1, achValue);

            }

        }

    }

break;

Prima l'azzeramento. Vogliamo una voce di menu che selezionata elimini tutte le linee della lista. Dobbiamo prima espandere il menu. Ho aggiunto un menu 'edit' e inoltre un box di 'about' associato ad una voce di menu. Dobbiamo quindi gestire questi nuovi eventi.

Come svuotiamo un listbox? In casi come questi, di solito cerco tra i vari messaggo. È un'azione così comune che deve esserci un messaggio apposito. E infatti c'è -- LM_DELETEALL. Quindi ci basta inviare un messaggio:

//-------------------------------------------------------------

// Azzera il 'rullino'

//-------------------------------------------------------------

case IDM_CLEARTALLY:

    {

    WinSendDlgItemMsg(hwndDlg, LISTBOX1, LM_DELETEALL, 0L, 0L);

    }

return(0);

Qualche articolo fa ho parlato del messaggio WM_CONTROL. Questo messaggio notifica eventi che avvengono in un controllo. Il doppio click è un evento tipico per un controllo, in questo caso un listbox. Scorrendo le notifiche per il listbox, troveremo che quella che ci serve è LN_ENTER. Poiché c'è un solo listbox nella nostra applicazione, possiamo reagire direttamente alla notifica LN_ENTER. Visto che è l'unica notifica che esaminiamo gestendo il messaggio WM_CONTROL ci basta un if:

    if (SHORT2FROMMP(mp1) == LN_ENTER)

hwndLbox  = WinWindowFromID(hwndDlg, LISTBOX1);

lSelected = WinQueryLboxSelectedItem(hwndLbox);

WinQueryLboxItemText(hwndLbox, lSelected, achListValue, 32);

case WM_CONTROL:

    {

    if (SHORT2FROMMP(mp1) == LN_ENTER)

        {

        //-------------------------------------------------------------

        // Recupera linea selezionata

        //-------------------------------------------------------------

        char achListValue[32];

        HWND hwndLbox;

        long lSelected;



        hwndLbox  = WinWindowFromID(hwndDlg, LISTBOX1);

        lSelected = WinQueryLboxSelectedItem(hwndLbox);

        WinQueryLboxItemText(hwndLbox, lSelected, achListValue, 32);

        //-------------------------------------------------------------

        // Controlla che sia un numero

        //-------------------------------------------------------------

        if (strlen(achListValue) !=1 ||

            (achListValue[0] != '=' && achListValue[0] != '-' &&

             achListValue[0] != '+' && achListValue[0] != '*' &&

             achListValue[0] != '/'))

            //--------------------------------------------------------

            // Copia il contenuto

            //--------------------------------------------------------

            WinSetDlgItemText(hwndDlg, ENTRYFIELD1, achListValue);

        }

    }

break;

Al prossio mese.

Sorgente per l'esempio di questo mese: sample16.zip (24K)