Hi to all!!
I trying to port the fxds (http://sourceforge.net/projects/fxds) package (aka Decision Cube) fro delphi to lazarus.
For this i need the BoxRect function, but is missing in the LCL.

The delphi 7 helps says:

Returns the screen coordinates of a specified set of cells.

Delphi syntax:

function BoxRect(ALeft, ATop, ARight, ABottom: Longint): TRect;

C++ syntax:

TRect __fastcall BoxRect(int ALeft, int ATop, int ARight, int ABottom);

Description

Call BoxRect to obtain the screen coordinates, in pixels, of the cells that run from the column with index ALeft to the column with index ARight and the row with index ATop to the row with index ABottom. The coordinates of cells that are not visible onscreen are not included in the final rectangle

Any hints to implement BoxRect are welcome.

--- El dom 29-mar-09, Carlos German Tejero escribi?:

is it public? protected?

Jesus Reyes A.

__________________________________________________ Correo Yahoo!
Espacio para todos tus mensajes, antivirus y antispam ?gratis! Reg?strate ya - http://correo.yahoo.com.mx/

Sourceforge say: License : GNU Library or Lesser General Public License (LGPL) <http://sourceforge.net/softwaremap/trove_list.php?form_cat=16>, but some utnis are not:

"Fds will free. Only source for FxBin,FxCache,FxMap,FxArray will accessed for some fee." (Readme.txt)

My idea is port to Lazarus/fpc and then remplace the units with my own implementation based in generics.

2009/3/29 Jesus Reyes

--- El dom 29-mar-09, Carlos German Tejero escribi?:

Sorry, I meant if BoxRect is a Public or a Protected method of grid, I suppose you are talking about grid because talked about cells I could be wrong. But anyway I implemented BoxRect method in grid in r19156, initally public, needs testing.

Jesus Reyes A.

__________________________________________________ Correo Yahoo!
Espacio para todos tus mensajes, antivirus y antispam ?gratis! Reg?strate ya - http://correo.yahoo.com.mx/

I think he was talking (protected, protected) about function BoxRect(ALeft, ATop, ARight, ABottom: Longint): TRect; Salvatore

Protected, defined in TCustomGrid.

Jesus Reyes wrote

I implemented BoxRect method in grid in r19156, initally public, needs testing.

I do not use this method, so I do not know how important it is, but it seems that Delphi returns "empty rect" (0, 0, 0, 0) if arguments are either unsorted or totally outside viewing area.

Additionally, I would suggest to use IntersectRect function for computing intersection instead of open-coding it.

Yes Protected, defined in TCustomGrid.

I will try grid in r19156.
Tahnks to all.

2009/3/29 Alexander Klenin

--- El dom 29-mar-09, Alexander Klenin escribi?:

I didn't know that it exist.

but it seems that Delphi returns "empty rect" (0, 0, 0, 0) if arguments are either unsorted or totally outside viewing area.

I don't know, "Call BoxRect to obtain the screen coordinates, in pixels, of the cells that run from the column with index ALeft to the column with index ARight ..." if I repleace tokens with numbers "... that run from the column with index 10 to the column with index 1 ..." it still makes sense to me.

I think test cases will clarify this, hope somebody can do it.

Additionally, I would suggest to use IntersectRect function for computing intersection instead of open-coding it.

It makes sense I will change it.

-- Alexander S. Klenin

Jesus Reyes A.

__________________________________________________ Correo Yahoo!
Espacio para todos tus mensajes, antivirus y antispam ?gratis! Reg?strate ya - http://correo.yahoo.com.mx/

I'm sorry to disappoint you but seems that this fxds sources are heavily based on Borland original decision cube sources from delphi6. Better check it before any serious usage.

Boguslaw

fxds is the same has Delphi Decision Cube. The fxds is a release of the original autor.

2009/3/30 Bogus?aw Brandys

Carlos German Tejero wrote

fxds is the same has Delphi Decision Cube. The fxds is a release of the original autor.

OCH! That's great! So is it really free ? Then I'm starting to port it too :-)

Boguslaw

Unfortunately it looks like the fxds source code on source forge is incomplete so you cannot take this solution very far from the Delphi 6/7 point.

I use the fxds in a real application made in delphi 7 and work fine. The Delphi version of Desicion cube can only used with BDE TDataSet descendants, the fxds can be used with any TDataSet descendant.

2009/3/30 Doug Chamberlin

Carlos German Tejero wrote

I use the fxds in a real application made in delphi 7 and work fine. The Delphi version of Desicion cube can only used with BDE TDataSet descendants, the fxds can be used with any TDataSet descendant.

That's good to hear! I'm very interested in porting to Delphi 2009 but it looks like that is out of the question. Looks like the whole project was abandoned in 2004. I would hope the author would realize there will be no revenue forthcoming and open source the remainder of the code.

Doug Chamberlin pisze:

I have sources of fxds from sourceforge compile and install into lazarus. I'm not sure about them however, they contain a few units with Borland license header.
At least I proved fxds can be installed in lazarus ide. From quick look much changes are needed for chart support and decision change panel.

Boguslaw