Übergabe negativer werte

[EWeiss]

Ich möchte negative werte übergeben bsp -1.

const
ID_RECT = -1;
....
DlgItemID := ID_RECT;

Wenn ich Integer dafür nehme dann bekomme ich einen Bereichfehler (ERangeError)
CreateWindowEx erwartet für den Parameter HMENU = LongWord;

Und LongWord kann nun mal nicht als negativer wert übergeben werden auch dann nicht wenn ich DlgItemID als integer definiere.
Hmmm.. Wie geht es trotzdem ? Ohne die Bereichsprüfung ausstellen zu müssen.

gruss

[himitsu]

Delphi-Quellcode:

const
  ID_RECT = LongWord(-1);  // oder $FFFFFFFF;

[EWeiss]

Zitat von himitsu:

Delphi-Quellcode:

const
  ID_RECT = LongWord(-1);  // oder $FFFFFFFF;

Habe es jetzt nicht getestet.
Wäre es dann nicht besser DlgItemID direkt als LongWord zu definieren? Bin da ja flexible.

Edit:
Ok habe es selbst beantwortet.
SpriteCtrl_01.DlgItemID := IDC_SPR_1;

Zitat:

[DCC Fehler] uControls.pas(1106): E1012 Konstantenausdruck verletzt untere Grenzen

Mit deiner Änderung geht's aber nur mit LongWord vor der Konstante.
Frustrierend mal wieder.

Warum kann man die Konstante nicht ganz normal übergeben als Integer der geht doch von −2.147.483.648 bis 2.147.483.647

gruss

[himitsu]

Mein, ein Autocast von unbekanntem geht da nicht so einfach, denn der Compiler weiß ja, dass es Progleme geben könnte.

Aber ja, der Cast geht auch bei Zuweisung an DlgItemID.

Delphi-Quellcode:

DlgItemID := LongWord(ID_RECT);
// oder
Integer(DlgItemID) := ID_RECT;

[EWeiss]

sorry verstehe ich nicht.
Nochmal zu meinem Verständnis.

Delphi-Quellcode:

const
  IDC_SPR_1 = -1;

Delphi-Quellcode:

private
    function GetDlgItemID: Integer;
    procedure SetDlgItemID(const Value: Integer);
public
    property DlgItemID: Integer read GetDlgItemID write SetDlgItemID;

der Aufruf
  SpriteCtrl_01.DlgItemID := IDC_SPR_1;

Und Auswerten

Delphi-Quellcode:

    FHContainer := CreateWindowEx(DwExStyle, SKCONTAINER, '', DwStyle, Left,
      Top, Width, Height, ParentHandle, HMENU(DlgItemID), HInstance, nil);

HMENU ist ein cast von Integer zu LongWord.

Warum verursacht das dann immer noch einen ERangeError.
Meinem Verständnis nach dürfte das nicht sein.

gruss

[KodeZwerg]

Negative -1 bzw #65535 DlgItemId's, sind das nicht nur "nicht-benutzbare-Objekte" ?
Ich verwende diese Werte nur bei Sachen die ich im Code nicht anfassen brauch, nur per .rh/.res initialisiere.
Beispiel, viele Panels mit jeweils einem Knopf drauf, die Panels bekommen alle -1/65535 die Knöpfe reguläre einmalige nummern.

[mensch72]

..."HMENU ist ein cast von Integer zu LongWord.
Warum verursacht das dann immer noch einen ERangeError"...

Mein Erklärungsversuch:
- LongWord-Werte sind rein positiv und stets vorzeichenlos
- -1 ist mathematisch offensichtlich negativ und verletzt die untere Grenze(0) eines xxxxWord
- da Pascal vor dem Cast offensichtlich nach mathematischen Regeln arbeitet, macht ist das so erklärbar
- zufällig ist ab -1 binär in 32Bit z.B. in HEX-Darstellung $FFFFFFFF
=> WordZuweisungen von "-1" funktionieren ganz ohne Cast sauber, wenn man sich für solche Fälle eine ein 2. Konstante mit $FFFFFFFF definiert und nutzt
-> $FFFFFFFF würde aber wiederum bei Integer-Zuweisungen nun den oberen Bereich verletzt, weil 4,xMrd > den max 2,xMrd

[himitsu]

Zuweisung von und zu Integer/LongInt und Cardinal/LongWord muß bei aktiver Bereichsprüfung fehl schlagen, denn -1 liegt nunmal nicht im Bereich von 0 bis 4.294.967.295

Außerdem ist diese Konstante auch noch Typlos, also -1 ist nicht unbedingt $FFFFFFFF es könnte auch $FF, $FFFF, $FFFFFFFFFFFFFFFF oder sonstwas sein.

[EWeiss]

Zitat:

muß bei aktiver Bereichsprüfung fehl schlagen, denn -1 liegt nunmal nicht im Bereich von 0 bis 4.294.967.295

Das ist mir bewusst

Aber auch so übergebe ich LongWord einen negativen Bereich

Delphi-Quellcode:

const
   ID_RECT = LongWord(-1); // oder $FFFFFFFF;

Irgendwie unlogisch.

LongWord(-1);
das selbe wie
HMENU(-1) denn HMENU ist definiert als LongWord.
also wenn DlgItemId als LongWord definiert ist\wäre.

Zitat:

Negative -1 bzw #65535 DlgItemId's, sind das nicht nur "nicht-benutzbare-Objekte" ?

Genau deshalb verwende ich sie als DialogItems für das erstellen von Fenstern.
und ab -10000 > -9999 für Sprite Objekte.
damit ich nicht in Kollision mit vielleicht schon vergebenen ID's komme.

gruss

[himitsu]

Nur dass du dort "explizit" castest und und somit sagst.
"ich weiß was ich tu und es ist schon richtig so"