Jump to content

Sori

Active Members
  • Posts

    136
  • Joined

  • Last visited

Community Answers

  1. Sori's post in This program is long and complex. <3 was marked as the answer   
    It's not letting me click full editor for my first post (works fine with subsequent posts, but those don't offer title)
    Gonna kill this thread though, the glitches are minor... I'll try to target more specific issues if I run into things in the future.
  2. Sori's post in How to check the Desktop as the active Window? was marked as the answer   
    I think I'm just too tired.
    ;Is selected window the Desktop? $winSize = WinGetClientSize("") If $winSize[0] = @DesktopWidth + $smWidth Then ;Desktop $desktop = 1 Else $desktop = 0 EndIf I also changed all return marks inside the function to pass to a varible called $return instead, then at the end, I have 1 return.
    It had slipped my mind that if you use a return, the func will stop.
    I think everything is in order now .
    Func CheckIfFSSshouldDisplay() Local $decided = 0 Local $return, $desktop ;Is selected window the Desktop? $winSize = WinGetClientSize("") If $winSize[0] = @DesktopWidth + $smWidth Then ;Desktop $desktop = 1 Else $desktop = 0 EndIf ;Where is the mouse located If $smPosition = "Left" Then If MouseGetPos(0) < 0 Then ;If mouse is in monitor on left $decided = 1 $return = "Hide" EndIf Else ;$smPosition = "Right" If MouseGetPos(0) > @DesktopWidth Then ;If mouse is in monitor on right $decided = 1 $return = "Hide" EndIf EndIf ;Only check if undecided If $decided = 0 Then ;Where is the active window $activeWindowPosition = WinGetPos("[ACTIVE]") If $smPosition = "Left" Then If $activeWindowPosition[0] < 0 Then ;If Active Window is in monitor on left If $desktop = 0 Then $decided = 1 $return = "Hide" Else $return = "Show" EndIf EndIf Else ;$smPosition = "Right" If $activeWindowPosition[0] > @DesktopWidth Then ;If mouse is in monitor on right If $desktop = 0 Then $decided = 1 $return = "Hide" Else $return = "Show" EndIf EndIf EndIf EndIf If $decided = 0 Then ;Is there a special Window that is active? $mPos = _WinAPI_GetMousePos() $hwnd = _WinAPI_WindowFromPoint ($mPos) If $hwnd = $inputDirector Then $decided = 1 $return = "Hide" EndIf EndIf If $decided = 0 Then ;Is the Toggle set to hide? If RegRead("HKEY_CURRENT_USER\Software\Fullscreen Slideshow", "Mode") = "Hide" Then $return = "Hide" EndIf EndIf ;If no issues, then show If $decided = 0 Then $return = "Show" EndIf return $return EndFunc ;==>CheckIfFSSshouldDisplay
  3. Sori's post in 191 + 1 = 1? w...t...h? was marked as the answer   
    Func GetDimensions($picName) Dim $prop $path = "C:\Users\The Lucky Crane\Desktop\AI\Images\" & $picName $prop = _GetFileProperty($path, "Dimensions") ConsoleWrite(">" & $prop & "<" & @LF) $dArray = StringSplit($prop, " x ") $pWidth = Number(StringMid($dArray[1], 2)) ;Removes first character from dArray[1] and then converts into number. $pHeight = Number($dArray[4]) ConsoleWrite(VarGetType($pWidth) & @LF) EndFunc All is working.
    Thank you very much, Water.
  4. Sori's post in How do I reroute a keypress? was marked as the answer   
    Using a mixture of ispressed and send() I got it all coded.
    Thank you for trying to help.
×
×
  • Create New...