Re: [Lazarus] soap web services, send attachment as MTOM

[Michael Van Canneyt]

On Mon, 9 Nov 2015, markbass72 wrote:


hi all
I need to consume a web service by attaching a file as MTOM
I have not found any documentation for Lazarus, is there a workaround that I 
could adopt?


To my knowledge:

None exists. 
I had the same problem in Delphi, none of the existing toolkits supports it.


I ended up doing the requests with MTOM manually: allow the toolkit to do the 
request,
catch the error, and then parse the request myself.

I have asked the author of WST to look at it, but I do not think this is high 
priority,
as MTOM is rather exotic...

Michael.

--
___
Lazarus mailing list
Lazarus@lists.lazarus.freepascal.org
http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus

Re: [Lazarus] More testing please

[Andrea Mauri]

not working on ubuntu 14.04 64 bit on virtualbox
I got
The program 'cpugraph' received an X Window System error.
This probably reflects a bug in the program.
The error was 'BadAccess (attempt to access private resource denied)'.
  (Details: serial 282 error_code 10 request_code 33 minor_code 0)
  (Note to programmers: normally, X errors are reported asynchronously;
   that is, you will receive the error a while after causing it.
   To debug your program, run it with the --sync command line
   option to change this behavior. You can then get a meaningful
   backtrace from your debugger if you break on the gdk_x_error() 
function.)



I cannot download the 32bit since the link is not working
http://cache.getlazarus.org/debs/cpugraph_1.0.1-2-i386.deb

Il 09/11/2015 13:59, Paul Michell ha scritto:
Moving and sizing works well here (Kubuntu 64 15.04), still no Tray 
Icon though.


On 09/11/15 12:42, Anthony Walter wrote:

I've updated CPU Graph with some nice (IMO) changes:

http://cache.getlazarus.org/images/cpu-graph-sizes.png

Version 1.0.2 is available at:

http://www.getlazarus.org/apps/cpugraph/

Changes:
-

* You can now move the window by clicking and dragging.
* You can now size the window using the corners.
* The widow layout automatically changes based on size.
* Graph lines can be toggled on and off by clicking on the color box 
next to the CPU.
* Compositing now detected correctly and rendering is adjusted 
accordingly.
* Minor alteration to tray icons which hopefully works on more 
configurations.


If anyone cares to test this version I'd appreciate it. Suggestions 
are welcomed.



--
___
Lazarus mailing list
Lazarus@lists.lazarus.freepascal.org
http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus




--
___
Lazarus mailing list
Lazarus@lists.lazarus.freepascal.org
http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus



--
___
Lazarus mailing list
Lazarus@lists.lazarus.freepascal.org
http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus

Re: [Lazarus] More testing please

[Alexsander Rosa]

Same here (no tray icon), Ubuntu 14.04 without Unity.
Maybe a UI (or key) to bring up the menu?

2015-11-09 10:59 GMT-02:00 Paul Michell :

> Moving and sizing works well here (Kubuntu 64 15.04), still no Tray Icon
> though.
>
>
> On 09/11/15 12:42, Anthony Walter wrote:
>
> I've updated CPU Graph with some nice (IMO) changes:
>
> http://cache.getlazarus.org/images/cpu-graph-sizes.png
>
> Version 1.0.2 is available at:
>
> http://www.getlazarus.org/apps/cpugraph/
>
> Changes:
> -
>
> * You can now move the window by clicking and dragging.
> * You can now size the window using the corners.
> * The widow layout automatically changes based on size.
> * Graph lines can be toggled on and off by clicking on the color box next
> to the CPU.
> * Compositing now detected correctly and rendering is adjusted accordingly.
> * Minor alteration to tray icons which hopefully works on more
> configurations.
>
> If anyone cares to test this version I'd appreciate it. Suggestions are
> welcomed.
>
>
> --
> ___
> Lazarus mailing 
> listLazarus@lists.lazarus.freepascal.orghttp://lists.lazarus.freepascal.org/mailman/listinfo/lazarus
>
>
>
> --
> ___
> Lazarus mailing list
> Lazarus@lists.lazarus.freepascal.org
> http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus
>
>


-- 
Atenciosamente,
Alexsander da Rosa
--
___
Lazarus mailing list
Lazarus@lists.lazarus.freepascal.org
http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus

Re: [Lazarus] More testing please

[Anthony Walter]

Thanks Paul. That's what I though. I will add libappindicator1 to the deb
depends list.
--
___
Lazarus mailing list
Lazarus@lists.lazarus.freepascal.org
http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus

Re: [Lazarus] More testing please

[Aradeonas]

Very good and nice widget,Every thing works on Xubuntu except "Graph
lines can be toggled on and off by clicking on the color box next to the
CPU." maybe because my system have only one core

Regards,
Ara


-- 
http://www.fastmail.com - Accessible with your email software
  or over the web


--
___
Lazarus mailing list
Lazarus@lists.lazarus.freepascal.org
http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus

Re: [Lazarus] More testing please

[Anthony Walter]

Graeme, wow that's some attention to detail there. Fixed! TY
--
___
Lazarus mailing list
Lazarus@lists.lazarus.freepascal.org
http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus

Re: [Lazarus] More testing please

[Michael Van Canneyt]

On Mon, 9 Nov 2015, Anthony Walter wrote:


Changes:
-

* You can now move the window by clicking and dragging.


Check.


* You can now size the window using the corners.


Check. Nice mechanism, BTW.


* The widow layout automatically changes based on size.


Check.


* Graph lines can be toggled on and off by clicking on the color box next
to the CPU.


Check.


* Compositing now detected correctly and rendering is adjusted accordingly.


Check.


* Minor alteration to tray icons which hopefully works on more
configurations.


Nice job !

Michael.

--
___
Lazarus mailing list
Lazarus@lists.lazarus.freepascal.org
http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus

[Lazarus] More testing please

[Anthony Walter]

I've updated CPU Graph with some nice (IMO) changes:

http://cache.getlazarus.org/images/cpu-graph-sizes.png

Version 1.0.2 is available at:

http://www.getlazarus.org/apps/cpugraph/

Changes:
-

* You can now move the window by clicking and dragging.
* You can now size the window using the corners.
* The widow layout automatically changes based on size.
* Graph lines can be toggled on and off by clicking on the color box next
to the CPU.
* Compositing now detected correctly and rendering is adjusted accordingly.
* Minor alteration to tray icons which hopefully works on more
configurations.

If anyone cares to test this version I'd appreciate it. Suggestions are
welcomed.
--
___
Lazarus mailing list
Lazarus@lists.lazarus.freepascal.org
http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus

Re: [Lazarus] More testing please

[Paul Michell]

Moving and sizing works well here (Kubuntu 64 15.04), still no Tray Icon 
though.


On 09/11/15 12:42, Anthony Walter wrote:

I've updated CPU Graph with some nice (IMO) changes:

http://cache.getlazarus.org/images/cpu-graph-sizes.png

Version 1.0.2 is available at:

http://www.getlazarus.org/apps/cpugraph/

Changes:
-

* You can now move the window by clicking and dragging.
* You can now size the window using the corners.
* The widow layout automatically changes based on size.
* Graph lines can be toggled on and off by clicking on the color box 
next to the CPU.
* Compositing now detected correctly and rendering is adjusted 
accordingly.
* Minor alteration to tray icons which hopefully works on more 
configurations.


If anyone cares to test this version I'd appreciate it. Suggestions 
are welcomed.



--
___
Lazarus mailing list
Lazarus@lists.lazarus.freepascal.org
http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus


--
___
Lazarus mailing list
Lazarus@lists.lazarus.freepascal.org
http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus

Re: [Lazarus] Extending TRect breaks Lazarus

[Sven Barth]

Am 09.11.2015 13:11 schrieb "Mattias Gaertner" :
>
> On Mon, 9 Nov 2015 10:48:02 +
> Lukasz Sokol  wrote:
>
> >[...]
> > Thanks, I believe, this should be added into the docs somewhere ;) if
it's not already there.
>
> The docs already note that the compiler uses a temporary register
> for 'With'.
>
> http://www.freepascal.org/docs-html/ref/refsu58.html#x155-16500013.2.8
>
> Of course if there is no register left the compiler uses the stack.

Please note that this is an implementation detail. The point a user should
care about is that the expression of the with is evaluated only once
(before the block of the with is entered). Everything else is up to the
compiler.
(I would prefer if it wouldn't be mentioned as is in the documentation)

Regards,
Sven
--
___
Lazarus mailing list
Lazarus@lists.lazarus.freepascal.org
http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus

Re: [Lazarus] More testing please

[Anthony Walter]

Graeme
--
___
Lazarus mailing list
Lazarus@lists.lazarus.freepascal.org
http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus

Re: [Lazarus] More testing please

[Aradeonas]

I cant download because it give 403 Forbidden error.

Regards,
Ara


-- 
http://www.fastmail.com - Access all of your messages and folders
  wherever you are


--
___
Lazarus mailing list
Lazarus@lists.lazarus.freepascal.org
http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus

Re: [Lazarus] More testing please

[Victor Campillo]

On 09/11/15 13:42, Anthony Walter wrote:


If anyone cares to test this version I'd appreciate it. Suggestions 
are welcomed.




Works great on Xubuntu 14.04.

Nice job.

--
Victor Campillo


--
___
Lazarus mailing list
Lazarus@lists.lazarus.freepascal.org
http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus

Re: [Lazarus] More testing please

[Anthony Walter]

There was a typo on the 32bit deb:

http://cache.getlazarus.org/debs/cpugraph_1.0.2-1-i386.deb

Thanks for testing. Regarding people who still don't see the tray icon, if
you run the following in terminal does it find anything?

find /usr/lib -name libappindi*

Does it find "libappindicator.so.1" or some other version or none at all?
--
___
Lazarus mailing list
Lazarus@lists.lazarus.freepascal.org
http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus

[Lazarus] soap web services, send attachment as MTOM

[markbass72]

hi all
I need to consume a web service by attaching a file as MTOM
I have not found any documentation for Lazarus, is there a workaround 
that I could adopt?

thank you in advantage
nomorelogic

--
___
Lazarus mailing list
Lazarus@lists.lazarus.freepascal.org
http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus

Re: [Lazarus] More testing please

[Michael Van Canneyt]

On Mon, 9 Nov 2015, Paul Michell wrote:

Moving and sizing works well here (Kubuntu 64 15.04), still no Tray Icon 
though.


Probably Plasma 5 ? 
That's probably the new tray icon protocol as used in Unity on Ubuntu.


Michael.

--
___
Lazarus mailing list
Lazarus@lists.lazarus.freepascal.org
http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus

Re: [Lazarus] More testing please

[Graeme Geldenhuys]

On 2015-11-09 12:42, Anthony Walter wrote:
> I've updated CPU Graph with some nice (IMO) changes:
> 
> http://cache.getlazarus.org/images/cpu-graph-sizes.png

There seems to be a rendering bug in your graph. See attached
screenshot. The dotted lines go outside the graph client area.

Regards,
  - Graeme -

-- 
fpGUI Toolkit - a cross-platform GUI toolkit using Free Pascal
http://fpgui.sourceforge.net/

My public PGP key:  http://tinyurl.com/graeme-pgp
--
___
Lazarus mailing list
Lazarus@lists.lazarus.freepascal.org
http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus

Re: [Lazarus] More testing please

[Paul Michell]

This finds nothing on my system?

Regarding people who still don't see the tray icon, if you run the 
following in terminal does it find anything?


find /usr/lib -name libappindi*





--
___
Lazarus mailing list
Lazarus@lists.lazarus.freepascal.org
http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus

Re: [Lazarus] More testing please

[Anthony Walter]

Alexsander, okay I added the tray icon menu as the forums popup menu, so in
the next version users will be able to right click the window and get the
same menu options.

I guess I need to add libappindicator1 to the deb depends section and that
will fix these tray icon problems.
--
___
Lazarus mailing list
Lazarus@lists.lazarus.freepascal.org
http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus

Re: [Lazarus] More testing please

[Graeme Geldenhuys]

On 2015-11-09 14:32, Anthony Walter wrote:
> Graeme, wow that's some attention to detail there. Fixed! TY

:-) It's from developing pixel perfect fpGUI widgets since 2006. ;-)


If you want more minor anomalies... probably nobody else would notice
either, so you can probably ignore these. :)

1.
The graph title and axis are rendering with mono anti-aliasing, but the
CPU legends are rendered in RGB/LCD anti-aliasing.

2.
I also noticed that in some of the graphs the dotted lines aren't as
sharp as other graphs. This is a common "line alignment" or
"half-a-pixel" anti-aliasing issue. With xmag you can see the blurry
ones actually have two lines drawn at different opacities. This issue
only occurs on pure horizontal or vertical lines. With AggPas (I don't
know your graphics backend) you can fix that by pixel-aligning pure
horizontal and vertical lines, giving you always sharp/crisp looking lines.

Here is an article explaining it.

http://web.archive.org/web/20150315034509/http://antigrain.com/tips/line_alignment/line_alignment.agdoc.html#PAGE_LINE_ALIGNMENT


Regards,
  - Graeme -

-- 
fpGUI Toolkit - a cross-platform GUI toolkit using Free Pascal
http://fpgui.sourceforge.net/

My public PGP key:  http://tinyurl.com/graeme-pgp

--
___
Lazarus mailing list
Lazarus@lists.lazarus.freepascal.org
http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus

Re: [Lazarus] Manage server task list architecture

[Aradeonas]

Any idea?

Regards,
Ara


-- 
http://www.fastmail.com - Send your email first class


--
___
Lazarus mailing list
Lazarus@lists.lazarus.freepascal.org
http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus

Re: [Lazarus] Manage server task list architecture

[Michael Van Canneyt]

On Mon, 9 Nov 2015, Aradeonas wrote:


Any idea?


I would create a scheduler process which runs in the background.

1. The scheduler process processes the jobs, which are waiting in a queue. 
2. Jobs are submitted to the queue using fastcgi or cgi.

3. Each job gets a unique identifier, which you receive when the job is 
submitted.
4. The identifier can be used to poll for the job status.
5. As soon as the job is finished, the result can be downloaded, and then the 
job is removed from the queue.
6. Jobs too long in the queue are removed by the scheduler.

Michael.

--
___
Lazarus mailing list
Lazarus@lists.lazarus.freepascal.org
http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus

Re: [Lazarus] Manage server task list architecture

[Michael Van Canneyt]

On Mon, 9 Nov 2015, Aradeonas wrote:


I think like you but I doubted that is a good idea but now you have the
same idea so it should be good.
So I want to ask some question:
What is the best approach to make a connection between cgi and service?


It can be as simple as files in a directory.
It can be as difficult as records in a database.


Do you have any idea for users in the queue?
for example user1 and 100 request and user2 add 100 and so on.


If you use files :
One directory per user, one file per task in the directory. 
loop over user directories, 
and always process only 1 file per user dir in the loop.


in sql that would be

select userid,min(task) from tasks where tasks.done=0 group by userid

for a table, for example
create table tasks(
  userid varchchar(100),
  task int,
  done int,
  taskdata mydatatype
);

Michael.

--
___
Lazarus mailing list
Lazarus@lists.lazarus.freepascal.org
http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus

Re: [Lazarus] Manage server task list architecture

[Aradeonas]

I think like you but I doubted that is a good idea but now you have the
same idea so it should be good.
So I want to ask some question:
What is the best approach to make a connection between cgi and service?
Do you have any idea for users in the queue?
for example user1 and 100 request and user2 add 100 and so on.
so user n should wait until all other users tasks finish and I dont like
it and I think it is better when we have n user in each time it should
do one user task per time.So what is the better way to sort the queue so
it done user1task1 userttask2 user1task2 user2task2 and ?

Regards,
Ara


-- 
http://www.fastmail.com - The professional email service


--
___
Lazarus mailing list
Lazarus@lists.lazarus.freepascal.org
http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus

Re: [Lazarus] Manage server task list architecture

[Aradeonas]

So clean.
Thank you very much.

Regards,
Ara


-- 
http://www.fastmail.com - The way an email service should be


--
___
Lazarus mailing list
Lazarus@lists.lazarus.freepascal.org
http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus

Re: [Lazarus] Debian Packager released

[Anthony Walter]

More information:

https://en.wikipedia.org/wiki/Ldd_(Unix)

ldd (List Dynamic Dependencies) is a *nix utility that prints the shared
libraries required by each program or shared library specified on the
command line.[1]

Here's and example using my program colormix:

user@home ~/ $ ldd colormix
linux-vdso.so.1 =>  (0x7ffc1eef8000)
libpthread.so.0 => /lib/x86_64-linux-gnu/libpthread.so.0
(0x7fb3f9d43000)
libc.so.6 => /lib/x86_64-linux-gnu/libc.so.6 (0x7fb3f997e000)
   ... snip a few lines
libcairo.so.2 => /usr/lib/x86_64-linux-gnu/libcairo.so.2
(0x7fb3f7a7d000)
libpangocairo-1.0.so.0 => /usr/lib/x86_64-linux-gnu/libpangocairo-1.0.so.0
(0x7fb3f764e000)
   ... more lines follow

then pick a dependency which is under /usr/lib  ...

user@home ~/ $ dpkg -S /usr/lib/x86_64-linux-gnu/libpangocairo-1.0.so.0
libpangocairo-1.0-0:amd64: /usr/lib/x86_64-linux-gnu/libpangocairo-1.0.so.0

and finally check the package to verify the version ...

user@home ~/ $ dpkg -s libpangocairo-1.0-0
Package: libpangocairo-1.0-0
Status: install ok installed
Priority: optional
Section: libs
Version: 1.36.3-1ubuntu1.1

which then creates in the control file ...

Depends:  libpangocairo-1.0-0 (>= 1.36.3)

I am quite confident that this is a valid approach to building a dependency
list. If you want lower version numbers, try making the deb in an older OS
(12.04) and see if the version numbers are lower there. I wouldn't know how
to look up depends versions any other way, other than say googling each
package and trying random lower version numbers.

With regards to linking to dependencies you feel are not needed, try
copying just the application to another system without using the deb. See
if you get an error when running the app due to missing libraries. i.e.
Your other test computer doesn't have
"/usr/lib/nvidia-346/xorg/libglx.so.346.96" and the program fails because
of this reason.
--
___
Lazarus mailing list
Lazarus@lists.lazarus.freepascal.org
http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus

Re: [Lazarus] Debian Packager released

[Anthony Walter]

A new version is available with a much better dependency resolver. If you
want to discuss the details further and out of courtesy to the mailing list
users, please use this location to provide feedback:

http://www.getlazarus.org/forums/viewtopic.php?f=21=122=348#p348
--
___
Lazarus mailing list
Lazarus@lists.lazarus.freepascal.org
http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus

Re: [Lazarus] Debian Packager released

[Anthony Walter]

Okay, I take all this back, I don't have time to explain, but I am going to
build a new version.
--
___
Lazarus mailing list
Lazarus@lists.lazarus.freepascal.org
http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus

Re: [Lazarus] More testing please

[Anthony Walter]

Greame, thanks. I know all about pixel alignment. I was using a method
(last version) to correctly align the graph lines to the pixels. The
involved drawing on Y at the a 0.5 pixel offset and making the pen 1 pixel.
I also had to offset each row an even number of pixels, which wasn't a
problem since I fixed the grid height to fit correctly.

This time however the grid height is variable and I didn't add code to snap
it's height to a value evenly divisible by 5 (there are five rows). I
really didn't think it was that important of an issueand am instead using
something like "Y := Grid.Y + Row * Grid.Height / 5". The lines will render
a slightly different shades/thicknesses if they might fall on uneven
pixels, but they are so colored so light (on my monitor anyways) that I
thought it was good enough, but you noticed.

I'll consider fixing it in the next revision. Thanks.
--
___
Lazarus mailing list
Lazarus@lists.lazarus.freepascal.org
http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus

Re: [Lazarus] More testing please

[Anthony Walter]

Thanks for the feedback everyone I've posted a new version 1.0.3 which
addresses the following:

http://cache.getlazarus.org/debs/cpugraph_1.0.3-1-amd64.deb
http://cache.getlazarus.org/debs/cpugraph_1.0.3-1-i386.deb

Changes:
-

* App indicators are marked as a dependency. This should fix all remaining
tray icon problems.
* Added right click context menu to the main form which is the same as tray
menu.
* Fixed grid line pixels per Greames remarks (thank you for noticing).
* Fixed a minor issue which checks for nil before terminating cpu
monitoring thread (it shouldn't have been an issue since thread is always
created).
--
___
Lazarus mailing list
Lazarus@lists.lazarus.freepascal.org
http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus

Re: [Lazarus] Debian Packager released

[JuuS]

On 11/07/2015 02:34 AM, Anthony Walter wrote:
> I've put up a release for Debian Packager, a tool which hopefully makes
> it easy for developers to create their own deb packages to deploy their
> applications. Usage should be self explanatory and help is
> provided. Debian Packager can build both 32 and 64 bit deb packages.
> 
> http://www.getlazarus.org/apps/makedeb/

Greetings,

Appears to be broken (I have NO idea why it would include an nvidia
file, libqt4pas5 was installed on the machine I did the deb build on,
the previous apt-file methods worked):

Preparing to unpack juursync_3.1.0-qt-amd64.deb ...
Unpacking juursync (3.1.0-qt) ...
dpkg: dependency problems prevent configuration of juursync:
 juursync depends on libqt4pas5 (>= 2.5); however:
  Package libqt4pas5 is not installed.
 juursync depends on nvidia-346 (>= 346.96); however:
  Package nvidia-346 is not installed.

dpkg: error processing package juursync (--install):
 dependency problems - leaving unconfigured

--
___
Lazarus mailing list
Lazarus@lists.lazarus.freepascal.org
http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus

Re: [Lazarus] More testing please

[JuuS]

On 11/09/2015 01:42 PM, Anthony Walter wrote:
> I've updated CPU Graph with some nice (IMO) changes:

Yes, working great. The graph isolation is nice.

--
___
Lazarus mailing list
Lazarus@lists.lazarus.freepascal.org
http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus

Re: [Lazarus] More testing please

[Anthony Walter]

I just thought I'd add a note. In my Cross.Code library, the ISurface
implementation I've written provides automatic pixel alignment methods for
filling/stroking certain shapes with consideration to pen widths:

https://github.com/sysrpl/Cross.Codebot/blob/master/source/codebot.graphics.linux.surfacecairo.pas#L1805

The problem is it's limited to horizontal/vertical shapes (Rectangle,
RoundRectangle), and not lines (which can be draw at any angle). the Grid
box is a rectangle, so it get the smooth edge, where as the Grid lines are
... well lines.
--
___
Lazarus mailing list
Lazarus@lists.lazarus.freepascal.org
http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus

[Lazarus] Tdbf

[Bob B.]

Can Tdbf use and maintain Foxpro indexes (*.cdx) yet?  If not, can you still 
index a Foxpro file somehow?
Thanks.
Bob B.

--
___
Lazarus mailing list
Lazarus@lists.lazarus.freepascal.org
http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus

Re: [Lazarus] More testing please

[Victor Campillo]

On 09/11/15 16:09, Aradeonas wrote:

Very good and nice widget,Every thing works on Xubuntu except "Graph
lines can be toggled on and off by clicking on the color box next to the
CPU." maybe because my system have only one core

Regards,
Ara


On my system (Xubuntu) the on/off feature works fine, I have 8 cores and 
I can enable/disable all of them.


Regards

--
Victor Campillo


--
___
Lazarus mailing list
Lazarus@lists.lazarus.freepascal.org
http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus

Re: [Lazarus] More testing please

[Anthony Walter]

Micha
--
___
Lazarus mailing list
Lazarus@lists.lazarus.freepascal.org
http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus

Re: [Lazarus] More testing please

[Anthony Walter]

Just some FYI on tray icons on most Ubuntu systems .. you can't get mouse
click events on them. As a matter of fact you can't get any events at all.
The only thing you can do is assign a menu and respond to the clicks of the
menu items. Here is some more information in this regards:

http://www.markshuttleworth.com/archives/347

Quote:

Some firm decisions

*3. Constrained behaviour* All the indicators will take the form of an
indicator (icon or text), and a menu. Clicking on an indicator will open
its menu. Keyboard navigation will always work, and left and right arrows
will translate either into submenu navigation or flipping from indicator to
indicator. The whole set of indicators on the panel will be navigable as a
single menu, in essence. We won’t support “right click” on indicators
differently from “left click”, and there’ll be no ability for arbitrary
applications to define arbitrary behaviors to arbitrary events on
indicators.
--
___
Lazarus mailing list
Lazarus@lists.lazarus.freepascal.org
http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus

Re: [Lazarus] More testing please

[Vincent Snijders]

2015-11-09 20:08 GMT+01:00 Anthony Walter :

> Thanks for the feedback everyone I've posted a new version 1.0.3 which
> addresses the following:
>
> http://cache.getlazarus.org/debs/cpugraph_1.0.3-1-amd64.deb
> http://cache.getlazarus.org/debs/cpugraph_1.0.3-1-i386.deb
>
> Changes:
> -
>
> * App indicators are marked as a dependency. This should fix all remaining
> tray icon problems.
> * Added right click context menu to the main form which is the same as
> tray menu.
> * Fixed grid line pixels per Greames remarks (thank you for noticing).
> * Fixed a minor issue which checks for nil before terminating cpu
> monitoring thread (it shouldn't have been an issue since thread is always
> created).
>
>
>
I installed this version on Ubuntu 14.04.3 and got this:
vincent@intel-nuc:~/tools$ cpugraph --sync
The program 'cpugraph' received an X Window System error.
This probably reflects a bug in the program.
The error was 'BadAccess (attempt to access private resource denied)'.
  (Details: serial 472 error_code 10 request_code 33 minor_code 0)
  (Note to programmers: normally, X errors are reported asynchronously;
   that is, you will receive the error a while after causing it.
   To debug your program, run it with the --sync command line
   option to change this behavior. You can then get a meaningful
   backtrace from your debugger if you break on the gdk_x_error() function.)

Vincent
--
___
Lazarus mailing list
Lazarus@lists.lazarus.freepascal.org
http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus

Re: [Lazarus] More testing please

[Victor Campillo]

On 09/11/15 20:08, Anthony Walter wrote:
Thanks for the feedback everyone I've posted a new version 1.0.3 which 
addresses the following:


http://cache.getlazarus.org/debs/cpugraph_1.0.3-1-amd64.deb
http://cache.getlazarus.org/debs/cpugraph_1.0.3-1-i386.deb

Changes:
-

* App indicators are marked as a dependency. This should fix all 
remaining tray icon problems.
* Added right click context menu to the main form which is the same as 
tray menu.

* Fixed grid line pixels per Greames remarks (thank you for noticing).
* Fixed a minor issue which checks for nil before terminating cpu 
monitoring thread (it shouldn't have been an issue since thread is 
always created).




With this new version I found a bug, the tray menu works fine but only 
until I use the right click context menu, I tried several times and if 
the right click menu is open only once then the tray menu stop working 
till the application is restarted.


Regards.

--
Victor Campillo

--
___
Lazarus mailing list
Lazarus@lists.lazarus.freepascal.org
http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus

Re: [Lazarus] More testing please

[Michael Fuchs]

Nice.

Am 09.11.2015 um 13:42 schrieb Anthony Walter:
> Suggestions are welcomed.

Show/hide the window by single left click on the trayicon. This is
easier than using the popup menu.


g
Michael

--
___
Lazarus mailing list
Lazarus@lists.lazarus.freepascal.org
http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus

Re: [Lazarus] More testing please

[Anthony Walter]

Michael, try the hotkey Super + U, that'll be even faster.
--
___
Lazarus mailing list
Lazarus@lists.lazarus.freepascal.org
http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus

Re: [Lazarus] More testing please

[Anthony Walter]

Victor, do you mind sending me a screenshot of all 8 cores?
--
___
Lazarus mailing list
Lazarus@lists.lazarus.freepascal.org
http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus

Re: [Lazarus] More testing please

[Aradeonas]

Anthony here is a windows info version.I didnt saw your code so I wrote
a very test version with some options, check it and if you want
different or more tell me.It will compile with last fpc and Lazarus
version or your nightly build.

> unit Unit1;
>
> {$mode delphi}
>
> interface
>
> uses  Classes, SysUtils, FileUtil, Forms, Controls, Graphics, Dialogs,
> StdCtrls,  ActiveX, ComObj, Variants, LCLIntf;
>
> { TForm1 }
>
> type  TForm1 = class(TForm)    ListBox1: TListBox;    ListBox2:
> TListBox;    procedure FormActivate(Sender: TObject);    procedure
> FormCreate(Sender: TObject);  private  public    procedure GetCPUInfo;
> procedure GetCPUUsage;  const    WbemUser = '';    WbemPassword = '';
> WbemComputer = 'localhost';    wbemFlagForwardOnly = $0020;  var
> FSWbemLocator: olevariant;    FWMIService: olevariant;  end;
>
> var  Form1: TForm1;
>
> implementation
>
> {$R *.lfm}
>
> { TForm1 }
>
> procedure TForm1.FormCreate(Sender: TObject); begin  FSWbemLocator :=
> CreateOleObject('WbemScripting.SWbemLocator');  FWMIService :=
> FSWbemLocator.ConnectServer(WbemComputer, 'root\CIMV2', WbemUser,
> WbemPassword); end;
>
> procedure TForm1.FormActivate(Sender: TObject); begin  GetCPUInfo;
> while True do  begin    GetCPUUsage;    Application.ProcessMessages;
> end; end;
>
> procedure TForm1.GetCPUInfo; var  FWbemObjectSet: olevariant;
> FWbemObject: olevariant;  oEnum: IEnumvariant;  pCeltFetched:
> cardinal; begin  FWbemObjectSet := FWMIService.ExecQuery('SELECT *
> FROM Win32_Processor', 'WQL', wbemFlagForwardOnly);
>
> oEnum := IUnknown(FWbemObjectSet._NewEnum) as IEnumVariant;
>
> while oEnum.Next(1, FWbemObject, pCeltFetched) = 0 do  begin    with
> ListBox1.Items do    begin      Add(FWbemObject.Name);
> Add(FWbemObject.Caption);      Add(FWbemObject.Description);
> Add(FWbemObject.Manufacturer);      Add(FWbemObject.ProcessorId);
> Add(IntToStr(FWbemObject.NumberOfCores));
> Add(IntToStr(FWbemObject.NumberOfLogicalProcessors));
> Add(FWbemObject.Status);    end;
>
> FWbemObject := Unassigned;  end;
>
> FWbemObjectSet := FWMIService.ExecQuery('SELECT * FROM
> Win32_Processor', 'WQL', wbemFlagForwardOnly);
>
> oEnum := IUnknown(FWbemObjectSet._NewEnum) as IEnumVariant;
>
> while oEnum.Next(1, FWbemObject, pCeltFetched) = 0 do  begin
> ListBox1.Items.Add(IntToStr(FWbemObject.CurrentClockSpeed));
> ListBox1.Items.Add(IntToStr(FWbemObject.MaxClockSpeed));
> FWbemObject := Unassigned;  end; end;
>
> procedure TForm1.GetCPUUsage; var  FWbemObjectSet: olevariant;
> FWbemObject: olevariant;  oEnum: IEnumvariant;  pCeltFetched:
> cardinal;  Tick: int64; begin  Tick := GetTickCount;  FWbemObjectSet
> := FWMIService.ExecQuery('SELECT * FROM
> Win32_PerfFormattedData_PerfOS_Processor', 'WQL',
> wbemFlagForwardOnly);
>
> oEnum := IUnknown(FWbemObjectSet._NewEnum) as IEnumVariant;
>
> ListBox2.Items.Clear;  while oEnum.Next(1, FWbemObject, pCeltFetched)
> = 0 do  begin    ListBox2.Items.Add(FWbemObject.Name + '  ' +
> IntToStr(FWbemObject.PercentProcessorTime));
>
> FWbemObject := Unassigned;  end;  self.Caption :=
> IntToStr(GetTickCount - Tick); end;
>
> end.

PS. because list wont let me attach the project I will send you directly
a sample one.

Regards, Ara


Regards, Ara


-- 
http://www.fastmail.com - Or how I learned to stop worrying and
  love email again

--
___
Lazarus mailing list
Lazarus@lists.lazarus.freepascal.org
http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus

Re: [Lazarus] Extending TRect breaks Lazarus

[Lukasz Sokol]

On 07/11/15 11:01, Mattias Gaertner wrote:
> On Sat, 7 Nov 2015 11:39:44 +0100
> Jürgen Hestermann  wrote:
> 
[...]
>> -
>> with PathArray[High(PathArray)]^ do
>> fillchar(StatisticOfFiles,sizeof(StatisticOfFiles),0);
>> -
>>
>> instead of this:
>>
>> -
>> fillchar(PathArray[High(PathArray)]^.StatisticOfFiles,sizeof(PathArray[High(PathArray)]^.StatisticOfFiles),0);
>> -
[...]
> 
> LastPath:=PathArray[High(PathArray)];
> fillchar(LastPath^.StatisticOfFiles,sizeof(LastPath^.StatisticOfFiles),0);
> 

Will this form produce same code (as in memory footprint and machine 
code/so-called performance) ?

(but then, the last form, will have the variable declared explicitly, which 
probably means more complicated code around this region etc.?)

> Use Ctrl+Shift+C on LastPath to create the pointer variable.
> 
> Mattias
> 
el es



--
___
Lazarus mailing list
Lazarus@lists.lazarus.freepascal.org
http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus

Re: [Lazarus] Extending TRect breaks Lazarus

[Lukasz Sokol]

On 09/11/15 10:19, Mattias Gaertner wrote:

> The above three are not the same.
> 
> The second version executes the With-Expression multiple times, so
> unless the compiler optimizes a lot it will create more code and will be
> slower.
> 
> The first and third versions have the same amount of reads/writes and
> with optimizations (-O2 or higher) create the same assembler code.
> Without optimizations the first is a bit faster, because the compiler
> stores the With-Pointer in a register, while in third version it stores
> it on the stack.
> 
>  
>> (but then, the last form, will have the variable declared explicitly, which 
>> probably means more complicated code around this region etc.?)
> 
> A local variable is bread and butter for the compiler. There is
> nothing complicated about it.
> I would argue that giving an expression a describing name can make code
> less complicated.
> 
> Mattias
> 

Thanks, I believe, this should be added into the docs somewhere ;) if it's not 
already there.

el es


--
___
Lazarus mailing list
Lazarus@lists.lazarus.freepascal.org
http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus

Re: [Lazarus] More testing please

[Anthony Walter]

Aradeonas, I've created a forum topic here if you want to create a side
discussion. Thank you for your help.

http://www.getlazarus.org/forums/viewtopic.php?f=21=121
--
___
Lazarus mailing list
Lazarus@lists.lazarus.freepascal.org
http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus

Re: [Lazarus] Event created by program logic rather than user action

[Michael Schnell]

On 11/08/2015 06:33 PM, Anthony Walter wrote:


2. If you want to communicate with the user interface, such as 
refreshing the screen based on some calculations, use the Synchronize 
method to do so
If you don't want to have the thread wait for the mainthread to execute 
the event, use TThread.Queue (available only as of fpc 3.x) or 
Application.QueueAsyncCall


3. Do not share data the thread is using in calculations with 
anything. If you need access to the data in somewhere else, use 
Synchronize and make a copy there.
If you want to transfer data from the thread to the main thread and 
don't use TThread.Synchronize, you can use a TThreadList to create a 
queue of sent data records, or create an object, use a procedure of same 
in TThread.Queue or Application.QueueAsyncCall and do "Free;" as the 
last instruction of that Procedure (making it a "finalizer")


-Michael

--
___
Lazarus mailing list
Lazarus@lists.lazarus.freepascal.org
http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus

Re: [Lazarus] Extending TRect breaks Lazarus

[Mattias Gaertner]

On Mon, 9 Nov 2015 09:38:27 +
Lukasz Sokol  wrote:

>[...] On 07/11/15 11:01, Mattias Gaertner wrote:
> > On Sat, 7 Nov 2015 11:39:44 +0100
> > Jürgen Hestermann  wrote:
> > 
> [...]
> >> -
> >> with PathArray[High(PathArray)]^ do
> >> fillchar(StatisticOfFiles,sizeof(StatisticOfFiles),0);
> >> -
> >>
> >> instead of this:
> >>
> >> -
> >> fillchar(PathArray[High(PathArray)]^.StatisticOfFiles,sizeof(PathArray[High(PathArray)]^.StatisticOfFiles),0);
> >> -
> [...]
> > 
> > LastPath:=PathArray[High(PathArray)];
> > fillchar(LastPath^.StatisticOfFiles,sizeof(LastPath^.StatisticOfFiles),0);
> > 
> 
> Will this form produce same code (as in memory footprint and machine 
> code/so-called performance) ?

The above three are not the same.

The second version executes the With-Expression multiple times, so
unless the compiler optimizes a lot it will create more code and will be
slower.

The first and third versions have the same amount of reads/writes and
with optimizations (-O2 or higher) create the same assembler code.
Without optimizations the first is a bit faster, because the compiler
stores the With-Pointer in a register, while in third version it stores
it on the stack.

 
> (but then, the last form, will have the variable declared explicitly, which 
> probably means more complicated code around this region etc.?)

A local variable is bread and butter for the compiler. There is
nothing complicated about it.
I would argue that giving an expression a describing name can make code
less complicated.

Mattias

--
___
Lazarus mailing list
Lazarus@lists.lazarus.freepascal.org
http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus

Re: [Lazarus] Extending TRect breaks Lazarus

[Mattias Gaertner]

On Mon, 9 Nov 2015 10:48:02 +
Lukasz Sokol  wrote:

>[...]
> Thanks, I believe, this should be added into the docs somewhere ;) if it's 
> not already there.

The docs already note that the compiler uses a temporary register
for 'With'.

http://www.freepascal.org/docs-html/ref/refsu58.html#x155-16500013.2.8

Of course if there is no register left the compiler uses the stack.

Mattias

--
___
Lazarus mailing list
Lazarus@lists.lazarus.freepascal.org
http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus

Re: [Lazarus] Debian Packager released

[Anthony Walter]

JuuS, can run through the steps manually to confirm?

First run:

ldd path/to/app

Then with anything which links to /usr/lib do:

dpkg -S /usr/lib/path/libsomething.so.1

This will give you the packages on your system required to run your
application. You can check the minimum version with:

dpkg -s packagename

And check the line starting with "Version: "
--
___
Lazarus mailing list
Lazarus@lists.lazarus.freepascal.org
http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus