Jump to content

strate

Active Members
  • Posts

    518
  • Joined

  • Last visited

Profile Information

  • Location
    Indiana

strate's Achievements

Universalist

Universalist (7/7)

0

Reputation

  1. Thank you, never crossed my mind.
  2. I asked here because I don't want to register for another forum for just one question. I knew the talent here would have an answer.
  3. I've searched google and the only thing that I can find is how to create a instance of IE. Problem is, I want to attach (by window name) to a window that exists... Any idea how?
  4. I have three large databases to create and instead of creating them in succession, can I create three different scripts and run them all at the same time accessing the Sqlite.ll?
  5. Is it possible to dump the blurred image to a file, so that you never see the bluring until you open the file?
  6. Is there any program that this might not be unable to open and/or handle appropriately? I'm adding it to a larger script and wanna be sure.
  7. Right, but how would you do that dynamically through the code such as the example in post #1 emulates?
  8. Thats exactly the reason I used it (test for dimension creation). I can redim a dimension to add more records to it all day. My problem is if I have a 3D array how do I make it a 4D array.
  9. I need to add dimensions to a already establised array. When searching I found the following by PsaltyDS. #include <Array.au3> Global $avArray[1] = [0] ConsoleWrite(UBound($avArray,0) & @crlf) For $e = 1 To 10 $iRow = UBound($avArray) $iCol = UBound($avArray, 2) ReDim $avArray[$iRow + 1][$iCol + 1] For $n = 0 To $iCol $avArray[$iRow][$n] = $e ^ $n Next $avArray[0][0] = UBound($avArray) - 1 _ArrayDisplay($avArray, "$avArray") Next ConsoleWrite(UBound($avArray,0) & @crlf) Problem with this is when you wrap it with "ConsoleWrite(UBound($avArray,0) & @crlf)" it doesn't appear to actually add dimensions, it returns 2 instead of 10. So as stated previously, I need to add a dimension to a establised array. Is this possible?
  10. I hope so, I've had a limited amount of time to play with it. Grayscale takes so long it's not worth doing it, when your trying to do the entire desktop.
  11. Thank you very much, all I have checked out so far was the grayscale.
  12. I need to convert an image to grayscale. I don't want to use any third party programs for this. I've found a formula for converting each pixel so I'm thinking the GDI functions will be used, I'm lost on how to to do it though. Any help would be great, thanks. Edit: A VB method can be found here: http://www.bobpowell.net/grayscale.htm
  13. I'm trying to make three GUIs look like one. I wanna simulate a part of the window scrolling up. The sample code below is a parent GUI with two children in it. One child is setup to scroll vertically, and the other is setup to hide the vertical scroll bar that is created by the first GUI. I need the vertical scrollbar eliminated but I can't figure out how, _GUIScrollBars_Show($inside, $SB_VERT, False) seems to do nothing for me. #include <GUIConstants.au3> #include <GUIScrollBars.au3> #Include <GuiStatusBar.au3> ; Opt("GUIOnEventMode", 1) ; #region ; Stationary Pane $h_Main_GUI = GUICreate("Label Application",700,400,-1,-1) GUISetOnEvent($GUI_EVENT_CLOSE, "SpecialEvents") GUISetOnEvent($GUI_EVENT_MINIMIZE, "SpecialEvents") GUISetOnEvent($GUI_EVENT_RESTORE, "SpecialEvents") $Label8 = GUICtrlCreateLabel("This side of the window remains unchanged." , 256, 112, 300, 16) $ok1 = GUICtrlCreateButton ("OK", 580, 30, 50, 20) GUICtrlSetOnEvent(-1, "OKPressed") $cancel1 = GUICtrlCreateButton ( "Cancel",640,30,50,20) GUICtrlSetOnEvent(-1, "CancelPressed") GUISetState() #endregion ; Stationary Pane ; #region ; "Scrolling" Pane $i_SliderWidth = 200 $i_SliderHeight = 400 $inside = GuiCreate( "GUI 1",$i_SliderWidth, $i_SliderHeight, 0, 0,$WS_POPUP) ; CREATE GUI 1 _SetParent( "GUI", "Label Application" ) _GUIScrollBars_Init($inside) _GUIScrollBars_Show($inside, $SB_HORZ, False) $Labe20 = GUICtrlCreateLabel("Scrolling pane", 24, 112, 113, 16) $Label3 = GUICtrlCreateLabel("This side of the window scrolls.", 24, 160, 200, 16) $Label1 = GUICtrlCreateLabel('Select "OK" to slide window up.',24, 208, 200, 16) _GUIScrollBars_Enable ($inside, $SB_VERT, False) _GUIScrollBars_SetRange ($inside, $SB_VERT, 0,30) _GUIScrollBars_SetPos ($inside, $SB_VERT, 30) $Label4 = GUICtrlCreateLabel("Everything is okay until you", 24, 40,200, 16) $Label5 = GUICtrlCreateLabel("Type something in the input:", 24, 80,200, 16) $DueDate = GUICtrlCreateInput("", 24,120, 49, 21,$ES_NUMBER) $Label5 = GUICtrlCreateLabel("After doing so the scroll bar is"&@cr&"visable.", 24, 180,180,30) _GUIScrollBars_Show ($inside, $SB_HORZ, False) _GUIScrollBars_SetPos ($inside, $SB_VERT, 0) GUISetState(@SW_SHOW) #endregion ; "Scrolling" Pane ; #region ; Scroll Bar "Hider" $Hidescrollbar = GuiCreate( "Hide scrollbar",17,$i_SliderHeight,$i_SliderWidth-17,0,$WS_POPUP) _SetParent( "Hide scrollbar", "Label Application" ) ;~ GUISetBkColor(0xbf9ffa) GUISetState(@SW_SHOW) #endregion ; Scroll Bar "Hider" ; _GUIScrollBars_Enable ($inside, $SB_VERT, False) ; While 1 Sleep(10) Wend Exit ;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;;;;; Functions ;;;;;;;; ;;;;;;;;;;;;;;;;;;;;;;;;;; Func OKPressed() For $i = 1 to 30 _GUIScrollBars_SetPos ($inside, $SB_VERT,$i) Sleep(5) Next EndFunc Func CancelPressed() For $i = 30 to 0 Step -1 _GUIScrollBars_SetPos ($inside, $SB_VERT,$i) Sleep(5) Next EndFunc Func SpecialEvents() Select Case @GUI_CTRLID = $GUI_EVENT_CLOSE Exit Case @GUI_CTRLID = $GUI_EVENT_MINIMIZE MsgBox(0, "Window Minimized", "ID=" & @GUI_CTRLID & " WinHandle=" & @GUI_WINHANDLE) Case @GUI_CTRLID = $GUI_EVENT_RESTORE MsgBox(0, "Window Restored", "ID=" & @GUI_CTRLID & " WinHandle=" & @GUI_WINHANDLE) EndSelect EndFunc Func _SetParent($TitleP, $TitleC) If WinExists($TitleP) Then If WinExists($TitleC) Then $HwndP = WinGetHandle($TitleP) $HwndC = WinGetHandle($TitleC) $user32 = DllOpen("user32.dll") DllCall($user32, "str", "SetParent", "HWnd", $HwndP, "HWnd", $HwndC) DllClose( $user32 ) Return 1 Else Return -1 EndIf Else Return -1 EndIf EndFunc ;==>_SetParent
×
×
  • Create New...