Change dimensions gets FWH-24.09

[Cgallegoa]

Hi,

Is there any news ?

https://forums.fivetechsupport.com/view ... 9e93764db9

Still pending:

.- maria_connect
.- dimensions gets
.- pdfharu
.- buttonbmp

I apologize for insisting, as I would like to update my programs from FWH2310 to FWH2407, but unfortunately, this has not been possible due to the reported issues that still have no solution.

Thanks for your help, and best regards

[Enrico Maria Giordano]

I'm not aware of any pending bug. Please show a sample of each problem, so I can investigate.

[karinha]

.- pdfharu -> DONE!

https://forums.fivetechsupport.com/view ... c6#p274509

.- buttonbmp -> DONE!

https://forums.fivetechsupport.com/view ... c6#p274674

The rest haven't yet. Mr. Nages investigating.

Regards, saludos.

[Enrico Maria Giordano]

maria_connect is fixed:

https://forums.fivetechsupport.com/view ... 74ecadeddd

[Enrico Maria Giordano]

dimensions gets: can you provide a sample, please?

[Cgallegoa]

Please see this sample:
https://forums.fivetechsupport.com/view ... 71#p274358

Many thanks for your help.

Best regards,

[nageswaragunupudi]

.- dimensions gets

Are your gets from source code or resources?
please apply this fix in TGet.prg

Please locate this line in the metho New()

Code: Select all | Expand

   ::CalcSize( ::nTop, ::nLeft, nWidth, nHeight )

You may find this code near line 769 or one or two lines above or below.

Please comment out this line and let us know if this works:

Code: Select all | Expand

//   ::CalcSize( ::nTop, ::nLeft, nWidth, nHeight )

[Cgallegoa]

Mr. Rao, thanks for your help.

The issue with gets is from the source code. From resources, it works fine.

If I make this modification

Please comment out this line and let us know if this works:

Code: Select all | Expand

//   ::CalcSize( ::nTop, ::nLeft, nWidth, nHeight )

Commenting out the line "::CalcSize..." won't affect the rendering of the get dimensions in any other way, will it ? Is it safe to remove it without affecting the behavior of the TGet class ?

do I still need to make this other change, suggested by you on 10-06-2024 ?

Please change the last line as:

Code: Select all | Expand

METHOD CalcSize( nTop, nLeft, nWidth, nHeight, lRelative, oWnd, nBottom, nRight ) CLASS TControl // 2024-05-21

   local aRect
   local lTruePixel := .t.

   DEFAULT oWnd := ::oWnd, lRelative := oWnd:lAutoSizeCtrls

   if .f. //PCount() > 0

Regarding this suggestion, I have two concerns:
1. I believe this change has an error, as the original code of the CalcSize() Method checks for a numeric value with "if PCount() > 0", not a boolean "if .F.". This causes applications to break in other parts where ::CalcSize() is invoked.
2. The CalcSize Method in the Control.prg file from the FWH-24.09 version does not have the line "local lTruePixel := .t.". Why ? Is it important ?


Best regards,

[Horizon]

Hi Mr. Rao,

I think there is something not considered in the CalSize method. When I removed this method from TGroup, my groups returned to normal.

https://forums.fivetechsupport.com/view ... 3eb24c035e

[Cgallegoa]

I think there is something not considered in the CalSize method. When I removed this method from TGroup, my groups returned to normal.

I agree with you. Something is wrong with the ::CalcSize method. It affects the TGroup and TGet classes.

Mr. Rao,
- What is the reason or purpose of the ::CalcSize() method ?
- Can it be removed from these classes without affecting the behavior or appearance of the controls in the applications that instantiate them ?

Best Regards,