forums.silverfrost.com

[Kenneth_Smith]

Martin,

I can see in some of the snippets of code that you have shared that you don't have call backs on the %vx, %hx, or %sl, but you do have a %dl. So all processing of new slider values is **possibly** carried out asynchronously by the %dl ?

Having said that, when the x or y siders are moved the %pl callback is called, I've just discovered that.

There may be a lot of unnecessary processing within the %pl callback at this time. Try to inhibit this by adding the following code at the very beginning of the call back.

[Martin_K]

Thanks Paul!

you are right, I did it and after some experiments
with really very rapid slider movements back and forth, program did not crash!

Maybe some interesting info for you as FTN95 developer:

During development of the program, I always created the DEBUG/x64
version of the executable using also the option /UNDEF (in Plato environment)
and tested the program. Program worked fine in last stages of its development.

Then I created the executable as RELEASE/x64 also with /UNDEF and got
some error regarding an undefined variable.

Then, I created again the RELEASE/x64 executable, this time by deactivating /UNDEF
and program works fine and after implementing your suggestion
regarding slider - no crash occured at all.

[Martin_K]

here is the 15s video - how quickly I moved with slider with no crash!
And I repeated it many times.

Thanks Paul again!

https://www.dropbox.com/s/jl0q284watx3m4f/slider3.mp4?dl=0

[Martin_K]

Ken,

Thanks for your - as always - very useful tips/observations.
I will have a look at this!

A question:

Somehow, I was unable to understand how could I write a short code
for selecting an object in a graphic area by mouse click on it, which could
be used universally (for any graphic) and that it would be optically visible
in the graphic area, which object (point or line or area) was selected
and then - say - deselecting it by additional mouse click (left or right).

Is there a free code which would do it?

[Kenneth_Smith]

Martin,

See the following: https://www.silverfrost.com/ftn95-help/clearwinp/gdialog/graphicsicons.aspx

Using the basic ideas described there I was able to develop a graphics interface which allowed me to draw interactively an electrical network and extract its parameters and connectivity to a file for input to another program.

[Martin_K]

I had a look there some time ago, but was unsure whether it can be applied
also with %PL, since there is explicitly stated the %GR only.

So, can I use these features also with %PL or there is necessary to rewrite the code with %PL to %GR?

Now - an additional remark for Paul regarding my previous
suggestion for enhancing %PL capabilities.:

I still mulled how to simplify my second suggestion for the %PL enhancement (georeferencing of images in the graph) mentioned
earlier in this string of conversations and have the following
- I think, essentially simplified - idea:

Would it be realizable (with no huge effort and amount of time) to add a new option for the %PL like this:
%PL [image=filename.jpg]?

The purpose of this option would be to overlay current vector graphics
in the graph (like red lines and blue points in my case) with a pure jpg
image/picture (like in the case of %IM), with NO georeferencing,
hence no association with real geodetic coordinates which have the points/lines/areas in the graph.
I suppose, it would mean no complicated mathematics behind this.

The only requirement for such option would be that it
would have to stretch the image between X,Y axes in the graph.

Namely, I would be able to prepare a georeferenced orthophotomosaic
images in another software used for mobile mapping, which would at least roughly fit the area where
objects with real geodetic coordinates are located in the graph.
It would mean - at least - a roughly fit/coincide between the
image with no coordinate association a and objects in the graph with real geodetic coordinates.

Such option would just serve as a background source for the vector graphics in the graph. I think this would be very interesting enhancement.

Thanks for your evaluation of this idea and answer.

[Kenneth_Smith]

Martin, take a look at this example.

https://www.dropbox.com/sh/w46k0wdctr3rkc9/AADwV6E2XI7zgizhyH8tVfooa?dl=0

[John-Silver]

Paul (Laidler), is this documentation section 'Graphics icons' referenced by Ken a relatively recent addition or a longstanding capability?

I don't remember seeing it before myself and as I know there's been a documentation update being continuously ongoing for a while now I just wandered.
_________________
''Computers (HAL and MARVIN excepted) are incredibly rigid. They question nothing. Especially input data.Human beings are incredibly trusting of computers and don't check input data. Together cocking up even the simplest calculation ... "

[PaulLaidler]

Very long standing.

[Martin_K]

I had a look at your code and this fulfills the basic idea - thanks, Ken!

But as always - it is rarely the case, when something works
with me on the first time and this is no exception.

So, I have a problem and a question.

PROBLEM:

I have the following plot function(using %PL) calling a callback (PL_CB) called by %PL (an extract of my code):

[Martin_K]

Additional info to my previous post:

I already partially found why the raster JPG image automatically disappears when
I moved with mouse over the graph.

In the callback PL_CB called within %PL I originally used the code:

[Martin_K]

And still: the use of 8913094 instead of 13369376 is no win-win situation:
when I use it (8913094) and I move over the graph with mouse the yellow rectangle, where the relevant data from surveyed points are extracted displayed is always present. It means when I point over a point, then on next and so on,
every yellow box remains permanently visible in the graph.

[Kenneth_Smith]

Martin,

Any call to simpleplot_redraw@ will remove the imported image as the %pl region is reformed. At this point you have to use COPY_GRAPHICS_REGION@ to repaste the image into the %pl graphics, before you call COPY_GRAPHICS_REGION@ to create a "back up" copy of the now modified %pl display which is used to let you display your moving yellow box.

To avoid continually calling IMPORT_IMAGE@, it would make sense to create a new permanent internal graphics region into which you import the image just once (permanent for the duration of the winio@ sequence that is associated with the %pl). Also, remember that IMPORT_IMAGE@ imports to the currently selected graphics region.

COPY_GRAPHICS_REGION@ will automatically rescale if the destination and source x/y ranges are different and since you can specify an x/y offset as well as width/height for both destination and source; this gives you a means of pasting a smaller region of the image when you have for example zoomed into an area of the graph - you know the %pl xmin/xmax/ymin/ymax values and you know the pixel width/height dimensions of the image as well as the physical origin and x/y extent coordinates the image refers to.

If your yellow box is permanently displayed you are creating the back up copy at the wrong point in the code. You just need to ensure that the copy operations are in the correct sequence.

[Martin_K]

Thanks Ken for your important remarks!

However, at this moment I have something wrong somewhere in the code
of one (or more?) of the three callbacks dealing with the graphics.

Their full code can be seen/downloaded here:
https://www.dropbox.com/s/ben76ov4n02ivs0/PL%2BCB.f95?dl=0

What I am getting now is this:



A short 10s video can be seen here:
https://www.dropbox.com/s/k12axnjebx21bzf/jpg_problem.mp4?dl=0

So, the facts are as follows:

1. I need the JPG to be displayed (stretched) ONLY between X,Y axes, not over the whole graph.
I have differences between source and destination widths and heights.

I tried it to adjust tentatively in a few iteration by specifying the offset
of the image - but I achieve practically nothing, moreover - I do not want to do it manually (to find the values of offset by manually and iteratively trying by typing in their estimated values, since this will always be different from one jpg to the another one).
So, in this particular case I would need to shorten (to squeeze) the image
both in north-south and east-west direction to get it between X,Y axes and I was unable to find how
(I would also need to specify an offset from right bottom corner).

2. As can be seen in the short video, when I load in the raster onto the graph and when I move with mouse (placed outside graph) back over the
graph, the image automatically disappears although I used the COPY_GRAPHICS_REGION@ from the buffer on the graph (the ID of the graph is variable handle_pl_OK and equals 0) also in the condition:

IF (cb_reason .eq. 'MOUSE_MOVE' ) THEN

which is in the PL_CB function called within %PL.

[Kenneth_Smith]

Looking only at your graphic above, I suspect that in your call to COPY_GRAPHICS_REGION@

Syntax