summaryrefslogtreecommitdiffhomepage
path: root/Public/Developer/System.Core/Sources/Window.c
blob: 2b5894024321fd151b55da1d059a0bc58b01b64f (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
/* -------------------------------------------

    Copyright Mahrouss Logic

------------------------------------------- */

#include <System.Core/Headers/Window.h>

/// invalid resource handle, they always start from 1.
#define kInvalidRsrc 0

/////////////////////////////////////////////////////////////////////////

CA_EXTERN_C WindowPort* WmCreateWindow(const CharacterTypeUTF8* name,
                                       const DWordType rsrcId) {
  CA_MUST_PASS(name);
  CA_MUST_PASS(rsrcId != kInvalidRsrc);

  return (WindowPort*)kApplicationObject->Invoke(
      kApplicationObject, kCallCreateWindow, name, rsrcId);
}

/////////////////////////////////////////////////////////////////////////

CA_EXTERN_C VoidType WmReleaseWindow(WindowPort* winPort) {
  CA_MUST_PASS(winPort);

  kApplicationObject->Invoke(kApplicationObject, kCallCloseWindow, winPort);
}

/////////////////////////////////////////////////////////////////////////

CA_EXTERN_C WindowPort* WmCreateMenu(const CharacterTypeUTF8* name,
                                     const DWordType rsrcId) {
  CA_MUST_PASS(name);
  CA_MUST_PASS(rsrcId != kInvalidRsrc);

  return (WindowPort*)kApplicationObject->Invoke(kApplicationObject,
                                                 kCallCreateMenu, name, rsrcId);
}

/////////////////////////////////////////////////////////////////////////

CA_EXTERN_C VoidType WmReleaseMenu(WindowPort* winPort) {
  CA_MUST_PASS(winPort);

  kApplicationObject->Invoke(kApplicationObject, kCallCloseMenu, winPort);
}

/////////////////////////////////////////////////////////////////////////

CA_EXTERN_C Int32Type WmMoveWindow(WindowPort* id, WmPoint where) {
  if (!id) {
    return kWmErrInvalidArg;
  }

  id->windowPosition.X = where.X;
  id->windowPosition.Y = where.Y;
  id->windowMoving = True;

  return 0;
}