[crowdy]

I want to handle WebPreview with macro.
I think I can access WebPreview Control Handle using Perl.
but I don’t know what to do next.
any idea?

use Win32::GUI;
use Win32::API;
my $hEmEditor = Win32::GUI::FindWindow(“EmEditorMainFrame3”, “”);

my $window = Win32::GUI::GetWindow($hEmEditor, GW_CHILD);
my $result;

my $hWebPreview;

while($window) {
#$titleName = Win32::GUI::Text($window);
$className = Win32::GUI::GetClassName($window);
if ($className eq “EEPaneContainer”) {
my $EEPaneContainerChildWindow = Win32::GUI::GetWindow($window, GW_CHILD);
while($EEPaneContainerChildWindow) {
$className = Win32::GUI::GetClassName($EEPaneContainerChildWindow);
if ($className eq “EmEditorWebPreview”) {
$hWebPreview = $EEPaneContainerChildWindow;
last;
}
$EEPaneContainerChildWindow = Win32::GUI::GetWindow($EEPaneContainerChildWindow, GW_HWNDNEXT);
}

}
print(“$classNamen”);
$window = Win32::GUI::GetWindow($window, GW_HWNDNEXT);
}

print “WebPreview found.” if $hWebPreview;

crowdy

[Author]

Posts