everything iS nOw!
Vuoi reagire a questo messaggio? Crea un account in pochi click o accedi per continuare.


Ogni Cosa, Dovunque!
 
IndiceUltime immaginiCercaRegistratiAccedi

 

 [AutoIt]Problema con Gui

Andare in basso 
2 partecipanti
AutoreMessaggio
Sadga
Moderatore
Moderatore
Sadga


Maschio Messaggi : 94

[AutoIt]Problema con Gui Empty
MessaggioTitolo: [AutoIt]Problema con Gui   [AutoIt]Problema con Gui Icon_minitime23/3/2011, 4:53 pm

Allora io avrei questo script

Codice:
#include <GDIPlus.au3>
#include <WinAPI.au3>
#include <WindowsConstants.au3>
#include <GuiConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>

Global Const $AC_SRC_ALPHA = 1
Global $hGUI, $titolo, $iSlider, $hImage, $i, $timer

main()

Func main()
   
$hGUI = GUICreate("", 250, 250, 1156, 10, -1, $WS_EX_LAYERED)


_GDIPlus_Startup()
$hImage = _GDIPlus_ImageLoadFromFile(@ScriptDir & "\riquadro.png")
SetBitMap($hGUI, $hImage, 0)
GUISetState(@SW_SHOWNORMAL)

$i=0

While $i<251
   SetBitMap($hGUI, $hImage, $i)
   Sleep(40)
   $i=$i+10
WEnd

GUIRegisterMsg($WM_NCHITTEST, "WM_NCHITTEST")

$timer=TimerInit()

While TimerDiff($timer)<3000
   sleep(50)
WEnd

$i=250

While $i>-1
   SetBitMap($hGUI, $hImage, $i)
   Sleep(40)
   $i=$i-10
WEnd


_GDIPlus_ImageDispose($hImage)
_GDIPlus_Shutdown()
GUIDelete($hGUI)

EndFunc


Func WM_NCHITTEST($hWnd, $iMsg, $iwParam, $ilParam)
   if ($hWnd = $hGUI) and ($iMsg = $WM_NCHITTEST) then Return $HTCAPTION
EndFunc


Func SetBitmap($hGUI, $hImage, $iOpacity)
   Local $hScrDC, $hMemDC, $hBitmap, $hOld, $pSize, $tSize, $pSource, $tSource, $pBlend, $tBlend
   $hScrDC  = _WinAPI_GetDC(0)
   $hMemDC  = _WinAPI_CreateCompatibleDC($hScrDC)
   $hBitmap = _GDIPlus_BitmapCreateHBITMAPFromBitmap($hImage)
   $hOld    = _WinAPI_SelectObject($hMemDC, $hBitmap)
   $tSize  = DllStructCreate($tagSIZE)
   $pSize  = DllStructGetPtr($tSize  )
   DllStructSetData($tSize, "X", _GDIPlus_ImageGetWidth ($hImage))
   DllStructSetData($tSize, "Y", _GDIPlus_ImageGetHeight($hImage))
   $tSource = DllStructCreate($tagPOINT)
   $pSource = DllStructGetPtr($tSource)
   $tBlend  = DllStructCreate($tagBLENDFUNCTION)
   $pBlend  = DllStructGetPtr($tBlend)
   DllStructSetData($tBlend, "Alpha" , $iOpacity    )
   DllStructSetData($tBlend, "Format", $AC_SRC_ALPHA)
   _WinAPI_UpdateLayeredWindow($hGUI, $hScrDC, 0, $pSize, $hMemDC, $pSource, 0, $pBlend, $ULW_ALPHA)
   _WinAPI_ReleaseDC  (0, $hScrDC)
   _WinAPI_SelectObject($hMemDC, $hOld)
   _WinAPI_DeleteObject($hBitmap)
   _WinAPI_DeleteDC    ($hMemDC)
EndFunc

vorrei poterci aggiungere dei label
ma utilizzando la funzione:

Codice:
GUICtrlCreateLabel()

non và potreste consigliarmi un metodo per poter inserire dei label?
(per farlo funzionare avete bisogno di questa immagine)

Grazie

Saluti By jocolor
Torna in alto Andare in basso
speed
Admin
Admin
speed


Maschio Messaggi : 418
Occupazione/Hobby : Studente di Informatica

[AutoIt]Problema con Gui Empty
MessaggioTitolo: Re: [AutoIt]Problema con Gui   [AutoIt]Problema con Gui Icon_minitime23/3/2011, 8:09 pm

solamente una cosa: dov'è che andresti ad aggiungere l'etichetta nel codice sorgente?
Torna in alto Andare in basso
Sadga
Moderatore
Moderatore
Sadga


Maschio Messaggi : 94

[AutoIt]Problema con Gui Empty
MessaggioTitolo: Re: [AutoIt]Problema con Gui   [AutoIt]Problema con Gui Icon_minitime24/3/2011, 1:45 pm

Anche questo non lo sò

Saluti By jocolor
Torna in alto Andare in basso
speed
Admin
Admin
speed


Maschio Messaggi : 418
Occupazione/Hobby : Studente di Informatica

[AutoIt]Problema con Gui Empty
MessaggioTitolo: Re: [AutoIt]Problema con Gui   [AutoIt]Problema con Gui Icon_minitime24/3/2011, 5:27 pm

d'accordo; sto provando a cercare qualcosa nel web... comunque non è facile appunto proprio perchè una label ha la necessità di avere un form (Frame) definito e attivo all'interno di un ciclo (while si usa spesso).

in questo caso, richiamando librerie e package di sistema per creare l'effetto grafico voluto, delegando perciò il compito al sistema operativo diventa più difficile se non impossibile. ovviamente un metodo ci deve essere (speriamo!) Smile

ti faccio sapere appena trovo qualcosa, ciao ciao! Wink cyclops
Torna in alto Andare in basso
speed
Admin
Admin
speed


Maschio Messaggi : 418
Occupazione/Hobby : Studente di Informatica

[AutoIt]Problema con Gui Empty
MessaggioTitolo: Re: [AutoIt]Problema con Gui   [AutoIt]Problema con Gui Icon_minitime14/4/2011, 1:39 pm

per tenerti aggiornato, ti informo che non ho trovato niente, mi dispiace... Sad
Torna in alto Andare in basso
Contenuto sponsorizzato





[AutoIt]Problema con Gui Empty
MessaggioTitolo: Re: [AutoIt]Problema con Gui   [AutoIt]Problema con Gui Icon_minitime

Torna in alto Andare in basso
 
[AutoIt]Problema con Gui
Torna in alto 
Pagina 1 di 1
 Argomenti simili
-
» [AutoIt] Il problema di TimeInit() con TimeDiff(timestamp);
» [AutoIt] Inviare file tramite TCP-UDP.
» [Autoit]Calcolatore codice fiscale
» [AutoIt] Gestire più finestre simultaneamente.
» [AutoIt] Più client, singolo server.

Permessi in questa sezione del forum:Non puoi rispondere agli argomenti in questo forum.
everything iS nOw! :: Interessi :: Informatica :: Programmazione-
Vai verso: