Italian MouseUp

Discussion in 'Italian Forum' started by micro, May 25, 2008.

  1. micro

    micro Well-Known Member Licensed User

    Salve ragazzi,
    ho installato la versione trial e inizio a fare le mie prime prove anche se effttivamente non sò se ii tutto sarà trasportabile sul device con Windows CE 5.0 vedi thread http://www.basic4ppc.com/forum/italian-forum/2357-windows-ce-per-arm.html
    Ho visto che per l'oggetto imagebutton così come per l'oggetto button (e forse anche per altri) non è possibile scatenare l'evento MouseUp quando il mouse è sull'oggetto.
    Pensavo di raggirare l'ostacolo con la funzione AddEvent ma probabilmente non è così :)) se era così semplice ci sarebbero già stati)
    Ho fatto:
    Code:
    AddEvent("SerButton""MouseUp""SerButton_MouseUp")
    e poi inserita la Sub ma ..... nulla.
    Riesco a raggirare l'ostacolo (non è una cosa necessaria ma l'aspetto grafico per me conta molto) con l'evento MouseUp della Form tirandomi fuori le coordinate?
    In pratica ho caricato delle immagini in una immaginelist e a seconda se ci clicco sopra e rilascio il pulsante, le immagini del pulsante cambiano e vorrei che lo facesse anche se ci sono sopra.
    Poi ci sarebbe da raggirare l'ostacolo anche dell'evento MouseLeave (che qui non esiste) ed è per questo che chiedo a Voi almeno se avete la soluzione il tempo lo dedico a qualcos'altro.

    Grazie
     
  2. giannimaione

    giannimaione Well-Known Member Licensed User

    Last edited: May 25, 2008
  3. giannimaione

    giannimaione Well-Known Member Licensed User

  4. micro

    micro Well-Known Member Licensed User

    Grazie giannimaione per la disponibilità ma non ho le credenziali e i privilegi :( per scaricare la dll.
    Se Erel me ne dà la possibilità potrò provarla.

    Di nuovo grazie e a presto.
     
  5. giannimaione

    giannimaione Well-Known Member Licensed User

    dai Micro, con poco meno di 70 euro e con tre anni di aggiornamenti.
    accattatill

    cosa vuoi di piu' dalla vita... un lucano! :)
     
  6. micro

    micro Well-Known Member Licensed User

    ma certo giannimaione ehehehehe :D, domani lo farò era solo che volevo provare prima sul device per essere sicuri di non avere problemi di compatibilità.
    Inizia a bere che ti raggiungo tra poco.... :sign0060:
     
  7. giannimaione

    giannimaione Well-Known Member Licensed User

    sono cattivo...

    raggiungermi dove? a Napoli ? :sign0060:
    mi fa piacere ; ;)
    in questo periodo puoi approffittare del magnifico souvenir che viene dato in omaggio a tutti
    i turisti; una bella busta di "monnezza" :mad:
     
  8. micro

    micro Well-Known Member Licensed User

    Allora...ho acquistato la versione enterprise.
    Ho referenziato la dzmagicEvent nel codice di prova ma quando mandavo il codice in esecuzione mi diceva che non riusciva a caricare la coredlll.dll
    Infatti stranamente con una ricerca files neanche la minima traccia della coredll.dll.
    L'ho prelevata dall'archivio che avevo e l'ho inserita nella dir di Basic4ppc, adesso l'errore è cambiato e sempre in concomitanza della seguente riga di codice:
    Code:
    events.Hook(512)
    Naturalmente events è il nome all'oggetto dzMagicEvent caricato.
    Allego gli errori.
    Sapete dirmi dovè l'incoveniente?

    Grazie
     
  9. Filippo

    Filippo Expert Licensed User

    Ciao micro,

    una sola domanda: sei sicuro die aver installato sul tuo ppc .NETCF 2.0 ?
    Senza .NETCF 2.0 la maggior parte delle DLL non funzionano.


    Ciao,
    Filippo
     
  10. micro

    micro Well-Known Member Licensed User

    certo filippo,
    anzi proprio adesso (cosa strana) ho scaricato l'esempio Test2 e tutto funziona, anche aggiungendo un'imagebutton con l'evento MouseMove (x.Hook(512)).
    Funziona tutto alla perfezione mentre nel mio codice di prova mi compaiono gli errori che ho riportato, eppure ci sono le stesse righe di codice.

    Mistero
     
  11. Filippo

    Filippo Expert Licensed User

    Se puoi caricare il codice sul Forum, forse ti posso dare una mano d'aiuto.
     
  12. micro

    micro Well-Known Member Licensed User

    Ok
    Code:
    Sub Globals
       
    'Declare the global variables here.
       
    End Sub

    Sub App_Start
       dzem.New1(
    "SerButton"true)
       dzem.Hook(
    512'<<<<<<<<quì mi dà errore!!
       FormStart.Show
       FormStart.Refresh
       Sleep(
    500)
       FormStart.ForeLayer = 
    true
       SerButton.Image = ImageList1.Item(
    0)
       FormStart.FDrawString (
    "Loading....."16,750,20,550,500,255,255,255)
       formstart.Refresh
       Carica_Settings
       Sleep(
    500)
       FormStart.FErase(
    750,20,550,500)
       FormStart.Refresh
       Sleep(
    500)
       FormMain.ForeLayer = 
    true
       FormMain.FDrawString (
    "Seriale"12,17,65,100,100,255,255,255)
       FormMain.Show
       FormMain.Refresh
       
    'Tab1.New1("FormMain", 100, 30, 400, 200)
       'Tab1.AddTabPage("Test_Seriale")
       'Tab1.AddTabPage("Test_Stampanti")
    End Sub


    Sub FormMain_Close
            dzem.UnHook(
    512)
            AppClose
    End Sub

    Sub Carica_Settings
    '..........
    End Sub

    Sub SerButton_ButtonDown
       SerButton.Image = ImageList1.Item(
    1)
    End Sub

    Sub SerButton_ButtonUp
       SerButton.Image = ImageList1.Item(
    0)
    End Sub

    Sub dzem_MagicEvent
    'Qui il codice non è completo ma mi serviva vedere solo se ci andavo quando scatenavo l'evento
       SerButton.Image = ImageList1.Item(2)
    End Sub
    Come vedi riporto le stesse chiamate che ci sono in Test2 ecc., solo che qui mi compaiono gli errori menzionati precedentemente.

    Ciao
     
  13. maXim

    maXim Active Member Licensed User

    Ciao micro,

    verifica questo:
     
  14. micro

    micro Well-Known Member Licensed User

    Ciao maxim ;)
    era proprio quello l'errore.
    Non mi sono soffermato sui componenti aggiunti perchè pensavo che quando sceglievo Both e cliccavo sulla dll automaticamente veniva caricata al posto giusto la dll device e desktop.
    .......mi sbagliavo.

    Grazie ancora.
     
Loading...
  1. This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
    By continuing to use this site, you are consenting to our use of cookies.
    Dismiss Notice