From a46543d29e1a3770f853ca9976bd44429f8d343b Mon Sep 17 00:00:00 2001 From: Olly Date: Fri, 15 Sep 2023 22:41:29 +0100 Subject: [PATCH] Fix TSimbaTarget.SetPlugin --- Source/simba.target.pas | 15 +++++++++++++++ 1 file changed, 15 insertions(+) diff --git a/Source/simba.target.pas b/Source/simba.target.pas index 5d7219e88..177838fea 100644 --- a/Source/simba.target.pas +++ b/Source/simba.target.pas @@ -364,6 +364,21 @@ procedure TSimbaTarget.SetPlugin(FileName, Args: String); ChangeTarget(ETargetType.PLUGIN); FTargetPlugin := LoadPluginTarget(FileName, Args); + + FMethods.KeyDown := @PluginTarget_KeyDown; + FMethods.KeyUp := @PluginTarget_KeyUp; + FMethods.KeySend := @PluginTarget_KeySend; + FMethods.KeyPressed := @PluginTarget_KeyPressed; + + FMethods.MouseTeleport := @PluginTarget_MouseTeleport; + FMethods.MousePosition := @PluginTarget_MousePosition; + FMethods.MousePressed := @PluginTarget_MousePressed; + FMethods.MouseDown := @PluginTarget_MouseDown; + FMethods.MouseUp := @PluginTarget_MouseUp; + FMethods.MouseScroll := @PluginTarget_MouseScroll; + + FMethods.GetDimensions := @PluginTarget_GetDimensions; + FMethods.GetImageData := @PluginTarget_GetImageData; end; procedure TSimbaTarget.SetPlugin(FileName, Args: String; out DebugImage: TSimbaExternalImage);