Ogni Cosa, Dovunque!
 
IndiceCalendarioFAQCercaLista UtentiGruppiRegistratiAccedi

Condividi | 
 

 [AutoIt]Problema con Gui

Andare in basso 
AutoreMessaggio
Sadga
Moderatore
Moderatore
avatar

Maschio Messaggi : 94

MessaggioTitolo: [AutoIt]Problema con Gui   23/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

_________________
&lt;div style=&quot;border: 3px double rgb(192, 192, 192); background-image: url(&amp;quot;http://doppiavu.files.wordpress.com/2008/03/sfondo1.jpg&amp;quot;);&quot;&gt;

king king king king king king king king king king king king king








&lt;/div&gt;
Torna in alto Andare in basso
speed
Admin
Admin
avatar

Maschio Messaggi : 418
Occupazione/Hobby : Studente di Informatica

MessaggioTitolo: Re: [AutoIt]Problema con Gui   23/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
avatar

Maschio Messaggi : 94

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

Anche questo non lo sò

Saluti By jocolor

_________________
&lt;div style=&quot;border: 3px double rgb(192, 192, 192); background-image: url(&amp;quot;http://doppiavu.files.wordpress.com/2008/03/sfondo1.jpg&amp;quot;);&quot;&gt;

king king king king king king king king king king king king king








&lt;/div&gt;
Torna in alto Andare in basso
speed
Admin
Admin
avatar

Maschio Messaggi : 418
Occupazione/Hobby : Studente di Informatica

MessaggioTitolo: Re: [AutoIt]Problema con Gui   24/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
avatar

Maschio Messaggi : 418
Occupazione/Hobby : Studente di Informatica

MessaggioTitolo: Re: [AutoIt]Problema con Gui   14/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




MessaggioTitolo: Re: [AutoIt]Problema con Gui   

Torna in alto Andare in basso
 
[AutoIt]Problema con Gui
Torna in alto 
Pagina 1 di 1

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