Jump to content

Access Item in a Menu


Recommended Posts

Hello,

I want to click on an Item in a file Menu. But there is no possibility to use ALT or CTRL.

If I use "AutoIt v3 Window Info" when I want to see the control item menu, the menu pool down

as soon as I put the mouse on.

I work with Delphi and I want to read in VirtualDub the number of frame of an AVI in the menu:

video/select range then length in frames.

Thank's

Link to comment
Share on other sites

Hello,

I want to click on an Item in a file Menu. But there is no possibility to use ALT or CTRL.

If I use "AutoIt v3 Window Info" when I want to see the control item menu, the menu pool down

as soon as I put the mouse on.

I work with Delphi and I want to read in VirtualDub the number of frame of an AVI in the menu:

video/select range then length in frames.

Thank's

I think I have found a solution!

procedure virtualdub_info_file(var hWnd: string; var frame_per_sec: single; var nb_tot_frame: longint);

var

s : string;

err : integer;

begin

oAutoIt.WinActivate('[HANDLE:' + hWnd + ']');

oAutoIt.Send('^r');

s := oAutoIt.ControlGetText('Video frame rate control', '', '[CLASS:Button; INSTANCE:2]');

s := getchamp(s, 4);

frame_per_sec := strtofloat(s);

Mainform.memo.lines.add(s);

oAutoIt.ControlClick('Video frame rate control', '', '[CLASS:Button; INSTANCE:12]');

err := oAutoIt.WinMenuSelectItem('VirtualDub 1.9.8', '', '&Video', 'Select Range...');

mainform.memo.lines.add('Err :' + inttostr(err));

oAutoIt.WinWaitActive('Select range of video to process', 'stream');

s := oAutoIt.ControlGetText('Select range of video to process', '', '[CLASS:Edit; INSTANCE:4]');

Mainform.memo.lines.add('Nb. frames :' + s);

oAutoIt.ControlClick('Select range of video to process', '', '[CLASS:Button; INSTANCE:1]');

nb_tot_frame := strToInt(s);

end;

Link to comment
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
 Share

  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...