Wie kann ich erkennen ob das OS >= Win XP ist.

[turboPASCAL]

Ja!

//Edit: Wenn du testest, kannst du auch mal ein Screenshot hier posten ?

[sh17]

Also ich habe folgendes ausgeführt und es geht:

Delphi-Quellcode:

procedure TForm1.CreateParams(var Params: TCreateParams);
const
  CS_DROPSHADOW = $00020000;
begin
  inherited;
  if IsWindowsXPAndUp then
    Params.WindowClass.Style := Params.WindowClass.Style or CS_DROPSHADOW;
end;

Zum Vergleich auch ein Bild ohne Schatten.

Übrigens hat die Jedi Code Library eine vollständige Funktion zum ermitteln der Windowsversion.

[3_of_8]

Zitat:

Zitat von Luckie

Zitat:

Zitat von 3_of_8

Irrelevant. Das ist die effizienteste Möglichkeit.

Sag ich mir auch immer wenn ich Auto fahre und keine Lust habe auf die Ampel zu gucken, Gas geben und druff. Wenns kracht wars eben rot. :?

Der Vergleich hinkt an zwei Stellen: Erstens kann man (fast) immer auf die Ampel schauen. Ob obige Funktion immer funktioniert, ist fraglich. Zweitens ist eine abgefangene Exception weniger schlimm als ein Auto, bei dem die Hälfte fehlt.

[MagicAndre1981]

Zitat:

Zitat von 3_of_8

Zweitens ist eine abgefangene Exception weniger schlimm als ein Auto, bei dem die Hälfte fehlt.

Das will ich überhört haben :roll: Exceptions kosten immer. Wenn man mit einer if-Abfrage das gleiche erreicht ist das immer besser.

P.S. übersetze dir mal das Wort Exception :wink:

André

[sakura]

Zitat:

Zitat von 3_of_8

Zweitens ist eine abgefangene Exception weniger schlimm ...

Zeugt von Unkenntnis des Verhaltens von Applikationen mit Exceptions. Speziell wenn man weitere Tools nutzt, um Exceptions (abgefangen oder nicht) zu protokollieren, dann werden solche "schmutzigen" Methoden schnell zu Logfüllern, die nur nerven. Da sollte man dann doch lieber etwas Zeit investieren und es ordentlich machen, zumal man dann mal eine vernünftige Routine hat, welche man immer nutzen kann. Schon mal MakeShadow in einem Hintergrunddienst versucht :roll:

...:cat:...

[Angel4585]

Vielleicht helfen die Schweizer ausnahmnsweise mal... Windowsversion ermitteln

[sh17]

Ich kann ja noch mal auf die Jedi Code Library mit einer vollständigen Funktion zum ermitteln der Windowsversion verweisen.

[Luckie]

Zu dem generieren Exception zusätzlichen Code für die CPU damit sie weiß, wohin sie zurückspringen kann und dieser ist nicht zu vernachlässigen. Deswegen, wie das Wort Exception schon sagt, dienen Exceptions dazu einen Ausnahmefehler zu behandeln, also, wenn das Programm in einen in definierten Zustand geraten könnte, bei dem die weitere saubere Ausführung nicht mehr gewährleistet ist.

Und der Vergleich hinkt nicht, denn ich kann hier auch immer abfragen, ob ein betriebssystem größer oder gleich Windows XP vorliegt.

[Angel4585]

GetVersion dann probiers mal damit