| --- RCPTT testcase --- |
| Format-Version: 1.0 |
| Context-Type: org.eclipse.rcptt.ctx.ecl |
| Element-Name: ECL_EditProperties |
| Element-Type: context |
| Element-Version: 2.0 |
| Id: _editelementproperties |
| Runtime-Version: 2.0.2.201511100828 |
| Save-Time: 6/23/16 4:07 PM |
| |
| ------=_.ecl.context-718f04b4-ed39-33e3-af62-0995e4561998 |
| Content-Type: text/ecl |
| Entry-Name: .ecl.context |
| |
| // This function modify a element's property which use a combo-box. |
| proc "edit-combo" [val propertyTab] [val propertyLabel] [val propertyValue] [val pathNameElement] [val rootName]{ |
| |
| // Select the element in the Model Explorer. |
| with [get-view $modelExplorer| get-tree] { |
| get-item $rootName | click |
| get-item $pathNameElement | click |
| } |
| |
| // Set the property with the given value. |
| get-view $properties | get-property-tab $propertyTab | get-view $properties | get-combo -after [get-label $propertyLabel] | select $propertyValue |
| |
| |
| // Make sure the desired property has been modified. |
| get-view $properties | get-property-tab $propertyTab | get-view $properties | get-combo -after [get-label $propertyLabel] | get-property selection | equals $propertyValue | verify-true |
| } |
| |
| ------=_.ecl.context-718f04b4-ed39-33e3-af62-0995e4561998-- |