Jump to content

make a full screen photo with apps ?


ENTERg
 Share

Recommended Posts

hello to all in here :)

i want to make a simple script (i think it is) which will have :

1)one fullscreen foto

2)some text which will b applications on the foto

i think is simple i tried it but no result

thnx in advance keep up the good work in here ! :)

Link to comment
Share on other sites

hello to all in here :)

i want to make a simple script (i think it is) which will have :

1)one fullscreen foto

2)some text which will b applications on the foto

i think is simple i tried it but no result

thnx in advance keep up the good work in here ! :)

This is one way

#include <GUIConstants.au3>
HotKeySet("{ESC}","Exit1")

$Form1 = GUICreate("Form1", @DesktopWidth, @DesktopHeight, 0,0,$WS_POPUP,$WS_EX_TOPMOST)
$picPath = ?????
$Pic1 = GUICtrlCreatePic($picPath, 0, 0, @DesktopWidth, @DesktopHeight)
$Label1 = GUICtrlCreateLabel("Label1", 272, 264, 83, 33)
GUICtrlSetFont(-1, 18, 800, 0, "MS Sans Serif")
GUICtrlSetBkColor(-1, 0xffffff)
GUISetState(@SW_SHOW)

While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit

    EndSwitch
WEnd
Func Exit1()
    
Exit    
EndFunc
Serial port communications UDF Includes functions for binary transmission and reception.printing UDF Useful for graphs, forms, labels, reports etc.Add User Call Tips to SciTE for functions in UDFs not included with AutoIt and for your own scripts.Functions with parameters in OnEvent mode and for Hot Keys One function replaces GuiSetOnEvent, GuiCtrlSetOnEvent and HotKeySet.UDF IsConnected2 for notification of status of connected state of many urls or IPs, without slowing the script.
Link to comment
Share on other sites

the $picpath Variable I think will be the Path to the Location of the File to use as the background ??

$picPath = "C:\myDocuments\Picture01.jpg"
Edited by ofLight

There is always a butthead in the crowd, no matter how hard one tries to keep them out.......Volly

Link to comment
Share on other sites

Link to comment
Share on other sites

it was so simple guys sorry 4 the trouble.

how can you create a second label and how can you make this labels run a program ?

i s there a way for the label NOT to have white background ?

Zedna might have been a bit blunt but you should have taken notice of what he said.

You have to look at each line of the code, look up the function names in the help file, struggle to understand every line, then try changing something that you think you understand and see if it has the effect you expected and so on. Then try to add something of your own.

If and when you have been reduced to tears then post the code you have problems with and ask for help. At the moment I feel that you are not making as much effort to write your own script as I am, and that's where I stop.

Serial port communications UDF Includes functions for binary transmission and reception.printing UDF Useful for graphs, forms, labels, reports etc.Add User Call Tips to SciTE for functions in UDFs not included with AutoIt and for your own scripts.Functions with parameters in OnEvent mode and for Hot Keys One function replaces GuiSetOnEvent, GuiCtrlSetOnEvent and HotKeySet.UDF IsConnected2 for notification of status of connected state of many urls or IPs, without slowing the script.
Link to comment
Share on other sites

I was angry because martin posted almost whole needed code

and you instead of looking at used functions in the helpfile (their arguments and so on)

just posted another demand for basic thing.

If martin wouldn't posted his code snippet I would probably help you by say AutoIt function names needed for your question

so you may look into helpfile and reuse examples from there.

I'm helpfull man but I have my psycho limits too :">

Edited by Zedna
Link to comment
Share on other sites

i make some changes in the label the "1st part" of my script look like this:

#include <GUIConstants.au3>

HotKeySet("{ESC}","Exit1")

$Form1 = GUICreate("Form1", @DesktopWidth, @DesktopHeight, 0,0,$WS_POPUP,$WS_EX_TOPMOST)

$picPath = "C:\1.jpg"

$Pic1 = GUICtrlCreatePic($picPath, 0, 0, @DesktopWidth, @DesktopHeight)

$Label1 = GUICtrlCreateLabel("Label1", 272, 264, 83, 33,)

GUICtrlSetFont(-1, 18, 800, 0, "MS Sans Serif")

GUICtrlSetBkColor(-1, $GUI_BKCOLOR_TRANSPARENT)

GUISetState(@SW_SHOW)

the 2nd part i changed it to this :

While 1

$msg = GUIGetMsg()

Switch $msg

Case $GUI_EVENT_CLOSE

ExitLoop

Case $msg = $Label1

Run('Notepad.exe') ; Will Run/Open Notepad

Exit

EndSwitch

WEnd

Func Exit1()

Exit

EndFunc

i didn t find anywhere the $Nmsg and i change it to msg.

my problem is that the notepad runs without pressing the "label".it runs automatically.

how can i make the label to "run a program?

and maybe when i reach the cursor there to change from a cursor to a hand (like when you execute a window at the internet).is there a way to b like this ?

(i made 2 much trouble in here) :)

Link to comment
Share on other sites

#include <GUIConstants.au3>

$Form1 = GUICreate("Form1", @DesktopWidth, @DesktopHeight, 0, 0, $WS_POPUP, $WS_EX_TOPMOST)
$picPath = "C:\1.jpg" 
$Pic1 = GUICtrlCreatePic($picPath, 0, 0, @DesktopWidth, @DesktopHeight)
GUICtrlSetState(-1, $GUI_DISABLE)
$Label1 = GUICtrlCreateLabel("Label1", 272, 264, 83, 33)
GUICtrlSetCursor(-1,0)
GUICtrlSetFont(-1, 18, 800, 0, "MS Sans Serif")
GUICtrlSetBkColor(-1, $GUI_BKCOLOR_TRANSPARENT)
GUISetState(@SW_SHOW)

While 1
    $msg = GUIGetMsg()
    Switch $msg
        Case $GUI_EVENT_CLOSE
            ExitLoop
        Case $Label1
            GUISetCursor(15,1)
            Run('Notepad.exe') ; Will Run/Open Notepad
            GUISetCursor(2)
            Exit
    EndSwitch
WEnd

Edited by Zedna
Link to comment
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
 Share

  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...