Delphi-PRAXiS
Seite 1 von 2  1 2      

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Programmieren allgemein (https://www.delphipraxis.net/40-programmieren-allgemein/)
-   -   Feststellen welche Windows-Version verwendet wird (https://www.delphipraxis.net/28806-feststellen-welche-windows-version-verwendet-wird.html)

Helmi 30. Aug 2004 15:44


Feststellen welche Windows-Version verwendet wird
 
Hallo,

wie kann man in einem Quellcode feststellen welche Windows-Version verwendet wird?

ich hab mal in einem Quellcode folgende Zeilen gefunden:

Code:
  {$IFDEF WIN32}

  {$ELSE}

  {$ENDIF}
Ich würd aber gerne Win2000 und WinXP mit dem oben stehenenden Code ausfindig machen.
Sprich ich möchte bei Win2000 und XP was anderes tun, als bei den anderen Win-Versionen.


Was muss ich dazu machen?


mfg
Helmi

Luckie 30. Aug 2004 15:45

Re: Feststellen welche Windows-Version verwendet wird
 
Willst du Code zur bestimmten Laufzeit nur ausführen oder soll das beim Compilieren passieren? Wie man die Windows version bekommt, sthet in der Code-Lib.

Helmi 30. Aug 2004 15:48

Re: Feststellen welche Windows-Version verwendet wird
 
Ich will während der Laufzeit feststellen ob Win2000 oder WinXP und dann was anderes tun als bei den anderen Win-Versionen

Luckie 30. Aug 2004 15:48

Re: Feststellen welche Windows-Version verwendet wird
 
Na dann, fröhliches Suchen ind er Code-Lib.

alcaeus 30. Aug 2004 15:50

Re: Feststellen welche Windows-Version verwendet wird
 
Hi Helmi!

Ich will mal nicht so sein:
http://www.delphipraxis.net/internal...ect.php?t=7463

Greetz
alcaeus

Portabella 30. Aug 2004 15:51

Re: Feststellen welche Windows-Version verwendet wird
 
Hi,

diese Frage habe ich mir heute auch schon gestellt. Hier ist mein Code:

Delphi-Quellcode:
function TForm1.GetWindowsVersion: string;
var
  reg: TRegistry;
  version: String;
begin
  reg := TRegistry.Create;
  try
    reg.RootKey := HKEY_LOCAL_MACHINE;
    reg.OpenKey('SOFTWARE\Microsoft\Windows NT\CurrentVersion', False);

    version:=reg.ReadString('CurrentVersion');
    Result := version;
  finally
    reg.Free;
  end;
end;
Ich hoffe der Code hilft dir weiter,

Gruß, Diana

[edit=sakura] [delphi]Tags Mfg, sakura[/edit]

Helmi 30. Aug 2004 15:54

Re: Feststellen welche Windows-Version verwendet wird
 
danke alcaeus

es gibt halt doch noch wahre Freunde :zwinker:

aber gibt es da keine einfachere Sache?


Irgengwie so etwa: {$IFDEF WIN2000} oder {$IFDEF WINXP}
oder so oder irgendwie
:-)

mfg
Helmi

alcaeus 30. Aug 2004 15:57

Re: Feststellen welche Windows-Version verwendet wird
 
Hi Helmi!

Compilerschalter werden beim Kompiliervorgang verwendet, das heißt dein Betriebssystem wird verwendet, und nicht das des Endbenutzers. So wird nur der Code fürs entsprechende Betriebssystem kompiliert, und das Prinzip ist eigentlich für die wenigsten Zwecke geeignet.

[OT]
Ich würde auch Luckie als wahren Freund bezeichnen, aber wenn er immer bei jedem Beitrag Links raussuchen müsste, würde er den ganzen Tag nur die Suchfunktion der DP beanspruchen. :zwinker:
[/OT]

Greetz
alcaeus

MathiasSimmack 30. Aug 2004 16:03

Re: Feststellen welche Windows-Version verwendet wird
 
Da mir alcaeus die Argumente quasi aus dem Mund nahm (gut, dass es die Vorschau gibt), beschränke ich mich auf diese Empfehlung: klick. Meine Suchbegriffe waren Windows version mit der Eingrenzung auf Bauarbeiter NicoDE als Autor. :mrgreen:

@Portabella: Netter Versuch, aber unter 95, 98 und ME wirst du im Schlüssel "Windows NT" vermutlich nicht viel finden. ;)

Assarbad 30. Aug 2004 23:48

Re: Feststellen welche Windows-Version verwendet wird
 
Zitat:

Zitat von MathiasSimmack
Da mir alcaeus die Argumente quasi aus dem Mund nahm (gut, dass es die Vorschau gibt), beschränke ich mich auf diese Empfehlung: klick. Meine Suchbegriffe waren Windows version mit der Eingrenzung auf Bauarbeiter NicoDE als Autor. :mrgreen:

*schluchz* immer dieser N.I.C.O. ... irgendwann fällt mir noch ein was dieses Akronym bedeutet :mrgreen:

Zitat:

Zitat von MathiasSimmack
@Portabella: Netter Versuch, aber unter 95, 98 und ME wirst du im Schlüssel "Windows NT" vermutlich nicht viel finden. ;)

Gewagte These das ...

Am Schluß möchte ich den Anwesenden noch das PSDK als Lektüre ans Herz legen. Dort steht alles hervorragend vollständig und einfach (sogar mit Soße) beschrieben.


Alle Zeitangaben in WEZ +1. Es ist jetzt 16:20 Uhr.
Seite 1 von 2  1 2      

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz