Como saber si es Vista o Xp

[Negriz]

Hola mi pregunta es como saber si mi programa es carriendo en Windwos Vista o xp.

Es por la cuestion de las rutas en Vista.

Gracias.

[[seoane]]

Empezado por Negriz

Es por la cuestion de las rutas en Vista.

¿Y que rutas estas buscando? Porque utilizando las funciones apropiadas, puedes obtener las rutas de la mayoría de los directorios del sistemas(carpeta de windows, temporal, perfil, archivos de programa, etc ...) independientemente del sistema operativo.

[Neftali [Germán.Estévez]]

Supongo que si usas cualquiera de las rutinas que hay para obtener la version del sistema, en cada caso te devolverá una diferente.

[Negriz]

Empezado por Neftali

Supongo que si usas cualquiera de las rutinas que hay para obtener la version del sistema, en cada caso te devolverá una diferente.

Gracias por la informacion, estaba en delphi asi que intente pasarlo a c++ builder pero me hay un error y no se cual es.

void __fastcall TmainForm::Button2Click(TObject *Sender)
{
TOSVersionInfo *x;
int majorVer, minorVer;
x->dwOSVersionInfoSize = sizeof( TOSVersionInfo ); //aca es donde me sale el error al momento de dar click.
if ( GetVersionEx( x ) )
{
    majorVer = x->dwMajorVersion;
    minorVer = x->dwMinorVersion;
    switch( x->dwPlatformId )
    {
       case VER_PLATFORM_WIN32_NT:
       if ( majorVer <= 4 ) ShowMessage("cOsWinNT");
       else
       if ( ( majorVer == 5 ) && ( minorVer == 0 ) ) ShowMessage("cOsWin2000");
       else
       if ( ( majorVer == 5) && ( minorVer == 1 ) ) ShowMessage("cOsWinXP");
       else
       ShowMessage("desconocido");
       break;

       case VER_PLATFORM_WIN32_WINDOWS:
       if ( ( majorVer == 4 ) && ( minorVer == 0 ) ) ShowMessage("cOsWin95");
       else
       if ( ( majorVer == 4 ) && ( minorVer == 10 ) )
       {
          if ( x->szCSDVersion[ 1 ] == 'A' ) ShowMessage("cOsWin98SE");
          else
          ShowMessage("cOsWin98");
       }
       else
       if ( ( majorVer == 4) && ( minorVer == 90 ) ) ShowMessage("cOsWinME");
       else ShowMessage("desconocido");
      break;

    }
}
else
{
   ShowMessage("desconocido");
}

}

cabe aclarar que no tengo conocimiento en delphi.
Gracias.

[[cHackAll]]

void __fastcall TForm1::Button1Click(TObject *Sender)
{
 switch ((char)GetVersion())
 {
  case 5: ShowMessage("eQuispe"); break;
  case 6: ShowMessage("Vista"); break;
  default: ShowMessage("Dinosaurio?");
 }
}

[Negriz]

Empezado por cHackAll

void __fastcall TForm1::Button1Click(TObject *Sender)
{
 switch ((char)GetVersion())
 {
  case 5: ShowMessage("eQuispe"); break;
  case 6: ShowMessage("Vista"); break;
  default: ShowMessage("Dinosaurio?");
 }
}

hey gracias voy a probar.
jejeje, "dinosaurio".
Gracias.

[Negriz]

Gracias va de maravilla, jejejetodavia me rio con lo de dinosaurio.

SAludos y gracias