mirror of
https://github.com/reactos/ahk_tests.git
synced 2024-11-23 11:39:42 +00:00
b4a487b504
Reverse logic; Disable application update notification and cleanup scripts a bit. Tested all tests and works fine in win2k3 sp2. svn path=/trunk/ahk_tests/; revision=1588
88 lines
2.8 KiB
AutoHotkey
88 lines
2.8 KiB
AutoHotkey
/*
|
|
* Designed for Notepad++ 6.1.2
|
|
* Copyright (C) 2012 Edijs Kolesnikovics
|
|
*
|
|
* This library is free software; you can redistribute it and/or
|
|
* modify it under the terms of the GNU Lesser General Public
|
|
* License as published by the Free Software Foundation; either
|
|
* version 2.1 of the License, or (at your option) any later version.
|
|
*
|
|
* This library is distributed in the hope that it will be useful,
|
|
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
|
|
* Lesser General Public License for more details.
|
|
*
|
|
* You should have received a copy of the GNU Lesser General Public
|
|
* License along with this library; if not, write to the Free Software
|
|
* Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
|
|
*/
|
|
|
|
; Test Ctrl-F 'Find' dialog
|
|
|
|
TestsTotal++
|
|
TestName = 4.Ctrl-F.FindDialog
|
|
szDocument = C:\NotepadTestFile.ini ; Case sensitive!
|
|
|
|
FileDelete, %szDocument%
|
|
FileAppend, This text`nwill contain some`nlines. We will use`nit to test dialogs., %szDocument%
|
|
if ErrorLevel
|
|
TestsFailed("Failed to create '" szDocument "'.")
|
|
else
|
|
{
|
|
RunNotepad(szDocument)
|
|
IfWinNotActive, %szDocument% - Notepad++
|
|
TestsFailed("Window '" szDocument " - Notepad++' is not active.")
|
|
else
|
|
{
|
|
SendInput, {CTRLDOWN}f{CTRLUP} ; Call dialog using Ctrl+F
|
|
WinWaitActive, Find,, 5
|
|
if ErrorLevel
|
|
{
|
|
Sleep, 700
|
|
WinGetTitle, title, A
|
|
OutputDebug, %TestName%:%A_LineNumber%: Test failed: Window 'Find' failed to appear, so Ctrl+F doesn't work, bug #6734. Active window caption: '%title%'`n
|
|
|
|
; Check if can open 'Find' from main menu
|
|
SendInput, {ALTDOWN}s ; Hit 'Search'
|
|
SendInput, f ; Hit 'Find'
|
|
Sleep, 500
|
|
WinWaitActive, Find,,5
|
|
if ErrorLevel
|
|
TestsFailed("Can't open 'Find' from main menu")
|
|
else
|
|
{
|
|
TestFindDialog()
|
|
if bContinue
|
|
TestsOK("")
|
|
}
|
|
}
|
|
else
|
|
{
|
|
TestFindDialog()
|
|
if bContinue
|
|
TestsOK("")
|
|
}
|
|
}
|
|
}
|
|
|
|
TestFindDialog()
|
|
{
|
|
global TestName
|
|
global bContinue
|
|
|
|
IfWinActive, Find
|
|
{
|
|
Sleep, 700
|
|
SendInput, !f ; Go to 'Find what'
|
|
SendInput, some ; He have such word in that document
|
|
SendInput, !t ; Hit 'Count'
|
|
Sleep, 700
|
|
WinWaitActive, Count, 1 match, 5 ; We have only 1 match
|
|
if ErrorLevel
|
|
TestsFailed("Can't find a match.")
|
|
else
|
|
bContinue := true
|
|
}
|
|
}
|
|
|
|
Process, close, notepad++.exe ; We don't care now if application can close correctly, so, terminate |