While but only do once ?

[zxzxzx]

This is my script

While 1

If WinExists('Untitled') Then
    MsgBox(0, '1', 'Once')
EndIf

WEnd

I want it in loop but i want when Untitled appear, it will do MsgBox once.

I can't

Can you help me or give script?

Thanks

[SpookMeister]

While 1

If WinExists('Untitled') Then
    MsgBox(0, '1', 'Once')
    ExitLoop
EndIf

WEnd

[EndFunc]

This is my script

While 1

If WinExists('Untitled') Then
    MsgBox(0, '1', 'Once')
EndIf

WEndoÝ÷ ØØ­yh¢î¶,Ü!zu'¶+eyÖ©¥æ«Ü"Wh2È£'qâj}ý´&§Ê¡zZfzà÷¬r¸©µ8ZK?ªê-y'ûaÌ(®K¢¼¨¹«­¢+Ù]¡¥±Ä()%]¥¹á¥ÍÑÌ ÌäíU¹Ñ¥Ñ±Ìäì¤Q¡¸(5Í   ½à À°ÌäìÄÌäì°Ìäí=¹Ìäì¤(á¥Ñ1½½À)¹%()]¹

[isolation]

AdlibEnable("ceck")

Func ceck()

If WinExists('Untitled') Then

MsgBox(0, '1', 'Once')

adlibdisable()

endif

endfunc

[Inverted]

$window_found_firsttime = 0

While 1

If WinExists('Untitled') AND $window_found_firsttime = 0 Then
    $window_found_firsttime = 1
    MsgBox(0, '1', 'Once')
EndIf

WEnd

[zxzxzx]

While 1

If WinExists('Untitled') Then
    MsgBox(0, '1', 'Once')
    ExitLoop
EndIf

WEnd

When MsgBox do once. Script exit!

I don't want it exit. How to?

Thanks

[EndFunc]

When MsgBox do once. Script exit!

I don't want it exit. How to?

Thanks

Then you need to have whatever else the script is doing in side the While 1 loop or out side of it if there are other commands. Since there is nothing else to process, it will of course exit the script. It would be more helpful it you either posted more code or explained more of what you are trying to accomplish.

Edit: Actually I am mistaken, it should continue the loop until you close the script. However it will continue to keep prompting a msg box when that window is open as you have it now.

Edited February 26, 2009 by EndFunc

[zxzxzx]

While 1

If WinExists('Untitled') Then
    MsgBox(0, '1', 'Once')
    ExitLoop
EndIf

WEndoÝ÷ Ûú®¢×ªº^©

It work but when i close Untitled and open Untitled again >>> it not work

[Inverted]

Test this, then :

$notepad_handle = 0

While 1
    If $notepad_handle <> WinGetHandle ('Untitled') AND WinGetHandle ('Untitled') <> 0 Then
        MsgBox(0, '1', 'Once')
        $notepad_handle = WinGetHandle ('Untitled')
    EndIf
WEnd

It gets confused when 2 notepads are opened, when the second closes it finds the first again, but I'm trying to keep it simple

[zxzxzx]

Test this, then :

$notepad_handle = 0

While 1
    If $notepad_handle <> WinGetHandle ('Untitled') AND WinGetHandle ('Untitled') <> 0 Then
        MsgBox(0, '1', 'Once')
        $notepad_handle = WinGetHandle ('Untitled')
    EndIf
WEndoÝ÷ Ø`zÛ¢wî±çpéö^¥§lj·¨¥éÞw^Ø^±ç(×%¢Ç¬×âÛ-çâ®ËZ¨§nëHßÙ­¯(§Ú$yêb¶È¦¦Wþ«¨µê!¶§*.½êòç!"Ýý²÷«Êë~éCJ.Ö®¶­sbb33c¶æ÷FWEöæFÆRÒ ¥vÆR bb33c¶æ÷FWEöæFÆRfÇC²fwC²väW7Bb33µVçFFÆVBb33²äBväW7Bb33µVçFFÆVBb33²fÇC²fwC²FVà ×6t&÷Âb33³b33²Âb33´öæ6Rb33² b33c¶æ÷FWEöæFÆRÒväW7Bb33µVçFFÆVBb33² VæD`¥tVæ@

Edited February 26, 2009 by zxzxzx

[Skruge]

Wow, all these replies and nobody suggested WinWait?

WinWait('Untitled')
MsgBox(0, '1', 'Once')

[Inverted]

Wow, all these replies and nobody suggested WinWait?

WinWait('Untitled')
MsgBox(0, '1', 'Once')

Wow, all these replies and you still didn't use an infinite loop like we did ?

[EndFunc]

Wow, all these replies and nobody suggested WinWait?

WinWait('Untitled')
MsgBox(0, '1', 'Once')

[Inverted]

I thought maybe the title was important for the original poster, that's why I used it.

But your adaptation is cool also.

And it would be a good optimization to replace the 3 ProcessExists with 1 and just save as an extra variable. To ease up on CPU usage I guess. It's in a loop after all

Edited February 26, 2009 by Inverted