Ver Mensaje Individual
  #5  
Antiguo 26-06-2014
Avatar de duilioisola
[duilioisola] duilioisola is offline
Miembro Premium
 
Registrado: ago 2007
Ubicación: Barcelona, España
Posts: 1.734
Reputación: 20
duilioisola Es un diamante en brutoduilioisola Es un diamante en brutoduilioisola Es un diamante en bruto
Con lo que te han explicado, supongo que sería algo así:
Código Delphi [-]
unit CosasParaWindows8;
...
implementatin
funtion DevuelveCosaEspecial(...);
begin
   if (EsWindows8) then
   begin
      ...
   end
   else
      Return -1; // error
end;

La otra opción es:

Código Delphi [-]
funtion EstoUtilizaAlgoDeWindows8(...);
begin
   ...
   if (EsWindows8) then
      VariableEspeciaal := DevuelveCosaEspecial(...)...
   else
      VariableEspeciaal := Obtengo_el_valor_de_otra_manera;   
   ...   
end;
Responder Con Cita