Jump to content

Leaderboard

Popular Content

Showing content with the highest reputation on 04/26/2013 in all areas

  1. No it's nothing like that. Not bit, nothing. ...Heloo!!! Programming? Familiar with? Eh, I like you, but sometimes you really say dumb things.
    1 point
  2. Try: ConsoleWrite("Line 1" & @crlf) ConsoleWrite("Line 2" & @crlf) ConsoleWrite("Line 3" & @crlf) Sleep(2000) ControlSend("[CLASS:SciTEWindow]", "", "Scintilla2", "+{F5}") Jos
    1 point
  3. For $x = 1 to 100 ConsoleWrite($x & @CRLF) Next ConsoleWrite("clear output in 1 sec" & @CRLF) Sleep(1000) SendSciTE_Command("menucommand:420") ; Clear Output pane "IDM_CLEAROUTPUT" ConsoleWrite("cleared" & @CRLF) ;~ For $x = 1 to 100 ;~ ConsoleWrite($x & @CRLF) ;~ Next Exit ; ; Send command to SciTE Func SendSciTE_Command($sCmd) Local $Scite_hwnd = WinGetHandle("DirectorExtension") Local $WM_COPYDATA = 74 Local $CmdStruct = DllStructCreate('Char[' & StringLen($sCmd) + 1 & ']') DllStructSetData($CmdStruct, 1, $sCmd) Local $COPYDATA = DllStructCreate('Ptr;DWord;Ptr') DllStructSetData($COPYDATA, 1, 1) DllStructSetData($COPYDATA, 2, StringLen($sCmd) + 1) DllStructSetData($COPYDATA, 3, DllStructGetPtr($CmdStruct)) DllCall('User32.dll', 'None', 'SendMessage', 'HWnd', $Scite_hwnd, _ 'Int', $WM_COPYDATA, 'HWnd', 0, _ 'Ptr', DllStructGetPtr($COPYDATA)) EndFunc ;==>SendSciTE_Command
    1 point
  4. That's a very good idea! I will add this to the _Excel_RangeRead function of my ExcelEX UDF.
    1 point
  5. Here, modified the _excelreadsheettoarray to use current selection: Func _ExcelReadSelectionToArray($oExcel) Local $avRET[1][2] = [[0, 0]] ; 2D return array ;~ $iRowStart = $oExcel.Application.Selection.Rows(1).Row ;~ $iColStart = $oExcel.Application.Selection.columns(1).Column $iRowCnt = $oExcel.Application.Selection.rows.count $iColCnt = $oExcel.Application.Selection.columns.count ;~ ConsoleWrite($iRowStart & @CRLF) ;~ ConsoleWrite($iColStart & @CRLF) ConsoleWrite($iRowCnt & @CRLF) ConsoleWrite($iColCnt & @CRLF) ; Size the return array ReDim $avRET[$iRowCnt][$iColCnt] For $r = 0 To $iRowCnt-1 For $c = 0 To $iColCnt-1 $avRET[$r][$c] = $oExcel.Application.Selection.Cells($r+1,$c+1).Value Next Next ;Return data Return $avRET EndFunc ;==>_ExcelReadSheetToArray
    1 point
  6. Use _SelfDelete, it works great. And you make Guinness happy
    1 point
  7. Brackets denote optional parameters. So remove them from the MouseMove statement. BTW: If you want reliable scripts don't do it this way. Use the FireFox UDF to automate FireFox.
    1 point
  8. Wrong function. _IEFormImageClick() is for <input type="image" elements. You want _IEImgClick() instead. Dale
    1 point
×
×
  • Create New...