How to send Shift-F7

[zdanev]

I'm using Attachmate Extra 6.5 from Delphi thru OLE. I need to send Shift-F7 to the mainframe. To send just F7 I would write Screen.SendKeys('<PF7>'); What would the correct syntax be for Shift-F7.

Thanks,

ZD

 

[zdanev]

I figured it out.

If someone else has similar problem: to send Shift-F1 send F13, for Shift-F2 send F14 and so on.

ZD

 

[calculus]

The usual way is:
screen.sendkeys (&quot;+<Pf7>&quot

+ is shift
^ is control
% is Alt

This works acording to the documentation for 6.7, but doesn't work on my system.

I'd go with the previous solution as well - Pf19.

 

[celmo]

how to create an OLE automation Server
Attachmate Extra 6.5 from Delphi 7
thanks, celmo.

You can contact celmo at celmo_santos@hotmail.com.

 

[celmo]

Sorry, as my English is not very good, I do not know if I was clearly, therefore I am redispatching the question.
&quot;How to create in delphi 7 an OLE automation Server attachmate Extra 6.5&quot;
thanks, celmo.

 

[CableGuy2004]

What you can do is the following:

MyScreen.SendKeys(&quot;F7&quot
Call HoldOn

 

[steveycarr]

I'm sure you can send f19

 

[heldkoen]

I am new to attachmate.
I want to connect to attachmate from a delphi application.
Has anybody an example code how this is done and what components I need.

thanks

 

[zdanev]

First import the type library.

uses
EXTRA_TLB;
var
ExtraSessionName: String;
Sessions: ExtraSessions;
Session: ExtraSession;
Scr: Screen;
V: OleVariant;
begin
// initialization
Sessions := CoExtraSessions.Create;
Session := Sessions.Open(ExtraSessionName) as ExtraSession;
Scr := Session.Screen as Screen;
Session.Visible := 1;
Session.KeyboardLocked := 0; // 0-unlocked 1-locked
Session.WindowState := 1;

// to send a string
Scr.SendKeys(S);

// to read from the screen
S := Scr.GetString(Row, Col, Length, V);

// to close the session
Session.Set_Connected(0);
Session.Close;
end;

 

[Qwazerty]

Hi
In first, sorry for my english
Your post is very interesting for me, because I would like to use Extra with Delphi. But Delphi don't know &quot;Extrasessions&quot; , &quot;Extrasession&quot;, &quot;CoExtraSessions&quot;,...
I do anything wrong, but i not understand where ?
I declared Extra.tlb, but there values doesn't exist in this file.
Note, I haven't Etra! on my pc...
if your speak french it's ok for me Lol
Bye and thanks for your help

 

[zdanev]

your english is better than my french so lets stick to that

first thing you need to do is to install Extra on your development machine.

after that import the type library (from the Compoments menu, import ActiveX)

now you'll be able to compile/execute the code above.

ZD

 

[Qwazerty]

Thanks,
So I will see with my job's technical staff, if they can give me Extra! installation pack ... it isn't sure.
Bye and thank you for your help.

 

[Qwazerty]

Hello,
I have juste download the free Extra version 7.11 on attachmate.com !!
It's work better than I hoped...
If I have some probleme I will come on this very good site.
Thanks all.

 

[Qwazerty]

Hello,
I'am so disappointed...
At my job we have Extra6...
When I lauch my programm, it doesn't work (Classe not declared), certenly because I have Extra7 on my personnal PC.
How doing to make compatible my prog whith a last version of Extra ??
Bye