Jump to content

miketh2005

Active Members
  • Posts

    126
  • Joined

  • Last visited

Everything posted by miketh2005

  1. Ohhhh. I did try it, but I was using $WS_EX_LAYERED & $WS_EX_TOOLWINDOW for some reason. Thanks a bunch! Coding runs into so many unexpected problems for newbies like me.
  2. It doesn't work with my GUI. #include <GUIConstantsEx.au3> #include <WindowsConstants.au3> #include <WINAPI.au3> #include <sendmessage.au3> #include <guiconstantsex.au3> #include "GUIScrollbars_Ex.au3" ;Global Const $LWA_ALPHA = 0x2 ;Global Const $LWA_COLORKEY = 0x1 HotKeySet("ESC", "_Exit") $hGUI = GUICreate("Test", 230, 100, -1, -1, $WS_POPUP, $WS_EX_LAYERED) GUISetBkColor(0xABCDEF) $iMemo = GUICtrlCreateLabel("Click on the text to drag this transparent GUI" & @CRLF & "Press ESC to exit", 10, 10, 200, 500) GUICtrlSetColor(-1, 0x000000) GUICtrlSetFont($iMemo, 9, 400, 0, "Franklin Gothic Medium") _WinAPI_SetLayeredWindowAttributes($hGUI, 0xABCDEF, 250) GUISetState() _GUIScrollbars_Generate($hGUI, 0, 300) While 1 Switch GUIGetMsg() Case $GUI_EVENT_CLOSE Exit Case $GUI_EVENT_PRIMARYDOWN _SendMessage($hGUI, $WM_SYSCOMMAND, 0xF012, 0) EndSwitch WEnd Func _Exit() Exit EndFunc
  3. I'm using a new AutoIt GUI that has a parent to another program I made in a different language. I don't want two taskbar icons, so I'd like to hide the AutoIt icon. Is there an easy way to do this? Thanks.
  4. So I am using MouseGetPos, and I want a function to start if the mouse is inside a square area on the screen. I want to do something like this: $var = MouseGetPos() If $var[0] [is between 69 - 84] and $var[1] [is between 38 - 57] Then Func() I know this isn't correct, so how would I script this? If this script was correct, then it would work, right? It would start the function when the mouse is between those coordinates, effectively a square, right? Thanks. Btw, I see that And is a function, yet I can find nothing about it in the help file? Thanks.
  5. Hi, I am just starting back coding after a year hiatus so I forgot a lot. Does this code work? Do $var = PixelGetColor(52, 142) Until $var = 0x07080A If $var = 0x07080A Then continue() Func(continue) Continue with Function.... EndFunc Thank you!
  6. You don't understand what I want to do. I don't want a theme, I want a mod. I want mozilla to be able to recognize local files as my own customizable URLs. I don't want to use mozilla's web browser controls or Mozilla's UI, I just want my browser to look like mozilla. Navigation will be by local URLs within the html file. I know how I want to do this. I just want to overlay the webpage over Mozilla. That's why I can't have the GUI.
  7. Yes, I want it to cover over Mozilla so that it looks like it is Mozilla, but it is actually like a modified mozilla. It is like an external mod for Mozilla. So that is why I don't need a GUI.... Do I really need winhttp? I don't even need it to connect online. I just want it to read from a local html / text file and display it.
  8. How would I load some text or html without a GUI? I don't want the GUI at all....
  9. It was quite simple. FileRead and FileOpen can open html files. =D So you can just read from an html file and then display it with _IEDocWriteHTML
  10. Hello again guys. I'm looking to create a local "web" browser, which is that it won't actually browse the web, but it will display from a .html file on the hard drive. I will also have hotlinks in the html file for it to display other html files on the harddrive, also. How would I go about doing this? Also... I need the program to send a pop up if the user clicks any other link in the html file. How would I go about doing that? Or would I have to create a kind of fake link in the program itself? Obviously I have access and can edit everything. I am creating the html files myself. Thanks guys.
  11. Thanks for the thought. They would be too far away from the letters, and since every millisecond counts, it wouldn't be viable. I am using "Esc" and "F2" keys now, which are doing quit well Thanks. You can close if you want.
  12. I see what you mean. I'm trying to make a process faster, and EVERY SECOND COUNTS, literally with this process, so I can't be using combination keys like Shift + 1 etc. its simply not fast enough. I tried using 1 and 2 as hotkeys, but the buttons simply aren't big enough on my keyboard, so sometimes in the heat of the moment when I'm hurrying fast, I press the wrong button, for example I press 2, when I meant to press 1 and then its done for me. Any suggestions, or do I just have to make due with "`" and "1"? What about the ctrl or alt key?
  13. HotKeySet("+", "ticket") HotKeySet("{TAB}", "arrest") While 1 = 1 WEnd Func ticket() MouseClick("left") Send("{TAB}") Send("{TAB}") EndFunc ;==>ticket Func arrest() Send("{TAB}") Send("{ENTER}") EndFunc ;==>arrest I have this code and it's just not working at all, but if I replace tab and shift with 1 and 2, then it works. Why? Thanks!
  14. _IENavigate($oIE, "http://www.yahoo.com") Works, but: _IENavigate($oIE, "http://www.cheatingnetwork.net") Doesn't :S
  15. O, I'll stick with this topic, then Anyone know?
  16. I didn't know what forum to post in: Hi. This is my code: #include <IE.au3> #include <ButtonConstants.au3> #include <EditConstants.au3> #include <GUIConstantsEx.au3> #include <StaticConstants.au3> #include <WindowsConstants.au3> #include <Constants.au3> #include <GuiConstants.au3> _IEErrorHandlerRegister() $oIE = _IECreateEmbedded() Opt("TrayOnEventMode", 1) Opt("TrayMenuMode", 1) Opt("GUIOnEventMode", 1) #region ### START Koda GUI section ### Form=c:\users\mike\documents\chatboxappform.kxf $chatboxappform = GUICreate("CheatingNetwork Subscriber Chatbox Desktop Application", 578, 385, 199, 258) GUISetIcon("C:\Users\Mike\Downloads\favicon(2).ico") GUISetFont(10, 400, 0, "Impact") $Login = GUICtrlCreateButton("Login", 276, 125, 75, 25, $WS_GROUP) GUICtrlSetOnEvent(-1, "chatbox") $usernamelabel = GUICtrlCreateLabel("Username:", 146, 3, 63, 21) GUICtrlSetColor(-1, 0xFFFFFF) GUICtrlSetBkColor(-1, 0x000000) $passwordlabel = GUICtrlCreateLabel("Password:", 362, 3, 61, 21) GUICtrlSetColor(-1, 0xFFFFFF) GUICtrlSetBkColor(-1, 0x000000) GUICtrlCreateInput("", 146, 22, 121, 25) GUICtrlCreateInput("", 362, 22, 121, 25) $madeby = GUICtrlCreateLabel("Made by miketh2005", 2, 0, 117, 21) GUICtrlSetColor(-1, 0xFFFFFF) GUICtrlSetBkColor(-1, 0x000000) $Pic1 = GUICtrlCreatePic("C:\Users\Mike\Desktop\cheatingnetworklogo.jpg", 0, 0, 578, 153, BitOR($SS_NOTIFY, $WS_GROUP, $WS_CLIPSIBLINGS)) TraySetClick("16") $Launch = TrayCreateItem("Launch") TrayItemSetOnEvent($Launch, "show") TraySetOnEvent($TRAY_EVENT_PRIMARYDOUBLE, "show") TraySetIcon("C:\Users\Mike\Downloads\favicon(2).ico", $Launch) GUISetOnEvent($GUI_EVENT_MINIMIZE, "hide") GUISetOnEvent($GUI_EVENT_CLOSE, "exxit") GUISetState(@SW_SHOW) #endregion ### END Koda GUI section ### While 1 $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE GUIDelete() Exit EndSwitch WEnd Func chatbox() $GUIActiveX = GUICtrlCreateObj($oIE, 0, 153, 0, 232) _IENavigate($oIE, "http://www.yahoo.com") $oIE.document.body.scroll = "no" $oIE.document.body.style.border = "0px" EndFunc ;==>chatbox Func hide() GUISetState(@SW_HIDE) EndFunc ;==>hide Func show() GUISetState(@SW_SHOW) EndFunc ;==>show Func exxit() Exit EndFunc ;==>exxit When you press "Login", the ie window is suppose to imbed, but I don't want scrollbars on the IE window. $oIE.document.body.scroll = "no" $oIE.document.body.style.border = "0px" Isn't working :/ Thanks.
  17. That's an interesting question. I would like to know, too! I've seen some programs add a "." to the title bar, which minimizes the window, but that's it.
  18. Hi. This is my code: #include <IE.au3> #include <ButtonConstants.au3> #include <EditConstants.au3> #include <GUIConstantsEx.au3> #include <StaticConstants.au3> #include <WindowsConstants.au3> #include <Constants.au3> #include <GuiConstants.au3> _IEErrorHandlerRegister() $oIE = _IECreateEmbedded() Opt("TrayOnEventMode", 1) Opt("TrayMenuMode", 1) Opt("GUIOnEventMode", 1) #region ### START Koda GUI section ### Form=c:\users\mike\documents\chatboxappform.kxf $chatboxappform = GUICreate("CheatingNetwork Subscriber Chatbox Desktop Application", 578, 385, 199, 258) GUISetIcon("C:\Users\Mike\Downloads\favicon(2).ico") GUISetFont(10, 400, 0, "Impact") $Login = GUICtrlCreateButton("Login", 276, 125, 75, 25, $WS_GROUP) GUICtrlSetOnEvent(-1, "chatbox") $usernamelabel = GUICtrlCreateLabel("Username:", 146, 3, 63, 21) GUICtrlSetColor(-1, 0xFFFFFF) GUICtrlSetBkColor(-1, 0x000000) $passwordlabel = GUICtrlCreateLabel("Password:", 362, 3, 61, 21) GUICtrlSetColor(-1, 0xFFFFFF) GUICtrlSetBkColor(-1, 0x000000) GUICtrlCreateInput("", 146, 22, 121, 25) GUICtrlCreateInput("", 362, 22, 121, 25) $madeby = GUICtrlCreateLabel("Made by miketh2005", 2, 0, 117, 21) GUICtrlSetColor(-1, 0xFFFFFF) GUICtrlSetBkColor(-1, 0x000000) $Pic1 = GUICtrlCreatePic("C:\Users\Mike\Desktop\cheatingnetworklogo.jpg", 0, 0, 578, 153, BitOR($SS_NOTIFY, $WS_GROUP, $WS_CLIPSIBLINGS)) TraySetClick("16") $Launch = TrayCreateItem("Launch") TrayItemSetOnEvent($Launch, "show") TraySetOnEvent($TRAY_EVENT_PRIMARYDOUBLE, "show") TraySetIcon("C:\Users\Mike\Downloads\favicon(2).ico", $Launch) GUISetOnEvent($GUI_EVENT_MINIMIZE, "hide") GUISetOnEvent($GUI_EVENT_CLOSE, "exxit") GUISetState(@SW_SHOW) #endregion ### END Koda GUI section ### While 1 $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE GUIDelete() Exit EndSwitch WEnd Func chatbox() $GUIActiveX = GUICtrlCreateObj($oIE, 0, 153, 0, 232) _IENavigate($oIE, "http://www.yahoo.com") $oIE.document.body.scroll = "no" $oIE.document.body.style.border = "0px" EndFunc ;==>chatbox Func hide() GUISetState(@SW_HIDE) EndFunc ;==>hide Func show() GUISetState(@SW_SHOW) EndFunc ;==>show Func exxit() Exit EndFunc ;==>exxit When you press "Login", the ie window is suppose to imbed, but I don't want scrollbars on the IE window. $oIE.document.body.scroll = "no" $oIE.document.body.style.border = "0px" Isn't working :/ Thanks.
  19. Thanks alot Richard! I used the POPUP style for GUIs, and it was exactly what I needed, no border or title. Thanks!
  20. Thanks alot mat! It was PERFECT just PERFECT, I made an exact replica, and I would've never been able to do it without your help! I really appreciate it, and if I get my money back from paypal, I'll pay you 20 bucks for helping out around the forum like this.
×
×
  • Create New...