Find content
Male
I use Berg components for a long time and I may say that these are the best solution for convenient and functional development. I developed many software and these components helped me to make the programs looking more open for users. These are the best components ever if you want to make your application to look and to work perfect)
Lazutkin Alexey, soft developer
and some advise: maybe you should lower your prices or make discounts for upgrades or something. also make some more different useful components. And I think you need to optimize your web-site and also to make different-language pages to work with different countries' developers.
PS: I'd love to enter your development team) to develop components and their upgrades more faster)
Posts I've Made
In Topic: Rows bolding problems
28 January 2010 - 03:50 PM
Something like this, but using NextGrid instead. Just select some row and wait 5 secs
compiled in Delphi 2010
Demo.rar 365.07KB
3 downloads
compiled in Delphi 2010
Demo.rar 365.07KB
3 downloadsIn Topic: unnecessary line
19 January 2010 - 05:04 PM
Hello again!
Can you please add an option to NextGrid and DBNextGrid for handling this line (to turn on or off)? It can be done in NxDisplays.pas.
SomeNewOption parameter can be "ShowParentLines" for ex
so it appeares like this
Untitled_1.jpg 47.21KB
5 downloads
Can you please add an option to NextGrid and DBNextGrid for handling this line (to turn on or off)? It can be done in NxDisplays.pas.
CODE
procedure TTreeColumnDisplay.DrawLines;
......
    { Horizontal lines - }
    X := ClientRect.Left + (Level * 19) + 6;;
    n := X;
    if ChildCount > 0 then Inc(n, 4);
   Â
  if (level <> 0) then
      Polyline([Point(n, m - 1), Point(X + 9, m - 1)])
  else if (SomeNewOption = true) then  //we already know that this is the root so we add only second rule
      Polyline([Point(n, m - 1), Point(X + 9, m - 1)]);
......
    { Horizontal lines - }
    X := ClientRect.Left + (Level * 19) + 6;;
    n := X;
    if ChildCount > 0 then Inc(n, 4);
   Â
  if (level <> 0) then
      Polyline([Point(n, m - 1), Point(X + 9, m - 1)])
  else if (SomeNewOption = true) then  //we already know that this is the root so we add only second rule
      Polyline([Point(n, m - 1), Point(X + 9, m - 1)]);
SomeNewOption parameter can be "ShowParentLines" for ex
so it appeares like this
Untitled_1.jpg 47.21KB
5 downloads
