Prompt ask password when exit

Hi i just wonder if possible i can prompt ask password when exit the exe? I’m actually preventing someone that use a public device to close it .

Copy/paste this code into your UserMain script (see help about how to do so):

function OnWindowCloseQuery(WindowName: String): Boolean;
var
 S: String;
begin                           
 // Occurs when the user wants to close the window.
 // Note: set to False if you do not want to close the window.
 S := InputBox("To exit, please enter the password", "Security", "");
 Result := S = "OurPassword"; // replace OurPassword by what you want. Do not remove quotes.
end;