Einzelnen Beitrag anzeigen

EWeiss
(Gast)

n/a Beiträge
 
#5

AW: Übergabe negativer werte

  Alt 11. Mär 2018, 06:30
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

Geändert von EWeiss (11. Mär 2018 um 06:33 Uhr)
  Mit Zitat antworten Zitat