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.9 required=5.0 tests=BAYES_00,FREEMAIL_FROM autolearn=ham autolearn_force=no version=3.4.4 X-Google-Thread: 103376,a0d5afcf8d13378c X-Google-Attributes: gid103376,domainid0,public,usenet X-Google-Language: ENGLISH,ASCII Path: g2news1.google.com!postnews.google.com!o4g2000pra.googlegroups.com!not-for-mail From: Petter Newsgroups: comp.lang.ada Subject: Re: How to include Win_IO for my project? Date: Mon, 19 Jan 2009 06:14:51 -0800 (PST) Organization: http://groups.google.com Message-ID: References: <3b999419-b833-4a7c-82ce-af0d721421a2@r37g2000prr.googlegroups.com> NNTP-Posting-Host: 148.2.192.140 Mime-Version: 1.0 Content-Type: text/plain; charset=ISO-8859-1 Content-Transfer-Encoding: quoted-printable X-Trace: posting.google.com 1232374492 28230 127.0.0.1 (19 Jan 2009 14:14:52 GMT) X-Complaints-To: groups-abuse@google.com NNTP-Posting-Date: Mon, 19 Jan 2009 14:14:52 +0000 (UTC) Complaints-To: groups-abuse@google.com Injection-Info: o4g2000pra.googlegroups.com; posting-host=148.2.192.140; posting-account=ACEctQoAAAD3d42JSpp6_fpg88BhdFDo User-Agent: G2/1.0 X-HTTP-UserAgent: Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; SV1; .NET CLR 1.1.4322; InfoPath.1),gzip(gfe),gzip(gfe) Xref: g2news1.google.com comp.lang.ada:3440 Date: 2009-01-19T06:14:51-08:00 List-Id: On 19 Jan, 14:06, tolkamp wrote: > On 18 jan, 23:48, a...@anon.org (anon) wrote: > > > > > > > -- =A0Not sure. =A0You might try the following : > > -- > > -- From the examples at "http://www.ctr.unican.es/Win_IO" the home of > > -- Win_IO. > > -- > > > with Plot_Windows; use Plot_Windows; > > with Ada.Text_IO; use Ada.Text_IO; > > with Ada.Numerics.Elementary_Functions; > > use Ada.Numerics.Elementary_Functions; > > > procedure Test_Plot_Window is > > =A0 =A0Plot : Plot_Window_Type:=3DPlot_Window("Test Plot Window","Degre= es", > > =A0 =A0 =A0 =A0 =A0 =A0 =A0 =A0 =A0 =A0 =A0 =A0 =A0 =A0 =A0 =A0 =A0 =A0= =A0 =A0 "Value"); > > =A0 =A0X : Float; > > begin > > =A0 =A0-- Sin Graph > > =A0 =A0Set_Color(Plot,Blue); > > =A0 =A0Set_Symbol(Plot,Circle); > > =A0 =A0Set_Lines(Plot,True); > > =A0 =A0Set_Graph_Title(Plot,"Sin(x)"); > > =A0 =A0X:=3D0.0; > > =A0 =A0for I in 1..100 loop > > =A0 =A0 =A0 Add_Point(Plot,X,Sin(X,360.0)); > > =A0 =A0 =A0 X:=3DX+10.0; > > =A0 =A0end loop; > > > =A0 =A0-- Cos Graph > > =A0 =A0New_Graph(Plot); > > =A0 =A0Set_Color(Plot,Red); > > =A0 =A0Set_Symbol(Plot,Up_Triangle); > > =A0 =A0Set_Lines(Plot,False); > > =A0 =A0Set_Graph_Title(Plot,"Cos(x)"); > > =A0 =A0X:=3D0.0; > > =A0 =A0for I in 1..100 loop > > =A0 =A0 =A0 Add_Point(Plot,X,Cos(X,360.0)); > > =A0 =A0 =A0 X:=3DX+10.0; > > =A0 =A0end loop; > > > =A0 =A0-- Paint the plot > > =A0 =A0Wait(Plot); > > =A0 =A0Put_Line("Test Completed"); > > end Test_Plot_Window; > > > In ,= tolkamp writes: > > > >On 17 jan, 20:08, a...@anon.org (anon) wrote: > > >> The current values are the default ones, but they can be replaced. > > > >> So, add the dir(s) and separate them by comma, like in the example b= elow. > > > >> For a more in depth explaination of each line see: > > > >>http://gcc.gnu.org/onlinedocs/gnat_ugn_unw/GNAT-Project-Manager.html > > > >> Example from the net: > > > >> =3DA0 =3DA0 =3DA0Project Hello_4 is > > >> =3DA0 =3DA0 =3DA0 =3DA0 for Source_Dirs use (".", ".."); > > >> =3DA0 =3DA0 =3DA0end Hello_4; > > > >> another example: > > > >> project Cando is > > > >> =3DA0 =3DA0for Languages use ("Ada"); > > >> =3DA0 =3DA0for Source_Dirs use (".", "src", "\win_io"); > > >> =3DA0 =3DA0for Object_Dir use "obj"; > > >> =3DA0 =3DA0for Exec_Dir use "."; > > > >> =3DA0 =3DA0... > > > >> end Cando; > > > >> In <92dda95d-161e-4337-8a60-698c3c837...@r15g2000prd.googlegroups.co= m>, t=3D > > >olkamp writes: > > > >> >On 16 jan, 20:31, a...@anon.org (anon) wrote: > > >> >> From the web site: > > >> >> =3D3DA0 Then, you should configure the project to include the sou= rces fo=3D > > >r > > >> >> =3D3DA0 =3D3DA0 Win_IO. You can do this by adding the Win_IO dire= ctory to =3D > > >the > > >> >> =3D3DA0 =3D3DA0 "Sources" part of the "Edit Project Properties" w= indow. > > > >> >> So: > > >> >> =3D3DA0 use =3D3DA0"sources dirs" for dir of win_io sources files= ( *.ads =3D > > >) > > >> >> =3D3DA0 use =3D3DA0"objects" =3D3DA0 =3D3DA0 =3D3DA0for dir of wi= n_io object fil=3D > > >es =3D3DA0( *.o ) > > >> >> =3D3DA0 use =3D3DA0"Library" =3D3DA0 =3D3DA0 =3D3DA0for win_io li= b file, if one =3D > > >exist. > > > >> >> In =3D > > >, t=3D3D > > >> >olkamp writes: > > > >> >> >On 14 jan, 08:14, a...@anon.org (anon) wrote: > > >> >> >> In command-line version of GNAT: > > > >> >> >> =3D3D3DA0gnat file<.adb> =3D3D3DA0 -I= dir -Ldir > > > >> >> >> use "-Idir" for a dir that contains the "*.ads", "*.ali" and "= ali.o=3D > > >" > > >> >> >> and "-Ldir" for a dir that contains extra libraries. > > > >> >> >> other options are listed by using > > > >> >> >> =3D3D3DA0 gnat make -gnath > > > >> >> >> In > >om>=3D3D > > >> >, t=3D3D3D > > >> >> >olkamp writes: > > > >> >> >> >To make it possible to plot results of my project I have down= loade=3D > > >d > > >> >> >> >GtkAda and Win_IO. > > >> >> >> >After this I have created a dependency between my project and= GtkA=3D > > >da. > > >> >> >> >Now the project should be configured to include the sources f= or > > >> >> >> >Win_IO. > > >> >> >> >How can I add the Win_IO directory to my project?- Tekst uit = oorsp=3D > > >ron=3D3D > > >> >kel=3D3D3D > > >> >> >ijk bericht niet weergeven - > > > >> >> >> - Tekst uit oorspronkelijk bericht weergeven - > > > >> >> >I am not using the command line. > > >> >> >At this websitehttp://www.ctr.unican.es/Win_IO > > >> >> >I found the text: > > > >> >> >Then, you should configure the project to include the sources fo= r > > >> >> >Win_IO. > > >> >> >You can do this by adding the Win_IO directory to the "Sources" = part > > >> >> >of the "Edit Project Properties" window. > > > >> >> >When I select "Edit Project Properties" the =3D3DA0"Sources" par= t is no=3D > > >t > > >> >> >available, only: > > >> >> >- General > > >> >> >- Languages > > >> >> >- VCS > > >> >> >- Source dirs > > >> >> >- Source files > > >> >> >- Objects > > >> >> >- Main files > > >> >> >- Library > > >> >> >- Naming > > >> >> >- Switches. > > > >> >> >Which of these selections must be used?- Tekst uit oorspronkelij= k ber=3D > > >ich=3D3D > > >> >t niet weergeven - > > > >> >> - Tekst uit oorspronkelijk bericht weergeven - > > > >> >When source dirs is clicked the window with source directories C:\G= NAT > > >> >\bin appears. > > >> >When objects is clicked the window with Build/Exec directory C:\GNA= T > > >> >\bin appears. > > >> >When Library is clicked for General the follwing can be selected: > > >> >- Library Name > > >> >- Library Directory > > >> >- Library ALI Kirectory > > >> >- Libray kind > > >> >- Version > > > >> >How to continue?- Tekst uit oorspronkelijk bericht niet weergeven - > > > >> - Tekst uit oorspronkelijk bericht weergeven - > > > >Thank you for this explanation. Now I have successful added the > > >directory win_io_3.0_scr_dos to my project. > > >After this I have added the following source code of my project: > > >- Time, Speed : Float; > > >- My_Plot : Plot_Window_Type; > > >- Plot_Window (My_Plot, "Time", "Speed"); -- create plot window > > >- Add_Point (My_Plot, Time, Speed); > > > >Compilation is error free, but when an executable is made the > > >following error occurs in package plot_windows.adb: > > >"Add_Plot" is undefined. > > > >What do I wrong?- Tekst uit oorspronkelijk bericht niet weergeven - > > > - Tekst uit oorspronkelijk bericht weergeven - > > I have tried the example, but still the same error in package > plot_windows.adb ("Add_Plot" is undefined) when the executable is > build: > line 132 Add_Plot(Resp.Canvas,Resp.Plot,0.2,0.2);- D=F6lj citerad text - > > - Visa citerad text - An excellent example on why not to use use! Line 132 expects to find the procedure Add_Plot somewhere in your scope.