ashley Posted July 8, 2007 Share Posted July 8, 2007 where is the open func in the help file... or can some one post it... It can only open .TXT files Plz And does anybosy know how to make my own saved file type... For excample... KODA saved files are .kfx... I want one to be .TYP Free icons for your programs Link to comment Share on other sites More sharing options...
James Posted July 8, 2007 Share Posted July 8, 2007 (edited) FileOpenDialog() FileSaveDialog() Edited July 8, 2007 by JBr00ks Blog - Seriously epic web hosting - Twitter - GitHub - Cachet HQ Link to comment Share on other sites More sharing options...
ashley Posted July 8, 2007 Author Share Posted July 8, 2007 FileOpenDialog()FileSaveDialog()are these the files or is that wot i put in script Free icons for your programs Link to comment Share on other sites More sharing options...
piccaso Posted July 8, 2007 Share Posted July 8, 2007 these are functions, look for them in the helpfile CoProc Multi Process Helper libraryTrashBin.nfshost.com store your AutoIt related files here!AutoIt User Map Link to comment Share on other sites More sharing options...
ashley Posted July 8, 2007 Author Share Posted July 8, 2007 these are functions, look for them in the helpfilei have look at my script expandcollapse popup;~# includes #include <GUIConstants.au3> #include <file.au3> ;~# includes end ;~# hotkeys HotKeySet("^s", "save") HotKeySet("^o", "open") HotKeySet("^p", "print") Hotkeyset("^l", "linecount") ;~# hotkeys end #Region ### START Koda GUI section ### Form= $Form1 = GUICreate("TypePad- By Ashley", 633, 447, 206, 117) GUISetCursor (0) GUISetFont(8, 400, 0, "Arial Black") GUISetBkColor(0x0000FF) $edit = GUICtrlCreateEdit("", 8, 8, 617, 409) GUICtrlSetColor(-1, 0xFF0000) $Label2 = GUICtrlCreateLabel("To open a file press Ctrl + O", 152, 424, 181, 19, BitOR($SS_CENTER,$WS_BORDER), $WS_EX_STATICEDGE) GUICtrlSetColor(-1, 0xFF0000) $Label3 = GUICtrlCreateLabel("To print a file press Crtl + P", 336, 424, 172, 19, $WS_BORDER, $WS_EX_STATICEDGE) GUICtrlSetColor(-1, 0xFF0000) $Label1 = GUICtrlCreateLabel("To save press Ctrl + S", 3, 425, 146, 19, BitOR($SS_CENTER,$WS_BORDER), $WS_EX_STATICEDGE) GUICtrlSetColor(-1, 0xFF0000) $Label4 = GUICtrlCreateLabel("Typepad By Ashley", 512, 424, 119, 19, BitOR($SS_SUNKEN,$WS_BORDER)) GUICtrlSetColor(-1, 0xFF0000) GUISetState(@SW_SHOW) #EndRegion ### END Koda GUI section ### While 1 $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE Exit EndSwitch WEnd Func Save() FileSaveDialog("Save", "", "TypePad- files (*.TYP)", 1) EndFunc Func Open() FileOpenDialog("Open", "", "TypePad- files (*.TYP)", 1)) EndFunc Func print() $file = FileOpenDialog("Print File", "", "TypePad- files (*.TYP)", 1) If @error Then Exit $print = _FilePrint($file) If $print Then MsgBox(0, "Print", "The file was sent to the printer.") Else MsgBox(0, "Print", "Error: " & @error & @CRLF & "The file was not sent to printer.") EndIf EndFunc Func linecount() $CountLines = _FileCountLines("TypePad.au3") MsgBox(64, "Lines in file", "There are " & $CountLines & " in this file") EndFunc Can you fix the bugs... Free icons for your programs Link to comment Share on other sites More sharing options...
martin Posted July 8, 2007 Share Posted July 8, 2007 (edited) are these the files or is that wot i put in scriptBe easy on me im am NOOBRemember you were one tooNo excuses accepted, you have to know how to use the help. Edited July 8, 2007 by martin 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 More sharing options...
ashley Posted July 8, 2007 Author Share Posted July 8, 2007 No excuses accepted, you have to know how to use the help.i do...Look at my post before your post... Free icons for your programs Link to comment Share on other sites More sharing options...
martin Posted July 8, 2007 Share Posted July 8, 2007 i do...Look at my post before your post...OK, that post wasn't there when I wrote my post. The only problem I can see with your code is an extra closing bracket at the end of FileOpenDialog. 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 More sharing options...
ashley Posted July 8, 2007 Author Share Posted July 8, 2007 OK, that post wasn't there when I wrote my post. The only problem I can see with your code is an extra closing bracket at the end of FileOpenDialog.lol i was must of pressed add reply just before you did... anyways i fixed that... here is script now expandcollapse popup;~# includes #include <GUIConstants.au3> #include <file.au3> ;~# includes end ;~# hotkeys HotKeySet("{esc}", "close") HotKeySet("^s", "save") HotKeySet("^o", "open") HotKeySet("^p", "print") Hotkeyset("^l", "linecount") ;~# hotkeys end #Region ### START Koda GUI section ### Form= $Form1 = GUICreate("TypePad- By Ashley", 633, 447, 206, 117) WinSetOnTop("TypePad- By Ashley","",1) GUISetCursor (0) GUISetFont(8, 400, 0, "Arial Black") GUISetBkColor(0x0000FF) $edit = GUICtrlCreateEdit("", 8, 8, 617, 409) GUICtrlSetColor(-1, 0xFF0000) $Label2 = GUICtrlCreateLabel("To open a file press Ctrl + O", 152, 424, 181, 19, BitOR($SS_CENTER,$WS_BORDER), $WS_EX_STATICEDGE) GUICtrlSetColor(-1, 0xFF0000) $Label3 = GUICtrlCreateLabel("To print a file press Crtl + P", 336, 424, 172, 19, $WS_BORDER, $WS_EX_STATICEDGE) GUICtrlSetColor(-1, 0xFF0000) $Label1 = GUICtrlCreateLabel("To save press Ctrl + S", 3, 425, 146, 19, BitOR($SS_CENTER,$WS_BORDER), $WS_EX_STATICEDGE) GUICtrlSetColor(-1, 0xFF0000) $Label4 = GUICtrlCreateLabel("Typepad By Ashley", 512, 424, 119, 19, BitOR($SS_SUNKEN,$WS_BORDER)) GUICtrlSetColor(-1, 0xFF0000) GUISetState(@SW_SHOW) #EndRegion ### END Koda GUI section ### While 1 $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE Exit EndSwitch WEnd Func Save() FileSaveDialog("Save", "", "TypePad- files (*.TYP)", 1) EndFunc Func Open() FileOpenDialog("Open", "", "TypePad- files (*.TYP)", 1) EndFunc Func print() $file = FileOpenDialog("Print File", "", "TypePad- files (*.TYP)", 1) If @error Then Exit $print = _FilePrint($file) If $print Then MsgBox(0, "Print", "The file was sent to the printer.") Else MsgBox(0, "Print", "Error: " & @error & @CRLF & "The file was not sent to printer.") EndIf EndFunc Func linecount() $CountLines = _FileCountLines("TypePad.au3") MsgBox(64, "Lines in file", "There are " & $CountLines & " in this file") endFunc Func close() Exit EndFunc Is there any way to minamzie normaly with the button but if they press Ctrl + M it minamizes to the tray... Thanks in advance Free icons for your programs Link to comment Share on other sites More sharing options...
ChrisL Posted July 8, 2007 Share Posted July 8, 2007 lol i was must of pressed add reply just before you did... anyways i fixed that... here is script now expandcollapse popup;~# includes #include <GUIConstants.au3> #include <file.au3> ;~# includes end ;~# hotkeys HotKeySet("{esc}", "close") HotKeySet("^s", "save") HotKeySet("^o", "open") HotKeySet("^p", "print") Hotkeyset("^l", "linecount") ;~# hotkeys end #Region ### START Koda GUI section ### Form= $Form1 = GUICreate("TypePad- By Ashley", 633, 447, 206, 117) WinSetOnTop("TypePad- By Ashley","",1) GUISetCursor (0) GUISetFont(8, 400, 0, "Arial Black") GUISetBkColor(0x0000FF) $edit = GUICtrlCreateEdit("", 8, 8, 617, 409) GUICtrlSetColor(-1, 0xFF0000) $Label2 = GUICtrlCreateLabel("To open a file press Ctrl + O", 152, 424, 181, 19, BitOR($SS_CENTER,$WS_BORDER), $WS_EX_STATICEDGE) GUICtrlSetColor(-1, 0xFF0000) $Label3 = GUICtrlCreateLabel("To print a file press Crtl + P", 336, 424, 172, 19, $WS_BORDER, $WS_EX_STATICEDGE) GUICtrlSetColor(-1, 0xFF0000) $Label1 = GUICtrlCreateLabel("To save press Ctrl + S", 3, 425, 146, 19, BitOR($SS_CENTER,$WS_BORDER), $WS_EX_STATICEDGE) GUICtrlSetColor(-1, 0xFF0000) $Label4 = GUICtrlCreateLabel("Typepad By Ashley", 512, 424, 119, 19, BitOR($SS_SUNKEN,$WS_BORDER)) GUICtrlSetColor(-1, 0xFF0000) GUISetState(@SW_SHOW) #EndRegion ### END Koda GUI section ### While 1 $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE Exit EndSwitch WEnd Func Save() FileSaveDialog("Save", "", "TypePad- files (*.TYP)", 1) EndFunc Func Open() FileOpenDialog("Open", "", "TypePad- files (*.TYP)", 1) EndFunc Func print() $file = FileOpenDialog("Print File", "", "TypePad- files (*.TYP)", 1) If @error Then Exit $print = _FilePrint($file) If $print Then MsgBox(0, "Print", "The file was sent to the printer.") Else MsgBox(0, "Print", "Error: " & @error & @CRLF & "The file was not sent to printer.") EndIf EndFunc Func linecount() $CountLines = _FileCountLines("TypePad.au3") MsgBox(64, "Lines in file", "There are " & $CountLines & " in this file") endFunc Func close() Exit EndFunc Is there any way to minamzie normaly with the button but if they press Ctrl + M it minamizes to the tray... Thanks in advance There is a minimize to tray script in my sig below. For the Ctrl + M look at HotKeySet() in the help file [u]Scripts[/u]Minimize gui to systray _ Fail safe source recoveryMsgbox UDF _ _procwatch() Stop your app from being closedLicensed/Trial software system _ Buffering Hotkeys_SQL.au3 ADODB.Connection _ Search 2d Arrays_SplashTextWithGraphicOn() _ Adjust Screen GammaTransparent Controls _ Eventlogs without the crap_GuiCtrlCreateFlash() _ Simple Interscript communication[u]Websites[/u]Curious Campers VW Hightops Lambert Plant Hire Link to comment Share on other sites More sharing options...
ashley Posted July 8, 2007 Author Share Posted July 8, 2007 There is a minimize to tray script in my sig below. For the Ctrl + M look at HotKeySet() in the help filelook im new can u right the minamize bit for me i know how to do hotkeys Free icons for your programs Link to comment Share on other sites More sharing options...
ChrisL Posted July 8, 2007 Share Posted July 8, 2007 look im new can u right the minamize bit for me i know how to do hotkeysNope, the script is in my signature base it on that [u]Scripts[/u]Minimize gui to systray _ Fail safe source recoveryMsgbox UDF _ _procwatch() Stop your app from being closedLicensed/Trial software system _ Buffering Hotkeys_SQL.au3 ADODB.Connection _ Search 2d Arrays_SplashTextWithGraphicOn() _ Adjust Screen GammaTransparent Controls _ Eventlogs without the crap_GuiCtrlCreateFlash() _ Simple Interscript communication[u]Websites[/u]Curious Campers VW Hightops Lambert Plant Hire Link to comment Share on other sites More sharing options...
James Posted July 8, 2007 Share Posted July 8, 2007 Look at BetaPad, taken anything you want. Blog - Seriously epic web hosting - Twitter - GitHub - Cachet HQ Link to comment Share on other sites More sharing options...
ashley Posted July 8, 2007 Author Share Posted July 8, 2007 Look at BetaPad, taken anything you want.ok thanks Free icons for your programs Link to comment Share on other sites More sharing options...
Recommended Posts
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 accountSign in
Already have an account? Sign in here.
Sign In Now