Перейти к содержимому

Публикации Rational-IT

4 публикаций создано Rational-IT (учитываются публикации только с 01 июля 2023)


#76174 Не распознает кнопки на Toolbare

Отправлено автор: Rational-IT 07 июня 2010 - 09:43 в IBM Rational - Functional Testing

Добрый вечер. На каком языке программирования написано ваше приложение.
можете вложить само приложение или хотя бы кусок с данным компонентом?


Язык программирования: C#, Microsoft Visual Studio 2008.
К сожалению выложить приложение и даже кусок его, нет возможности(((
Хоть в какую сторону гребсти, не подскажите? :help:



#76141 Не распознает кнопки на Toolbare

Отправлено автор: Rational-IT 04 июня 2010 - 13:44 в IBM Rational - Functional Testing

Добрый день!
Подскажи как быть или может быть кто то сталкивался с подобным.
Ситуация вот такая - имеется Toolbar на нем кнопки, но идентифицировать или узнать их свойства ни как не получается, пробовал Инспектора и VP, результат один идентифицирует только Toolbar.
При клике на выбранную кнопку RR записывает вот этот код, и идетифицирует кнопку по координатам.

GenericObject Click, "Type=Control;Name=_LowerContainerControl_Toolbars_Dock_Area_Top", "Coords=595,12"

Мне нужно как то идентифицировать и узнать свойства кнопок :help:
Помогите плиз



#74757 Как узнать версию файла?

Отправлено автор: Rational-IT 30 марта 2010 - 11:16 в IBM Rational - Functional Testing

Всем спасибо, разобрался!

Вот код, может кому и понадобиться :blush:

[codebox]Declare Sub CopyMem Lib "kernel32.dll" Alias "RtlMoveMemory" (Destination As Any, Source As Any, ByVal Length As Long)
Declare Function VerQueryValue Lib "Version.dll" Alias "VerQueryValueA" (pBlock As Any, ByVal lpSubBlock As String, lplpBuffer As Any, puLen As Long) As Long
Declare Function GetFileVersionInfoSize Lib "Version.dll" Alias "GetFileVersionInfoSizeA" (ByVal lptstrFilename As String, lpdwHandle As Long) As Long
Declare Function GetFileVersionInfo Lib "Version.dll" Alias "GetFileVersionInfoA" (ByVal lptstrFilename As String, ByVal dwhandle As Long, ByVal dwlen As Long, lpData As Any) As Long

Type VS_FIXEDFILEINFO
Signature As Long
StrucVersionl As Integer
StrucVersionh As Integer
FileVersionMSl As Integer
FileVersionMSh As Integer
FileVersionLSl As Integer
FileVersionLSh As Integer
ProductVersionMSl As Integer
ProductVersionMSh As Integer
ProductVersionLSl As Integer
ProductVersionLSh As Integer
FileFlagsMask As Long
FileFlags As Long
FileOS As Long
FileType As Long
FileSubtype As Long
FileDateMS As Long
FileDateLS As Long
End Type

Function FileVersionNo(sFileName As String) As String
Dim lFileHwnd As Long, lRet As Long, lBufferLen As Long, lplpBuffer As Long, lpuLen As Long
Dim abytBuffer() As Long
Dim tVerInfo As VS_FIXEDFILEINFO
Dim sBlock As String
Dim sStrucVer As String
Dim lentVerInfo As Long

lBufferLen = GetFileVersionInfoSize(sFileName, lFileHwnd)
If lBufferLen = 0 Then
Exit Function
End If

ReDim abytBuffer(lBufferLen)
Call GetFileVersionInfo(sFileName, 0&, lBufferLen, abytBuffer(0))
Call VerQueryValue(abytBuffer(0), "\", lplpBuffer, lpuLen)
Call CopyMem(tVerInfo, ByVal lplpBuffer, lentVerInfo)
lentVerInfo = 52
Call CopyMem(tVerInfo, ByVal lplpBuffer, lentVerInfo)

sStrucVer = Format$(tVerInfo.StrucVersionh) & "." & Format$(tVerInfo.StrucVersionl)

FileVersionNo = Format$(tVerInfo.FileVersionMSh) & "." & Format$(tVerInfo.FileVersionMSl, "00") & "."
End Function

Sub Main
msgbox FileVersionNo("C:\filename.exe")
End Sub
[/codebox]



#74722 Как узнать версию файла?

Отправлено автор: Rational-IT 29 марта 2010 - 06:13 в IBM Rational - Functional Testing

Добрый день!
Подскажи пожалуйста новичку, как программно через Rational-Robot узнать версию файла (exe, dll в основном) :blush: