如何在perl中选择列表项

Question

我使用了下面的代码来选择窗口列表中的行。

@edit = FindWindowLike( $_, undef, "^SysListView32");
if( !@edit )
{
     die "Cannot find window handle for Edit control\n";
}
else
{
  printf( "Edit window handle is %x\n", $edit[ 0 ] );
}   
SelListViewItemText( $edit[ 0 ], "Fax",1);

它产生的输出如下：

我希望我的输出如下：

请帮我说一下我在代码中要做的所有更改，以获得第二个截图的输出。

Answer 1

在上面提到的代码中，它的选择使项目具有灰色背景。我必须是蓝色它应该是活跃的（专注）所以这样做： 加上这个：

SetFocus($edit[ 0 ]);

之前：

SelListViewItemText( $edit[ 0 ], "Fax",1);