NiceGrid for Lazarus

[maurobio]

Hi, @wp!!!

I am sorry, in a rush I didn't checked the demos! I just installed the component in Lazarus IDE and since it compiled fine, I assumed that it was working!

As I understood, the component has already been successfully ported from Delphi to Lazarus, before being lost. Can't this good work be re-done?

With warmest regards,

[GutoGT]

test without commented lines in windows.
when closing, error occurs: INT DIVIDE BY ZERO
other than that it looks perfect.

[Leledumbo]

Thank you. However, it has the same issue as TraumtaenzerDieter's code above: When I run the sample projects, the mouse cursor disappears when it enters the grid. And when the application is closed there is a Divide-by-zero error.

Runs fine on Linux 64-bit Qt5. Will be hard to fix since Windows is a secondary citizen in my computer.

[wp]

When I run the sample projects, the mouse cursor disappears when it enters the grid.

TNiceGrid uses a set of new cursors. Loading of these cursors from the resource, however, is commented out in the TNiceGrid.Create constructor. Uncomment this code (Screen.Cursors[...] := LoadCursor(...)), and the cursor will appear.

And when the application is closed there is a Divide-by-zero error.

This happens because there seems to be an invalid handle in WMKillFocus. Make sure that the Handle is allocated, and it will work:

Code: Pascal  [Select][+][-]

1. procedure TNiceGrid.WMKillFocus(var Msg: TLMKillFocus);
2. begin
3.   if FEdit.HandleAllocated then                // <--- ADDED
4.   begin                                        // <--- ADDED
5.     if (Msg.FocusedWnd <> FEdit.Handle)
6.       then ForceHideCaret;
7.      DestroyCaret(FEdit.Handle);
8.   end;                                         // <--- ADDED
9.   CaretVisible := False;
10.   if not IsEditing
11.     then InvalidateCells;
12. end;

[wp]

I fixed these bugs and uploaded the package to the Lazarus Component and Code Repository (CCR) at sourceforge: https://sourceforge.net/p/lazarus-ccr/svn/HEAD/tree/components/nicegrid/ (Install via SVN or the zip snapshot). Whoever is interested should test it so that I can propose addition to OPM.

[paweld]

@wp: change path to unit files in package options from ..\.. to ..\..\source

[wp]

Thank you - last minute changes before committing never are good...

Fixed this compilation issue, as well as
- missing palette icon for TNiceGridSync --> re-used the TNiceGrid icon like in the original package.
- component editor commented out --> is working now

BTW: @TraumTaenzerDieter, @maurobio: Do you know who made the Lazarus port that you posted? I'd like to mention it in the package.

[TraumTaenzerDieter]

Sorry, I could not find any other author mintioned than priyatna.org.

[TRon]

@wp:
TraumTaenzerrDieter's version is the exact same as the one from the bitbucket repository from Leledumbo but I can't verify/read if Leledumbo did the actual conversion or that he (only) hosted it (and got the Lazarus converted version from somewhere else, see also https://forum.lazarus.freepascal.org/index.php/topic,10277.0.html).

[domasz]

http://web.archive.org/web/20200121064904/http://priyatna.org/about-me.php

"My name is Priyatna. I'm a programmer as hobby and also as a profession. I live in northern area of Bandung, Indonesia"

That's how he calls himself. "priyatna.org" sounds a bit weird as an author.

[maurobio]

Hi, @wp!

The original source code of the original NiceGrid for Delphi mentions Mr. C. S. Phua (using an email form Myanmar) as a "contributor"; other than that, I could find no mention of who ported the component to Lazarus.

Interestingly, "priyatna" is a Russian word (приятно) which can be translated into English as "pleasant".

A nice linguistic mystery of which I am so fond of! 

With warmest regards,

[TRon]

That's how he calls himself. "priyatna.org" sounds a bit weird as an author.

commonly used for both surname (https://forebears.io/surnames/priyatna) and family name (as an example: https://en.wikipedia.org/wiki/Kadek_Arel_Priyatna).

It has a nice meaning (https://www.nameslook.com/priyatna?utm_content=cmp-true)

edit: oh wait ... you were referring to the ".org" part 

[maurobio]

Hi, @TRon!

But what an interesting finding, sir!

The meaning of the word in Bahasa Indonesian (?) is much alike those in Russian! Unfortunately, the page you linked does not mention the etymology of the word, which could help us to trace its origins and relationships (although it dwells into "numerology" and "inner potentials" nonsense).

Best regards,

[TRon]

@maurobio:

Indeed that page is a bit focused on numerology. Perhaps this is a better read ? Unfortunately my knowledge on Russian is next to none 

[maurobio]

Hi, @TRon!

Nice page! It suggests that the word is of oriental origin indeed, what makes its presence in the Russian vocabulary (https://www.wordhippo.com/what-is/the-meaning-of/russian-word-e01e5615247f463fe87618938f062c9f8adde6a9.html) still more remarkable. The meaning (or at least one of them) in both Russian and several Indo languages are the same.

With warmest regards,