Recent

Author Topic: PascalScada not usable with Trunk 64 maybe others too ?  (Read 2839 times)

jamie

  • Hero Member
  • *****
  • Posts: 6090
PascalScada not usable with Trunk 64 maybe others too ?
« on: October 25, 2021, 05:36:17 pm »
I just installed that package from online and it installs correctly however, many of the visual controls for the HMI like Panel transparent button etc drop on the form with no size, locks up the IDE when trying to size it.

 The TProgress bar is almost impossible to move etc..

 I was able to uninstall it.

 This was on Windows 10 Pro 64 with 64 bit Trunk..

Just thought I was throw that out there.


P.S.
 I had one ModBudRTU and SerialPort control on the form at the time.

« Last Edit: October 25, 2021, 05:43:22 pm by jamie »
The only true wisdom is knowing you know nothing

AlexTP

  • Hero Member
  • *****
  • Posts: 2386
    • UVviewsoft
Re: PascalScada not usable with Trunk 64 maybe others too ?
« Reply #1 on: October 25, 2021, 05:57:40 pm »
It's strange that I cannot find the forum for PascalScada. Devs don't care?

wp

  • Hero Member
  • *****
  • Posts: 11857
Re: PascalScada not usable with Trunk 64 maybe others too ?
« Reply #2 on: October 25, 2021, 06:21:15 pm »
The controls with zero size do not specify Width and Height in their constructor, neither directly, nor in the Lazarus way of providing a GetControlClassDefaultSize method. With the following modification of THMICustomBasicValue and rebuilding the IDE, the valve draws correctly upon dropping on the form:

Code: Pascal  [Select][+][-]
  1. type
  2.   THMICustomBasicValve = class(THMIBasicControl)
  3.   private
  4.     ...
  5.   protected
  6.     ...
  7.     class function GetControlClassDefaultSize: TSize; override;
  8.   public
  9.     ...
  10.   end;
  11.  
  12. constructor THMICustomBasicValve.Create(AOwner: TComponent);
  13. begin
  14.   ...
  15.   with GetControlClassDefaultSize do
  16.     SetInitialBounds(0, 0, CX, CY);
  17. end;
  18.  
  19. class function THMICustomBasicValve.GetControlClassDefaultSize: TSize;
  20. begin
  21.   Result.CX := 59;
  22.   Result.CY := 60;
  23. end;
  24.  

I guess that the other controls can be fixed in the same way. But where to report this?
« Last Edit: October 25, 2021, 06:23:09 pm by wp »

AlexTP

  • Hero Member
  • *****
  • Posts: 2386
    • UVviewsoft
Re: PascalScada not usable with Trunk 64 maybe others too ?
« Reply #3 on: October 25, 2021, 06:32:51 pm »
Contacts are 4 chat channels, see the bottom of https://www.pascalscada.com/

jamie

  • Hero Member
  • *****
  • Posts: 6090
Re: PascalScada not usable with Trunk 64 maybe others too ?
« Reply #4 on: October 25, 2021, 07:16:20 pm »
If memory serves me correctly Delphi automatically sets the Width ,Height t0 100,100 during construction if the base to Tcontrol is called or some basic value.

 So why does we need the preferred size to start with ?

 I would think that that method of getting the preferred size would be called after that if it's being supported.
The only true wisdom is knowing you know nothing

af0815

  • Hero Member
  • *****
  • Posts: 1289
Re: PascalScada not usable with Trunk 64 maybe others too ?
« Reply #5 on: October 25, 2021, 10:01:04 pm »
deleted.
« Last Edit: October 25, 2021, 10:09:16 pm by af0815 »
regards
Andreas

jamie

  • Hero Member
  • *****
  • Posts: 6090
Re: PascalScada not usable with Trunk 64 maybe others too ?
« Reply #6 on: October 26, 2021, 01:11:05 am »
What does that mean ? "Deleted" ?

Was it removed from the online package store ?

I installed it wondering if there was a DF1 driver in it for Allen Bradley ..

 As it is now I do have some code that can do DF1 over serial but its not installable for the component palette..

 I was going to see if I could create a DF1 driver for the PascalScada driver palette if it didn't have it.

 Well, I hope all works out well.


The only true wisdom is knowing you know nothing

af0815

  • Hero Member
  • *****
  • Posts: 1289
Re: PascalScada not usable with Trunk 64 maybe others too ?
« Reply #7 on: October 26, 2021, 02:01:39 pm »
I deleted the Post, because i was missing the correct answer  :o
regards
Andreas

 

TinyPortal © 2005-2018