Cuestión : ¿Hay reservar de todos modos algunos recursos en servidor de las ventanas de modo que se agote RDC todavía trabaje en la red de acontecimiento/CPU?

Funciono actual algunos usos intensivos de la misma red que tengan el potencial para utilizar absolutamente un pedacito de la CPU. ¿De vez en cuando, los usos golpean un *funk* y van sin control y traban para arriba la máquina al punto donde necesito una reinicialización dura recuperar el acceso a la máquina vía desktop.

Is allí de todos modos para ahorrar quizá el 10% de recursos específicamente de modo que pueda conseguir en la máquina y parar los usos que están funcionando incorrectamente? ¿el

ahora todos los usos funcionados como administrador, quizás necesito cambiarlos a una diversa cuenta y excepto el administrador explicar estos tipos de emergencias? No estoy apenas claro encendido independientemente de si hace que preservaría realmente algunos de los recursos de modo que pudiera abrirse una sesión pues las sugerencias de admin.

Any serían grandemente appreciated class= del

Respuesta : ¿Hay reservar de todos modos algunos recursos en servidor de las ventanas de modo que se agote RDC todavía trabaje en la red de acontecimiento/CPU?

Utilizo estas funciones para uso general:

Var MyVar: Variante;

comenzar
 MyVar: =… // hace una cierta inicialización

 ShowMessageFmt ('MyVar es del tipo %s y es valor es el “#13#10'% s”,
    [VariantTypeName (MyVar), VariantAsString (MyVar)]);
extremo;
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
23:
24:
25:
26:
27:
28:
29:
30:
31:
32:
33:
34:
35:
36:
37:
38:
39:
40:
41:
42:
43:
44:
45:
46:
47:
48:
49:
50:
51:
52:
53:
54:
55:
56:
57:
58:
59:
60:
61:
62:
63:
64:
65:
66:
67:
68:
69:
70:
71:
72:
73:
74:
75:
76:
77:
78:
79:
80:

función VariantBasicTypeName (varVar: Variante): Secuencia;
var
  basicType  : Número entero;
comenzar
  basicType: = VarType (varVar) y VarTypeMask;
  basicType del caso de
    varEmpty     : Resultado: = “vaciar”;
    varNull      : Resultado: = “falta de información”;
    varSmallInt  : Resultado: = “SmallInt”;
    varInteger   : Resultado: = “número entero”;
    varSingle    : Resultado: = “escoger”;
    varDouble    : Resultado: = “doble”;
    varCurrency  : Resultado: = “moneda”;
    varDate      : Resultado: = “fecha”;
    varOleStr    : Resultado: = “OleStr”;
    varDispatch  : Resultado: = “envío”;
    varError     : Resultado: = “error”;
    varBoolean   : Resultado: = “boleano”;
    varVariant   : Resultado: = “variante”;
    varUnknown   : Resultado: = “desconocido”;
    varByte      : Resultado: = “octeto”;
{$ifdef VER140}
    varWord      : Resultado: = “palabra”;
    varLongWord  : Resultado: = “LongWord”;
    varInt64     : Resultado: = “Int64”;
{$endif}    
    varStrArg    : Resultado: = “StrArg”;
    el varString    : Resultado: = “secuencia”;
    varAny       : Resultado: = “cualesquiera”;
    varTypeMask  : Resultado: = “TypeMask”;
    Resultado otro: = formato (“aduana (%d)”, [basicType]);
  extremo;
extremo;

función VariantTypeName (varVar: Variante): Secuencia;
var
  ExtType, i  : Número entero;
comenzar
 ExtType: = VarType (varVar);
 Resultado: =VariantBasicTypeName (varVar);
 si (ExtType y varArray) >0 entonces
  comenzar
   Resultado: =Result+'[';
   para i: =1 a VarArrayDimCount (varVar) resultan: =Result+Format (“%d,”, [VarArrayHighBound (varVar, i) - VarArrayLowBound (varVar, i) +1]);
   Resultado [longitud (resultado)]: = '] ';
  extremo;
 si (ExtType y varByRef) entonces resultan >0: = ' @ ' +Result;
extremo;

función VariantAsString (varVar: Variante): Secuencia;
Var
// L: TStringList;
 basicType, i, j, dévil: Número entero;
comenzar
 basicType: = VarType (varVar) y VarTypeMask;
 si VarIsArray (varVar) entonces
  comenzar
   Amortiguar: =VarArrayDimCount (varVar);
   si Dim>2 entonces
    comenzar
     Resultado: = ' arsenal '+VariantTypeName (varVar);
     Salida;
    extremo;
   Resultado: = ' [';
   si Dim=1
    Entonces para i: =VarArrayLowBound (varVar, 1) a VarArrayHighBound (varVar, 1) resulta: =Result+VariantAsString (varVar [i]) + ', '
    Para i: =VarArrayLowBound (varVar, 1) a VarArrayHighBound (varVar, 1) hacer
     comenzar
      Resultado: =Result+#13#10  [';
      para j: =VarArrayLowBound (varVar, 2) a VarArrayHighBound (varVar, 2) resulta: =Result+VariantAsString (varVar [i, j]) + ', ';
      Resultado [longitud (resultado)]: = '] ';
      Resultado: =Result+, ';
     extremo;
   Resultado [longitud (resultado)]: = '] ';
  extremo 
  comenzar
   si entonces resulta VarIsEmpty (varVar): = ' (vacío) '
   si entonces resulta VarIsNull (varVar): = ' (falta de información) 'resultado otro: =VarToStr (varVar);
  extremo;
extremo;
Otras soluciones  
 
programming4us programming4us