Сообщений в теме: 8

[aiga]

Здраствуйте! У меня следующая проблема: у меня сначала откывается одно приложение, потом второе, после закрытия второго нужно вернуться к первому. Но навзание окна может изменяться, поэтому по Caption обращаться не получается. Я хотела считывать название при первом открытии окна чтоб потом можно было его сравнить. Подскажите как это сделать?
Или может другой какой-то есть способ обратиться к этому окну. CurrentWindow не работает. Еще вроде как-то по ID можно бы обращаться, но я не знаю как. Может подскажите как это сделать? Хотя первый способ предпочтительнее.

[berzinc]

Wildcard: *

..."Caption=Book2 - Microsoft Excel"...
Change to
..."Caption={* - Microsoft Excel}"...

SQAGetProperty:

Result = SQAGetProperty("Caption={* - Microsoft Excel}", "Caption", sWinCaption)

sWinCaption = Book2 - Microsoft Excel

[aiga]

Wildcard: *

..."Caption=Book2 - Microsoft Excel"...
Change to
..."Caption={* - Microsoft Excel}"...

SQAGetProperty:

Result = SQAGetProperty("Caption={* - Microsoft Excel}", "Caption", sWinCaption)

sWinCaption = Book2 - Microsoft Excel

Спасибо! Сделала следующим образом:
sWinCaption = "Кредит"
Result = SQAGetProperty("Caption=Кредит *", "Caption", sWinCaption)
if result then
Window CloseWin, "CurrentWindow", ""
end if

В данном случае помогло, но все таки остается вопрос о том как считать само название окна? Я ж так понимаю, что SQAGetProperty сравнивает Caption с переменной sWinCaption и выдает результат "да" или "нет". Но если я наперед не буду знать какое будет название окна, то как тогда быть?

[berzinc]

Result=SQAGetProperty("CurrentWindow","Caption",value)

Help ->
recognition methods
context:window
WindowVP

[berzinc]

Спасибо! Сделала следующим образом:
sWinCaption = "Кредит"
Result = SQAGetProperty("Caption=Кредит *", "Caption", sWinCaption)
if result then
Window CloseWin, "CurrentWindow", ""
end if

В данном случае помогло, но все таки остается вопрос о том как считать само название окна? Я ж так понимаю, что SQAGetProperty сравнивает Caption с переменной sWinCaption и выдает результат "да" или "нет". Но если я наперед не буду знать какое будет название окна, то как тогда быть?

Result = SQAGetProperty("Caption=Кредит *", "Caption", sWinCaption)
Если Result=0, в sWinCaption запишется полное название окна.

status% = SQAGetProperty(recMethod$, property$, value)

recMethod$ The recognition method values you use to identify an object depend on the object you are accessing. For example, if you are accessing a push button object, use the recognition method values listed for the PushButton user action command.

In addition, you might need to use Type= to specify the object type, and/or use context notation to specify the context for the object.

property$ A case-sensitive property name. See Specifying the Object Property for information on the property names you can specify for a given object.

value An output argument of type variant that will contain the retrieved property value.

[aiga]

Result = SQAGetProperty("Caption=Кредит *", "Caption", sWinCaption)
Если Result=0, в sWinCaption запишется полное название окна.

По теории оно то долно туда записывать название, но фактически у меня не получается. Пишу так:
Result = SQAGetProperty("Caption=Кредит *", "Caption", sWinCaption)
msgbox "" & sWinCaption
При этом сообщение выводится пустое, а в Result записывается 0. sWinCaption типа Variant.
Подскажите что я не так делаю?

[berzinc]

Result = SQAGetProperty("Caption=Кредит *", "Caption", sWinCaption)
Если Result=0, в sWinCaption запишется полное название окна.

По теории оно то долно туда записывать название, но фактически у меня не получается. Пишу так:
Result = SQAGetProperty("Caption=Кредит *", "Caption", sWinCaption)
msgbox "" & sWinCaption
При этом сообщение выводится пустое, а в Result записывается 0. sWinCaption типа Variant.
Подскажите что я не так делаю?

Result = SQAGetProperty("Caption={Кредит *}", "Caption", sWinCaption)

[aiga]

Result = SQAGetProperty("Caption=Кредит *", "Caption", sWinCaption)
Если Result=0, в sWinCaption запишется полное название окна.

По теории оно то долно туда записывать название, но фактически у меня не получается. Пишу так:
Result = SQAGetProperty("Caption=Кредит *", "Caption", sWinCaption)
msgbox "" & sWinCaption
При этом сообщение выводится пустое, а в Result записывается 0. sWinCaption типа Variant.
Подскажите что я не так делаю?

Result = SQAGetProperty("Caption={Кредит *}", "Caption", sWinCaption)

Спасибо! Все заработало. А можно объяснить как работают эти скобки? На будущее

[berzinc]

Result = SQAGetProperty("Caption={Кредит *}", "Caption", sWinCaption)

Спасибо! Все заработало. А можно объяснить как работают эти скобки? На будущее

Если использовать wildcard (* и ?) , то текст нужно ставить в скобки - {}