quakeforge/ruamoko/gui/View.r
Bill Currie c460e3c979 Fix setBasePos to get the pos from a view.
This fixes Group for the Point/Size/Rect change.
2010-11-24 17:01:18 +09:00

69 lines
1.1 KiB
R

#include "gui/Size.h"
#include "gui/Point.h"
#include "gui/Rect.h"
#include "gui/View.h"
@implementation View
- (id) initWithComponents: (integer)x : (integer)y : (integer)w : (integer)h
{
self = [self init];
xpos = xabs = x;
ypos = yabs = y;
xlen = w;
ylen = h;
parent = NIL;
return self;
}
- (id) initWithOrigin: (Point)anOrigin size: (Size)aSize
{
return [self initWithComponents:anOrigin.x :anOrigin.y
:aSize.width :aSize.height];
}
- (id) initWithBounds: (Rect)aRect
{
return [self initWithOrigin:aRect.origin size:aRect.size];
}
- (id) canFocus: (integer) cf
{
flags |= 1;
return self;
}
- (integer) canFocus
{
return flags & 1;
}
- (Point) basePos
{
return makePoint (xabs, yabs);
}
- (void) setBasePos: (integer) x y: (integer) y
{
local Point point = {x, y};
xabs = xpos + x;
yabs = ypos + y;
}
- (void) setBasePosFromView: (View) view
{
Point pos = [view basePos];
xabs = xpos + pos.x;
yabs = ypos + pos.y;
}
-(void) draw
{
}
- (integer) keyEvent:(integer)key unicode:(integer)unicode down:(integer)down
{
return 0;
}
@end