Shift Cursor Down an anderes Programm senden

[WladiD]

Ich kann es zwar nicht testen, aber das sollte mit SendInputHelper wie folgt funktionieren:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var
  SIH: TSendInputHelper;
begin
  SIH := TSendInputHelper.Create;
  try
    SIH.AddVirtualKey(VK_HOME);
    SIH.AddShift(ssShift, True, False);
    SIH.AddVirtualKey(VK_DOWN);
    SIH.AddVirtualKey(VK_DOWN);
    SIH.AddShift(ssShift, False, True);
    SIH.Flush;
  finally
    SIH.Free;
  end;
end;