fix(developer): refresh web host on compile

This commit is contained in:
Marc Durdin 2022-01-19 11:00:44 +11:00
parent 24063ad931
commit 4dd5904bca
3 changed files with 10 additions and 0 deletions

View file

@ -131,6 +131,9 @@ begin
frmMessages.DoShowForm;
Result := ProjectFile.CompileKeyboard;
if Result and TServerDebugAPI.IsKeyboardRegistered(ProjectFile.TargetFileName) then
TestKeymanWeb(True);
end;
function TkmnProjectFileUI.FontDialog(FSilent: Boolean): Boolean; // I4057

View file

@ -75,6 +75,9 @@ begin
if not modActionsMain.actFileSave.Execute then Exit;
Result := ProjectFile.CompilePackage(GetPack, FSilent);
if Result and TServerDebugAPI.IsPackageRegistered(ProjectFile.TargetFileName) then
TestPackageOnline;
end;
function TkpsProjectFileUI.CompilePackageInstaller(FSilent: Boolean): Boolean;

View file

@ -98,6 +98,10 @@ begin
frmMessages.DoShowForm;
Result := ProjectFile.CompileModel;
if Result and TServerDebugAPI.IsModelRegistered(ProjectFile.TargetFileName) then
TestKeymanWeb(True);
end;
function TmodelTsProjectFileUI.GetDebug: Boolean;