首页 > 代码库 > Hydra

Hydra

 

使插件响应 Shortcut。

uses  uHYPluginHelpers, uHYCrossPlatformInterfaces;type  TYourRegularForm = class(TForm)  [...]  private    Helper: IHYCrossPlatformVisualPluginEx;  public    function WantChildKey(Child: TControl; var Message: TMessage): Boolean; override;  end;procedure TYourRegularForm.FormCreate(Sender: TObject);begin  Helper := THYControlAsVisualPlugin.Create(self);end;function TYourRegularForm.WantChildKey(Child: TControl; var Message: TMessage): Boolean;begin  //result := Helper.HandleShortCuts(Message.WParam);
if Message.Msg = WM_KEYDOWN then result := Helper.HandleShortCuts(Message.WParam) else result := false;
end;

 编译 Hydra.net

You need to create that key or to remove the corresponding line from the AssemblyInfo.pas file.

Key generation commands are

sn -k RemObjectsSoftware
sn -i RemObjectsSoftware RemObjectsSoftware

 

Fixed Memory Leak with FMX ModuleManager 

https://talk.remobjects.com/t/memory-leak-with-fmx-modulemanager/9911/3

pls update uHYModuleManager_FMX.pas as:

 

constructor THYFMXModuleManager.Create(AOwner: TComponent);begin  inherited;  fPluginRefs := TList.Create;end;

 

Hydra