SRL Archive - OSR Help

Can this be done? If so, how?

var
  B : TBox;
begin
  WriteLn([B.x1, B.y1, B.x2, B.y2]);
end.

Or are you talking on painting it on a debug canvas?

I meant painting in on the debug canvas, sorry.

WriteLn(b) is enough ;)

From: bbri06
I meant painting in on the debug canvas, sorry.

{.include SRL\SRL.scar}
{.include SRL\SRL\Misc\Debug.scar}

const
  X1 = 0;
  Y1 = 0;
  X2 = 100;
  Y2 = 100;

var
  ATPA: T2DPointArray;

begin
  SetLength(ATPA, 1);
  SetLength(ATPA[0], 2);
  ATPA[0][0] := Point(X1, Y1);
  ATPA[0][1] := Point(X2, Y2);
  DebugATPABounds(ATPA);
end.

Perfect, thanks IceFire.

Edit: It seems I can't give you any more rep right now :(