From mboxrd@z Thu Jan  1 00:00:00 1970
X-Spam-Checker-Version: SpamAssassin 3.4.4 (2020-01-24) on polar.synack.me
X-Spam-Level: 
X-Spam-Status: No, score=-1.3 required=5.0 tests=BAYES_00,INVALID_MSGID
	autolearn=no autolearn_force=no version=3.4.4
X-Google-Language: ENGLISH,ASCII-7-bit
X-Google-Thread: 103376,f2238654b1316cee
X-Google-Attributes: gid103376,public
From: tmoran@bix.com
Subject: Re: Graphics in Ada
Date: 1998/04/11
Message-ID: <6go8he$92i@lotho.delphi.com>#1/1
X-Deja-AN: 343116563
Organization: Delphi Internet Services <http://www.delphi.com/>
Newsgroups: comp.lang.ada
Date: 1998-04-11T00:00:00+00:00
List-Id: <comp.lang.ada>


>things as draw a line and draw a circle for instance? I'm interested in
If you are using Claw to run with MS Windows you might choose:
    procedure Line_to(Easel : in Claw.Root_Canvas_Type'Class;
                      Pos   : in Claw.Point_Type);
        -- Draws a line from the current position to Pos with the
        -- current pen.
        -- Raises:
        --      Not_Valid_Error if the canvas object is not valid.
        --      Windows_Error if Windows generates an error.

    procedure Ellipse(Easel : in Claw.Root_Canvas_Type'Class;
                      Rect  : in Claw.Rectangle_Type);
        -- Draws an Ellipse inside of Rect with the current pen,
        -- and filling the interior with the current brush.
        -- Raises:
        --      Not_Valid_Error if the canvas object is not valid.
        --      Windows_Error if Windows generates an error.
If you are running the control systems of a 737 and trying to use
it as a skywriter, I suppose you need to set the control surfaces
differently for straight lines, loops, and circles, but I don't
know the Ada calls in that environment.  (Perhaps you could wait
for Windows CE controlled airliners and then use Claw? #.#)
  What environment did you have in mind?