Morgan
13 years agoFrequent Contributor
Selecting combo box item
I'm trying to use the wItemList property to access a specific dropdown item but am not having a lot of luck. There's something that this novice is missing. :) When I run the script, the message that posts to the blog is blank. I was using the directions listed here : http://support.smartbear.com/viewarticle/32563/
Where should I specify the item that I want to click by name?
Thanks!
Morgan
----
procedure SelectClass;
var p,frmRREWiz, item, cboRREInsClassOpts, RREInsClass, del: OleVariant;
var i: integer;
begin
p := Sys.Process(Name);
frmRREWiz := p.VCLObject('frmRRETemplate');
frmRREWiz.Activate;
Delay(STD_wait);
cboRREInsClassOpts := p.Window('TJvPopupDataList', '', 1);
// Obtain the list of items and the current delimiter
RREInsClass := cboRREInsClassOpts.wItemList;
del := cboRREInsClassOpts.wListSeparator;
aqString.ListSeparator := del;
For i := 0 to cboRREInsClassOpts.wItemCount-1 do
item := aqString.GetListItem(RREInsClass, i);
Log.Message(item);
Where should I specify the item that I want to click by name?
Thanks!
Morgan
----
procedure SelectClass;
var p,frmRREWiz, item, cboRREInsClassOpts, RREInsClass, del: OleVariant;
var i: integer;
begin
p := Sys.Process(Name);
frmRREWiz := p.VCLObject('frmRRETemplate');
frmRREWiz.Activate;
Delay(STD_wait);
cboRREInsClassOpts := p.Window('TJvPopupDataList', '', 1);
// Obtain the list of items and the current delimiter
RREInsClass := cboRREInsClassOpts.wItemList;
del := cboRREInsClassOpts.wListSeparator;
aqString.ListSeparator := del;
For i := 0 to cboRREInsClassOpts.wItemCount-1 do
item := aqString.GetListItem(RREInsClass, i);
Log.Message(item);