Prblem mit Komponenteninstallation in Delphi XE2

[The_Unknown]

Hallo,

ich habe vorhin versucht, eine Komponente, die ich in Delphi 2010 immer problemlos nutzen konnte, in Delphi XE2 zu installieren. Leider bekomme ich dabei folgende Fehlermeldung:

Zitat:

Konstantenausdruck verletzt untere Grenzen

und zwar in folgender Funktion beim Aufruf von Perform():

Code:

procedure TXPMenuToolBar.CMMouseLeave(var Message: TMessage);
begin
  if NeedHotTrackFix and (Message.LParam <> 0) then
    Perform(TB_SETHOTITEM, -1, 0);
  inherited;
end;

Da ich länger nichts in Delphi gemacht habe, bin ich etwas ratlos. Vielleicht sieht ja jemand auf Anhieb, wo der Fehler ist?

Ciao The_Unknown

[himitsu]

Steht da auch noch was von "wird erweitert"?

Vergleich doch einfach mal die Werte von TB_SETHOTITEM und -1, mit den Wertebereichen der zugehörigen Parameter.

[Uwe Raabe]

Bei XE2 ist der zweite Parameter von Perform als WParam (=NativeUInt) deklariert. Damit fällt -1 aus dem erlaubten Range - obwohl Microsoft diesen Wert explizit zulässt. Hier schlägt also Pascal's strenge Typisierung zu, die man leider nur durch eien Cast umgehen kann:

 Perform(TB_SETHOTITEM, WParam(-1), 0);

[The_Unknown]

Das ist ja blöd. Naja, was solls, mit der Änderung funzte es dann Dankesehr!!

[himitsu]

Wobei Delphi nicht ganz so streng ist.
Das war ja "nur" eine Warnung.

Delphi macht dort einen impliziten Cast (wie bei AnsiString zu Strng/UnicodeString), welchen es nur "benennt", damit man sich nicht wundert.

Wenn aber noch sowas wie "wird erweitert" mit in der Meldung auftaucht, dann sollte man noch besser aufpassen, da dort nicht nur gecastet, sondern auch noch der Wert verändert wird.

[Uwe Raabe]

Zitat von himitsu:

Wobei Delphi nicht ganz so streng ist.
Das war ja "nur" eine Warnung.

[DCC Fehler] Unit127.pas(55): E1012 Konstantenausdruck verletzt untere Grenzen

Das ist keine Warnung - das ist ein Fehler und es kompiliert nicht!

[The_Unknown]

Jup, kann ich bestätigen, es war ein Fehler.

[himitsu]

Hmmm?
Gut, ich hatte letztens ein Problem mit der oberen Grenze, aber dort war das nur eine Warnung und ansonsten funktionierte alles wie gewohnt.