コード例 #1
0
 private void SetupWindowsDevice(StartupParameter parameter)
 {
     if (parameter.RHome == null)
     {
         parameter.start.rhome = ToNativeUnixPath(NativeUtility.GetRHomeEnvironmentVariable());
     }
     if (parameter.Home == null)
     {
         string home = Marshal.PtrToStringAnsi(Engine.GetFunction <getValue>("getRUser")());
         parameter.start.home = ToNativeUnixPath(home);
     }
     parameter.start.ReadConsole    = ReadConsole;
     parameter.start.WriteConsole   = WriteConsole;
     parameter.start.WriteConsoleEx = WriteConsoleEx;
     parameter.start.CallBack       = Callback;
     parameter.start.ShowMessage    = ShowMessage;
     parameter.start.YesNoCancel    = Ask;
     parameter.start.Busy           = Busy;
 }