Conteúdo

Introdução

Antes de mais nada, sinta-se livre para enviar correções e alternativas para este método 🙂

O objetivo principal desta página é ensinar como instalar o último snapshot do PascalSCADA na última versão do Lazarus. Porque eu não irei explicar como instala-lo no Delphi ou em versões passadas do Lazarus são assuntos para uma outra página or se quiser, sinta-se livre para escrever as instruções de como instalar na IDE desejada.

Atenção: A versão atual do pacote PascalSCADA irá instalar outros pacotes juntos com ele (que são requisitos).  Estes pacotes são:

  • ZeosLib 7.2
  • BGRABitmap
  • BGRAControls

Então, se você não gosta de algum destes pacotes, sinta-se livre para criar um novo pacote do PascalSCADA sem os pacotes que você não gosta.

ATENÇÃO DOBRADA: O PascalSCADA não é como outros sistemas SCADA. Ele é um pacote, plugin ou addon (chame como quiser) que permite que  o Lazarus crie aplicações HMI/SCADA. Portanto, um assistente de instalação com os botões “Next”, “Next” e “finish” não está disponível.

O que preciso antes de iniciar?
  1. Última versão do Lazarus. Se você é usuário de Windows, você pode obter o Lazarus na página oficial: http://www.lazarus-ide.org/. Se você é usuário de Linux/FreeBSD, você pode obtê-lo a partir do repositório de software do seu sistema operacional.
  2. O último snapshot do PascalSCADA: Você viu o link de download no topo desta página?
  3. WinRAR ou outro aplicativo que consiga descompactar arquivos .bz2.
Instalando…

Bem, a primeira coisa a fazer é instalar o Lazarus. Eu não quero explicar como instalar o Lazarus em qualquer sistema operacional/plataforma que existe neste mundo, porque instalar o Lazarus é uma tarefa muito simples, tanto em Windows (Com o assistente de instalação com botões “Next”, “Next” e “Finish”)  quanto em Linux (Aqui com Linux Mint 17.3: sudo apt-get install…). Ao final do processo instalação do Lazarus, você deve abri-lo e ver algo semelhante a isto:

Instalação limpa do Lazarus
Instalação limpa do Lazarus

Se o seu Lazarus recém instalado se parece com o da imagem acima você está no caminho certo. O próximo passo é instalar o pacote do PascalSCADA. Por favor, esqueça do Lazarus por um momento. Vá para a sua pasta de Downloads e encontre o arquivo do PascalSCADA recém e descompacte-o em uma pasta de sua escolha.

Depois de extrair o arquivo, volte para o Lazarus e acesse o menu mostrado abaixo:

Instalando um novo pacote no Lazarus
Instalando um novo pacote no Lazarus

Clique neste menu e um diálogo para abrir arquivos será exibido:

Encontrando a instalação do PascalSCADA no sistema de arquivos
Encontrando a instalação do PascalSCADA no sistema de arquivos

Navegue até a pasta onde você descompactou os arquivos do PascalSCADA. Nesta pasta deverá existir os seguintes arquivos:

  • pascalscada_common.lpk
  • pascalscada_full.lpk
  • pascalscada.lpk
  • pascalscada_db.lpk
  • pascalscada_hmi.lpk

Se você não vê algum destes arquivos, verifique o arquivo baixado, paths, etc… Se tudo está OK, sua tela deverá ser parecida com esta:

Encontrando a instalação do PascalSCADA no sistema de arquivos (vista completa)
Encontrando a instalação do PascalSCADA no sistema de arquivos (vista completa)

Selecione o arquivo “pascalscada_full.lpk” e abra-o. A janela do pacote pascalscada_full será mostrada:

Pacote do PascalSCADA para instalação completa aberto
Pacote do PascalSCADA para instalação completa aberto

A última etapa é instalar o pacote na sua IDE. Para fazer isto, clique no botão “Usar >>” e em seguida no menu “Instalar”, como mostrado abaixo:

Instalando o PascalSCADA na IDE Lazarus
Instalando o PascalSCADA na IDE Lazarus

O pacote pascalscada_full é um metapacote, usado somente para fazer a instalação completa do PascalSCADA na sua IDE Lazarus. Por causa deste motivo, você será aborrecido com algumas mensagens:

Metapacote do PascalSCADA: necessário para simplificar a instalação completa
Metapacote do PascalSCADA: necessário para simplificar a instalação completa

Clique no botão “Install it, I like the fat” para continuar a instalação. A próxima tela irá mostrar uma lista com todos os pacotes que serão instalados durante o processo na sua IDE, como mostrado abaixo:

Lista dos pacotes adicionais que serão instalados
Lista dos pacotes adicionais que serão instalados

Uma imagem mais detalhada:

Lista dos pacotes adicionais que serão instalados
Lista dos pacotes adicionais que serão instalados

Clique no botão OK para continuar a instalação e chegar na pergunta final sobre o processo de recompilação da IDE, como pode ser vista abaixo:

Confirmando a recompilação do Lazarus
Confirmando a recompilação do Lazarus

Para finalizar, clique no botão “Sim”. O processo de instalação será iniciado e sua IDE será recompilada. Ao final do processo de recompilação, o Lazarus será reiniciado. Se você tem um projeto com alterações que não foram salvas, tenha cuidado!!

Após reiniciar a IDE, dependendo da sua versão do PascalSCADA, você deverá encontrar as seguintes paletas de componentes no seu Lazarus:

PascalSCADA instalado: guia de portas de comunicação
PascalSCADA instalado: guia de portas de comunicação
PascalSCADA instalado: guia com os protocolos de comunicação
PascalSCADA instalado: guia com os protocolos de comunicação
PascalSCADA instalado: guia com os componentes de utilidades
PascalSCADA instalado: guia com os componentes de utilidades
PascalSCADA instalado: guia com todos os tags
PascalSCADA instalado: guia com todos os tags
PascalSCADA instalado: guia com todos os controles de tela
PascalSCADA instalado: guia com todos os controles de tela
PascalSCADA instalado: guia com os controles de gerenciamento de usuários e segurança
PascalSCADA instalado: guia com os controles de gerenciamento de usuários e segurança
PascalSCADA instalado: guia com os componentes de banco de dados
PascalSCADA instalado: guia com os componentes de banco de dados
PascalSCADA instalado: guia com os componentes herdados do FreePascal
PascalSCADA instalado: guia com os componentes herdados do FreePascal

Se você consegue ver estas paletas, parabéns, você conseguiu instalar com sucesso o PascalSCADA na sua IDE Lazarus.

71 comentários em “Como instalar o PacalSCADA

  1. Fabio Luis Girardi Autor do postResponder

    To update on Codetyphon: you should remove the pl_pascalscada package first. Then edit the new PascalSCADA packages and replace some dependencies:

    ** on pascalscada_db package, replace ZComponent dependency by pl_zeosdbo
    ** on pascalscada_hmi_package, replace the BGRABitmap and BGRAControls by pl_BGRABitmap and pl_BGRAControls.

    After this, install the pascalscada_full.lpk

    On Delphi RAD Studio Berlin? I don’t know, since I don’t update the packages for Delphi since Delphi XE2. Can you try and explain to us?

    • Fabio Luis Girardi Autor do postResponder

      I did no tested PascalSCADA for Mac OS X, but it have no reasons to don’t work. Maybe we can test together?

    • Fabio Luis Girardi Autor do postResponder

      I set a virtual machine to test PascalSCADA on Mac OS X El captain. I found some issues related with constants and units that are not defined/available for Mac. I’m fixing theses issues. When it’s done I’ll notify you.

    • Fabio Luis Girardi Autor do postResponder

      3Picure: I finished the changes for Mac OS X today. Can you download the latest revision from SVN and test?

    • Fabio Luis Girardi Autor do postResponder

      Yes and No. I need to known your architecture to answer your question. Please tell-me, whats your PLC?

  2. robin Responder

    Hi,

    When i try to install the package in Lazarus i get alot of errors:

    Compile package BGRABitmapPack 8.8.4: Exit code 1, Errors: 50, Hints: 38
    bgracanvas2d.pas(370,21) Error: Operator is not overloaded: “TPointF” + “TPointF”
    bgracanvas2d.pas(371,21) Error: Operator is not overloaded: “TPointF” + “TPointF”
    bgracanvas2d.pas(386,34) Error: Incompatible type for arg no. 3: Got “TYPES.TPointF”, expected “BGRABITMAPTYPES.TPointF”
    bgratransform.pas(872,38) Hint: Found declaration: Fit(TPointF;TPointF;TPointF);
    bgracanvas2d.pas(446,71) Error: Incompatible type for arg no. 4: Got “TYPES.TPointF”, expected “BGRABITMAPTYPES.TPointF”
    bgragradientscanner.pas(1077,34) Hint: Found declaration: constructor Create(TBGRACustomGradient;TGradientType;TPointF;TPointF;Boolean=”FALSE”;Boolean=”FALSE”);
    bgragradientscanner.pas(1045,34) Hint: Found declaration: constructor Create(TBGRAPixel;TBGRAPixel;TGradientType;TPointF;TPointF;Boolean=”TRUE”;Boolean=”FALSE”);
    bgracanvas2d.pas(451,9) Error: Incompatible types: got “BGRABITMAPTYPES.TPointF” expected “TYPES.TPointF”
    bgracanvas2d.pas(452,9) Error: Incompatible types: got “BGRABITMAPTYPES.TPointF” expected “TYPES.TPointF”
    bgracanvas2d.pas(665,24) Error: function header doesn’t match any method of this class “GetShadowOffset:;”
    bgracanvas2d.pas(109,14) Error: Found declaration: GetShadowOffset:;
    bgracanvas2d.pas(667,13) Error: Incompatible types: got “BGRABITMAPTYPES.TPointF” expected “TYPES.TPointF”
    bgracanvas2d.pas(900,25) Error: function header doesn’t match any method of this class “FillPoly(const {Open} Array Of TPointF);”
    bgracanvas2d.pas(125,15) Error: Found declaration: FillPoly(const {Open} Array Of TPointF);
    bgracanvas2d.pas(905,38) Error: Incompatible type for arg no. 1: Got “{Open} Array Of TPointF”, expected “{Open} Array Of TPointF”
    bgracanvas2d.pas(141,15) Hint: Found declaration: DrawShadow(const {Open} Array Of TPointF;const {Open} Array Of TPointF);
    bgracanvas2d.pas(913,63) Error: Incompatible type for arg no. 2: Got “{Open} Array Of TPointF”, expected “{Open} Array Of TPointF”
    bgrapolygon.pas(498,11) Hint: Found declaration: FillPolyAntialiasWithTexture(TBGRACustomBitmap;{Open} Array Of TPointF;IBGRAScanner;Boolean;Boolean=”FALSE”);
    bgracanvas2d.pas(915,61) Error: Incompatible type for arg no. 2: Got “{Open} Array Of TPointF”, expected “{Open} Array Of TPointF”
    bgrapolygon.pas(472,11) Hint: Found declaration: FillPolyAliasedWithTexture(TBGRACustomBitmap;{Open} Array Of TPointF;IBGRAScanner;Boolean;TDrawMode);
    bgracanvas2d.pas(925,67) Error: Incompatible type for arg no. 2: Got “{Open} Array Of TPointF”, expected “{Open} Array Of TPointF”
    bgrapolygon.pas(498,11) Hint: Found declaration: FillPolyAntialiasWithTexture(TBGRACustomBitmap;{Open} Array Of TPointF;IBGRAScanner;Boolean;Boolean=”FALSE”);
    bgracanvas2d.pas(927,65) Error: Incompatible type for arg no. 2: Got “{Open} Array Of TPointF”, expected “{Open} Array Of TPointF”
    bgrapolygon.pas(472,11) Hint: Found declaration: FillPolyAliasedWithTexture(TBGRACustomBitmap;{Open} Array Of TPointF;IBGRAScanner;Boolean;TDrawMode);
    bgracanvas2d.pas(932,67) Error: Incompatible type for arg no. 2: Got “{Open} Array Of TPointF”, expected “{Open} Array Of TPointF”
    bgrapolygon.pas(498,11) Hint: Found declaration: FillPolyAntialiasWithTexture(TBGRACustomBitmap;{Open} Array Of TPointF;IBGRAScanner;Boolean;Boolean=”FALSE”);
    bgracanvas2d.pas(934,65) Error: Incompatible type for arg no. 2: Got “{Open} Array Of TPointF”, expected “{Open} Array Of TPointF”
    bgrapolygon.pas(472,11) Hint: Found declaration: FillPolyAliasedWithTexture(TBGRACustomBitmap;{Open} Array Of TPointF;IBGRAScanner;Boolean;TDrawMode);
    bgracanvas2d.pas(940,54) Error: Incompatible type for arg no. 2: Got “{Open} Array Of TPointF”, expected “{Open} Array Of TPointF”
    bgrapolygon.pas(485,11) Hint: Found declaration: FillPolyAntialias(TBGRACustomBitmap;{Open} Array Of TPointF;TBGRAPixel;Boolean;Boolean;Boolean=”FALSE”);
    bgracanvas2d.pas(942,52) Error: Incompatible type for arg no. 2: Got “{Open} Array Of TPointF”, expected “{Open} Array Of TPointF”
    bgrapolygon.pas(459,11) Hint: Found declaration: FillPolyAliased(TBGRACustomBitmap;{Open} Array Of TPointF;TBGRAPixel;Boolean;Boolean;TDrawMode);
    bgracanvas2d.pas(947,25) Error: function header doesn’t match any method of this class “FillStrokePoly(const {Open} Array Of TPointF;Boolean);”
    bgracanvas2d.pas(126,15) Error: Found declaration: FillStrokePoly(const {Open} Array Of TPointF;Boolean);
    bgracanvas2d.pas(966,28) Error: Incompatible type for arg no. 1: Got “{Open} Array Of TPointF”, expected “{Open} Array Of TPointF”
    bgrapolygon.pas(638,33) Hint: Found declaration: AddPolygon(const {Open} Array Of TPointF;IBGRAScanner);
    bgrapolygon.pas(631,33) Hint: Found declaration: AddPolygon(const {Open} Array Of TPointF;TBGRAPixel);
    bgracanvas2d.pas(974,32) Error: Incompatible type for arg no. 1: Got “{Open} Array Of TPointF”, expected “{Open} Array Of TPointF”
    bgrapolygon.pas(638,33) Hint: Found declaration: AddPolygon(const {Open} Array Of TPointF;IBGRAScanner);
    bgrapolygon.pas(631,33) Hint: Found declaration: AddPolygon(const {Open} Array Of TPointF;TBGRAPixel);
    bgracanvas2d.pas(976,32) Error: Incompatible type for arg no. 1: Got “{Open} Array Of TPointF”, expected “{Open} Array Of TPointF”
    bgrapolygon.pas(638,33) Hint: Found declaration: AddPolygon(const {Open} Array Of TPointF;IBGRAScanner);
    bgrapolygon.pas(631,33) Hint: Found declaration: AddPolygon(const {Open} Array Of TPointF;TBGRAPixel);
    bgracanvas2d.pas(979,72) Error: Incompatible type for arg no. 2: Got “TBGRAPixel”, expected “IBGRAScanner”
    bgrapolygon.pas(638,33) Hint: Found declaration: AddPolygon(const {Open} Array Of TPointF;IBGRAScanner);
    bgrapolygon.pas(631,33) Hint: Found declaration: AddPolygon(const {Open} Array Of TPointF;TBGRAPixel);
    bgracanvas2d.pas(984,48) Error: Incompatible type for arg no. 1: Got “{Open} Array Of TPointF”, expected “{Open} Array Of TPointF”
    bgrapen.pas(761,10) Hint: Found declaration: ComputeWidePolylinePoints(const {Open} Array Of TPointF;Single;TBGRAPixel;TFPPenEndCap;TFPPenJoinStyle;const TBGRAPenStyle;TBGRAPolyLineOptions;Single=”2″;TComputeArrowHeadProc=”nil”;Single=”0″;TComputeArrowHeadProc=”nil”;Single=”0″):{Dynamic} Array Of TP
    bgracanvas2d.pas(993,31) Error: Incompatible type for arg no. 1: Got “{Dynamic} Array Of TPointF”, expected “{Open} Array Of TPointF”
    bgrapolygon.pas(638,33) Hint: Found declaration: AddPolygon(const {Open} Array Of TPointF;IBGRAScanner);
    bgrapolygon.pas(631,33) Hint: Found declaration: AddPolygon(const {Open} Array Of TPointF;TBGRAPixel);
    bgracanvas2d.pas(1000,76) Error: Incompatible type for arg no. 2: Got “TBGRAPixel”, expected “IBGRAScanner”
    bgrapolygon.pas(638,33) Hint: Found declaration: AddPolygon(const {Open} Array Of TPointF;IBGRAScanner);
    bgrapolygon.pas(631,33) Hint: Found declaration: AddPolygon(const {Open} Array Of TPointF;TBGRAPixel);
    bgracanvas2d.pas(1002,33) Error: Incompatible type for arg no. 1: Got “{Dynamic} Array Of TPointF”, expected “{Open} Array Of TPointF”
    bgrapolygon.pas(638,33) Hint: Found declaration: AddPolygon(const {Open} Array Of TPointF;IBGRAScanner);
    bgrapolygon.pas(631,33) Hint: Found declaration: AddPolygon(const {Open} Array Of TPointF;TBGRAPixel);
    bgracanvas2d.pas(1004,48) Error: Incompatible type for arg no. 2: Got “{Dynamic} Array Of TPointF”, expected “{Open} Array Of TPointF”
    bgracanvas2d.pas(141,15) Hint: Found declaration: DrawShadow(const {Open} Array Of TPointF;const {Open} Array Of TPointF);
    bgracanvas2d.pas(1006,40) Error: Incompatible type for arg no. 1: Got “{Open} Array Of TPointF”, expected “{Open} Array Of TPointF”
    bgracanvas2d.pas(141,15) Hint: Found declaration: DrawShadow(const {Open} Array Of TPointF;const {Open} Array Of TPointF);
    bgracanvas2d.pas(1091,25) Error: function header doesn’t match any method of this class “SetShadowOffset(const TPointF);”
    bgracanvas2d.pas(134,15) Error: Found declaration: SetShadowOffset(const TPointF);
    bgracanvas2d.pas(1128,25) Error: function header doesn’t match any method of this class “StrokePoly(const {Open} Array Of TPointF);”
    bgracanvas2d.pas(140,15) Error: Found declaration: StrokePoly(const {Open} Array Of TPointF);
    bgracanvas2d.pas(1135,46) Error: Incompatible type for arg no. 1: Got “{Open} Array Of TPointF”, expected “{Open} Array Of TPointF”
    bgrapen.pas(761,10) Hint: Found declaration: ComputeWidePolylinePoints(const {Open} Array Of TPointF;Single;TBGRAPixel;TFPPenEndCap;TFPPenJoinStyle;const TBGRAPenStyle;TBGRAPolyLineOptions;Single=”2″;TComputeArrowHeadProc=”nil”;Single=”0″;TComputeArrowHeadProc=”nil”;Single=”0″):{Dynamic} Array Of TP
    bgracanvas2d.pas(1138,39) Error: Incompatible type for arg no. 1: Got “{Dynamic} Array Of TPointF”, expected “{Open} Array Of TPointF”
    bgracanvas2d.pas(141,15) Hint: Found declaration: DrawShadow(const {Open} Array Of TPointF;const {Open} Array Of TPointF);
    bgracanvas2d.pas(1146,63) Error: Incompatible type for arg no. 2: Got “{Dynamic} Array Of TPointF”, expected “{Open} Array Of TPointF”
    bgrapolygon.pas(498,11) Hint: Found declaration: FillPolyAntialiasWithTexture(TBGRACustomBitmap;{Open} Array Of TPointF;IBGRAScanner;Boolean;Boolean=”FALSE”);
    bgracanvas2d.pas(1148,61) Error: Incompatible type for arg no. 2: Got “{Dynamic} Array Of TPointF”, expected “{Open} Array Of TPointF”
    bgrapolygon.pas(472,11) Hint: Found declaration: FillPolyAliasedWithTexture(TBGRACustomBitmap;{Open} Array Of TPointF;IBGRAScanner;Boolean;TDrawMode);
    bgracanvas2d.pas(1158,54) Error: Incompatible type for arg no. 2: Got “{Dynamic} Array Of TPointF”, expected “{Open} Array Of TPointF”
    bgrapolygon.pas(485,11) Hint: Found declaration: FillPolyAntialias(TBGRACustomBitmap;{Open} Array Of TPointF;TBGRAPixel;Boolean;Boolean;Boolean=”FALSE”);
    bgracanvas2d.pas(1160,52) Error: Incompatible type for arg no. 2: Got “{Dynamic} Array Of TPointF”, expected “{Open} Array Of TPointF”
    bgrapolygon.pas(459,11) Hint: Found declaration: FillPolyAliased(TBGRACustomBitmap;{Open} Array Of TPointF;TBGRAPixel;Boolean;Boolean;TDrawMode);
    bgracanvas2d.pas(1165,65) Error: Incompatible type for arg no. 2: Got “{Dynamic} Array Of TPointF”, expected “{Open} Array Of TPointF”
    bgrapolygon.pas(498,11) Hint: Found declaration: FillPolyAntialiasWithTexture(TBGRACustomBitmap;{Open} Array Of TPointF;IBGRAScanner;Boolean;Boolean=”FALSE”);
    bgracanvas2d.pas(1167,63) Error: Incompatible type for arg no. 2: Got “{Dynamic} Array Of TPointF”, expected “{Open} Array Of TPointF”
    bgrapolygon.pas(472,11) Hint: Found declaration: FillPolyAliasedWithTexture(TBGRACustomBitmap;{Open} Array Of TPointF;IBGRAScanner;Boolean;TDrawMode);
    bgracanvas2d.pas(1172,25) Error: function header doesn’t match any method of this class “DrawShadow(const {Open} Array Of TPointF;const {Open} Array Of TPointF);”
    bgracanvas2d.pas(141,15) Error: Found declaration: DrawShadow(const {Open} Array Of TPointF;const {Open} Array Of TPointF);
    bgracanvas2d.pas(1185,29) Error: Incompatible type for arg no. 1: Got “TYPES.TPointF”, expected “BGRABITMAPTYPES.TPointF”
    geometrytypes.inc(797,10) Hint: Found declaration: isEmptyPointF(const TPointF):Boolean;
    bgracanvas2d.pas(1203,13) Error: Incompatible types: got “BGRABITMAPTYPES.TPointF” expected “TYPES.TPointF”
    bgracanvas2d.pas(1224,15) Error: Incompatible types: got “BGRABITMAPTYPES.TPointF” expected “TYPES.TPointF”
    bgracanvas2d.pas(1233,51) Error: Incompatible type for arg no. 2: Got “TBGRAPixel”, expected “IBGRAScanner”
    Compile package pascalscript 0.0.0.1: Aborted
    Compile package IDEIntf 1.0: Aborted
    Compile package zparsesql 7.2: Success
    Compile package zdbc 7.2: Aborted, Warnings: 4
    ZDbcCache.pas(3224,54) Warning: Symbol “PBOOLEAN” is deprecated
    ZDbcCache.pas(3237,56) Warning: Symbol “PBOOLEAN” is deprecated
    ZDbcCache.pas(4641,54) Warning: Symbol “PBOOLEAN” is deprecated
    ZDbcCache.pas(4654,56) Warning: Symbol “PBOOLEAN” is deprecated

    I am running Windows 10.

    Any suggestions?

    • Fabio Luis Girardi Autor do postResponder

      Hi Robin!

      See my Reply to @Goran

      Test and report things that goes wrong.

      Thanks by your feedback!

  3. Goran Responder

    I have the similar errors. I install lazarus-1.6.4-fpc-3.0.2-win32.exe and pascalscada_0.7.3_20160726.tar.bz2 on windows XP sp2 and try the same files on windows 10 and I got the same errors:

    Compile package BGRABitmapPack 8.8.4: Exit code 1, Errors: 50, Hints: 38
    bgracanvas2d.pas(370,21) Error: Operator is not overloaded: “TPointF” + “TPointF”
    bgracanvas2d.pas(371,21) Error: Operator is not overloaded: “TPointF” + “TPointF”
    bgracanvas2d.pas(386,34) Error: Incompatible type for arg no. 3: Got “TYPES.TPointF”, expected “BGRABITMAPTYPES.TPointF”
    bgratransform.pas(872,38) Hint: Found declaration: Fit(TPointF;TPointF;TPointF);
    bgracanvas2d.pas(446,71) Error: Incompatible type for arg no. 4: Got “TYPES.TPointF”, expected “BGRABITMAPTYPES.TPointF”
    bgragradientscanner.pas(1077,34) Hint: Found declaration: constructor Create(TBGRACustomGradient;TGradientType;TPointF;TPointF;Boolean=”FALSE”;Boolean=”FALSE”);
    bgragradientscanner.pas(1045,34) Hint: Found declaration: constructor Create(TBGRAPixel;TBGRAPixel;TGradientType;TPointF;TPointF;Boolean=”TRUE”;Boolean=”FALSE”);
    bgracanvas2d.pas(451,9) Error: Incompatible types: got “BGRABITMAPTYPES.TPointF” expected “TYPES.TPointF”
    bgracanvas2d.pas(452,9) Error: Incompatible types: got “BGRABITMAPTYPES.TPointF” expected “TYPES.TPointF”
    bgracanvas2d.pas(665,24) Error: function header doesn’t match any method of this class “GetShadowOffset:;”
    bgracanvas2d.pas(109,14) Error: Found declaration: GetShadowOffset:;
    bgracanvas2d.pas(667,13) Error: Incompatible types: got “BGRABITMAPTYPES.TPointF” expected “TYPES.TPointF”
    bgracanvas2d.pas(900,25) Error: function header doesn’t match any method of this class “FillPoly(const {Open} Array Of TPointF);”
    bgracanvas2d.pas(125,15) Error: Found declaration: FillPoly(const {Open} Array Of TPointF);
    bgracanvas2d.pas(905,38) Error: Incompatible type for arg no. 1: Got “{Open} Array Of TPointF”, expected “{Open} Array Of TPointF”
    bgracanvas2d.pas(141,15) Hint: Found declaration: DrawShadow(const {Open} Array Of TPointF;const {Open} Array Of TPointF);
    bgracanvas2d.pas(913,63) Error: Incompatible type for arg no. 2: Got “{Open} Array Of TPointF”, expected “{Open} Array Of TPointF”
    bgrapolygon.pas(498,11) Hint: Found declaration: FillPolyAntialiasWithTexture(TBGRACustomBitmap;{Open} Array Of TPointF;IBGRAScanner;Boolean;Boolean=”FALSE”);
    bgracanvas2d.pas(915,61) Error: Incompatible type for arg no. 2: Got “{Open} Array Of TPointF”, expected “{Open} Array Of TPointF”
    bgrapolygon.pas(472,11) Hint: Found declaration: FillPolyAliasedWithTexture(TBGRACustomBitmap;{Open} Array Of TPointF;IBGRAScanner;Boolean;TDrawMode);
    bgracanvas2d.pas(925,67) Error: Incompatible type for arg no. 2: Got “{Open} Array Of TPointF”, expected “{Open} Array Of TPointF”
    bgrapolygon.pas(498,11) Hint: Found declaration: FillPolyAntialiasWithTexture(TBGRACustomBitmap;{Open} Array Of TPointF;IBGRAScanner;Boolean;Boolean=”FALSE”);
    bgracanvas2d.pas(927,65) Error: Incompatible type for arg no. 2: Got “{Open} Array Of TPointF”, expected “{Open} Array Of TPointF”
    bgrapolygon.pas(472,11) Hint: Found declaration: FillPolyAliasedWithTexture(TBGRACustomBitmap;{Open} Array Of TPointF;IBGRAScanner;Boolean;TDrawMode);
    bgracanvas2d.pas(932,67) Error: Incompatible type for arg no. 2: Got “{Open} Array Of TPointF”, expected “{Open} Array Of TPointF”
    bgrapolygon.pas(498,11) Hint: Found declaration: FillPolyAntialiasWithTexture(TBGRACustomBitmap;{Open} Array Of TPointF;IBGRAScanner;Boolean;Boolean=”FALSE”);
    bgracanvas2d.pas(934,65) Error: Incompatible type for arg no. 2: Got “{Open} Array Of TPointF”, expected “{Open} Array Of TPointF”
    bgrapolygon.pas(472,11) Hint: Found declaration: FillPolyAliasedWithTexture(TBGRACustomBitmap;{Open} Array Of TPointF;IBGRAScanner;Boolean;TDrawMode);
    bgracanvas2d.pas(940,54) Error: Incompatible type for arg no. 2: Got “{Open} Array Of TPointF”, expected “{Open} Array Of TPointF”
    bgrapolygon.pas(485,11) Hint: Found declaration: FillPolyAntialias(TBGRACustomBitmap;{Open} Array Of TPointF;TBGRAPixel;Boolean;Boolean;Boolean=”FALSE”);
    bgracanvas2d.pas(942,52) Error: Incompatible type for arg no. 2: Got “{Open} Array Of TPointF”, expected “{Open} Array Of TPointF”
    bgrapolygon.pas(459,11) Hint: Found declaration: FillPolyAliased(TBGRACustomBitmap;{Open} Array Of TPointF;TBGRAPixel;Boolean;Boolean;TDrawMode);
    bgracanvas2d.pas(947,25) Error: function header doesn’t match any method of this class “FillStrokePoly(const {Open} Array Of TPointF;Boolean);”
    bgracanvas2d.pas(126,15) Error: Found declaration: FillStrokePoly(const {Open} Array Of TPointF;Boolean);
    bgracanvas2d.pas(966,28) Error: Incompatible type for arg no. 1: Got “{Open} Array Of TPointF”, expected “{Open} Array Of TPointF”
    bgrapolygon.pas(638,33) Hint: Found declaration: AddPolygon(const {Open} Array Of TPointF;IBGRAScanner);
    bgrapolygon.pas(631,33) Hint: Found declaration: AddPolygon(const {Open} Array Of TPointF;TBGRAPixel);
    bgracanvas2d.pas(974,32) Error: Incompatible type for arg no. 1: Got “{Open} Array Of TPointF”, expected “{Open} Array Of TPointF”
    bgrapolygon.pas(638,33) Hint: Found declaration: AddPolygon(const {Open} Array Of TPointF;IBGRAScanner);
    bgrapolygon.pas(631,33) Hint: Found declaration: AddPolygon(const {Open} Array Of TPointF;TBGRAPixel);
    bgracanvas2d.pas(976,32) Error: Incompatible type for arg no. 1: Got “{Open} Array Of TPointF”, expected “{Open} Array Of TPointF”
    bgrapolygon.pas(638,33) Hint: Found declaration: AddPolygon(const {Open} Array Of TPointF;IBGRAScanner);
    bgrapolygon.pas(631,33) Hint: Found declaration: AddPolygon(const {Open} Array Of TPointF;TBGRAPixel);
    bgracanvas2d.pas(979,72) Error: Incompatible type for arg no. 2: Got “TBGRAPixel”, expected “IBGRAScanner”
    bgrapolygon.pas(638,33) Hint: Found declaration: AddPolygon(const {Open} Array Of TPointF;IBGRAScanner);
    bgrapolygon.pas(631,33) Hint: Found declaration: AddPolygon(const {Open} Array Of TPointF;TBGRAPixel);
    bgracanvas2d.pas(984,48) Error: Incompatible type for arg no. 1: Got “{Open} Array Of TPointF”, expected “{Open} Array Of TPointF”
    bgrapen.pas(761,10) Hint: Found declaration: ComputeWidePolylinePoints(const {Open} Array Of TPointF;Single;TBGRAPixel;TFPPenEndCap;TFPPenJoinStyle;const TBGRAPenStyle;TBGRAPolyLineOptions;Single=”2″;TComputeArrowHeadProc=”nil”;Single=”0″;TComputeArrowHeadProc=”nil”;Single=”0″):{Dynamic} Array Of TP
    bgracanvas2d.pas(993,31) Error: Incompatible type for arg no. 1: Got “{Dynamic} Array Of TPointF”, expected “{Open} Array Of TPointF”
    bgrapolygon.pas(638,33) Hint: Found declaration: AddPolygon(const {Open} Array Of TPointF;IBGRAScanner);
    bgrapolygon.pas(631,33) Hint: Found declaration: AddPolygon(const {Open} Array Of TPointF;TBGRAPixel);
    bgracanvas2d.pas(1000,76) Error: Incompatible type for arg no. 2: Got “TBGRAPixel”, expected “IBGRAScanner”
    bgrapolygon.pas(638,33) Hint: Found declaration: AddPolygon(const {Open} Array Of TPointF;IBGRAScanner);
    bgrapolygon.pas(631,33) Hint: Found declaration: AddPolygon(const {Open} Array Of TPointF;TBGRAPixel);
    bgracanvas2d.pas(1002,33) Error: Incompatible type for arg no. 1: Got “{Dynamic} Array Of TPointF”, expected “{Open} Array Of TPointF”
    bgrapolygon.pas(638,33) Hint: Found declaration: AddPolygon(const {Open} Array Of TPointF;IBGRAScanner);
    bgrapolygon.pas(631,33) Hint: Found declaration: AddPolygon(const {Open} Array Of TPointF;TBGRAPixel);
    bgracanvas2d.pas(1004,48) Error: Incompatible type for arg no. 2: Got “{Dynamic} Array Of TPointF”, expected “{Open} Array Of TPointF”
    bgracanvas2d.pas(141,15) Hint: Found declaration: DrawShadow(const {Open} Array Of TPointF;const {Open} Array Of TPointF);
    bgracanvas2d.pas(1006,40) Error: Incompatible type for arg no. 1: Got “{Open} Array Of TPointF”, expected “{Open} Array Of TPointF”
    bgracanvas2d.pas(141,15) Hint: Found declaration: DrawShadow(const {Open} Array Of TPointF;const {Open} Array Of TPointF);
    bgracanvas2d.pas(1091,25) Error: function header doesn’t match any method of this class “SetShadowOffset(const TPointF);”
    bgracanvas2d.pas(134,15) Error: Found declaration: SetShadowOffset(const TPointF);
    bgracanvas2d.pas(1128,25) Error: function header doesn’t match any method of this class “StrokePoly(const {Open} Array Of TPointF);”
    bgracanvas2d.pas(140,15) Error: Found declaration: StrokePoly(const {Open} Array Of TPointF);
    bgracanvas2d.pas(1135,46) Error: Incompatible type for arg no. 1: Got “{Open} Array Of TPointF”, expected “{Open} Array Of TPointF”
    bgrapen.pas(761,10) Hint: Found declaration: ComputeWidePolylinePoints(const {Open} Array Of TPointF;Single;TBGRAPixel;TFPPenEndCap;TFPPenJoinStyle;const TBGRAPenStyle;TBGRAPolyLineOptions;Single=”2″;TComputeArrowHeadProc=”nil”;Single=”0″;TComputeArrowHeadProc=”nil”;Single=”0″):{Dynamic} Array Of TP
    bgracanvas2d.pas(1138,39) Error: Incompatible type for arg no. 1: Got “{Dynamic} Array Of TPointF”, expected “{Open} Array Of TPointF”
    bgracanvas2d.pas(141,15) Hint: Found declaration: DrawShadow(const {Open} Array Of TPointF;const {Open} Array Of TPointF);
    bgracanvas2d.pas(1146,63) Error: Incompatible type for arg no. 2: Got “{Dynamic} Array Of TPointF”, expected “{Open} Array Of TPointF”
    bgrapolygon.pas(498,11) Hint: Found declaration: FillPolyAntialiasWithTexture(TBGRACustomBitmap;{Open} Array Of TPointF;IBGRAScanner;Boolean;Boolean=”FALSE”);
    bgracanvas2d.pas(1148,61) Error: Incompatible type for arg no. 2: Got “{Dynamic} Array Of TPointF”, expected “{Open} Array Of TPointF”
    bgrapolygon.pas(472,11) Hint: Found declaration: FillPolyAliasedWithTexture(TBGRACustomBitmap;{Open} Array Of TPointF;IBGRAScanner;Boolean;TDrawMode);
    bgracanvas2d.pas(1158,54) Error: Incompatible type for arg no. 2: Got “{Dynamic} Array Of TPointF”, expected “{Open} Array Of TPointF”
    bgrapolygon.pas(485,11) Hint: Found declaration: FillPolyAntialias(TBGRACustomBitmap;{Open} Array Of TPointF;TBGRAPixel;Boolean;Boolean;Boolean=”FALSE”);
    bgracanvas2d.pas(1160,52) Error: Incompatible type for arg no. 2: Got “{Dynamic} Array Of TPointF”, expected “{Open} Array Of TPointF”
    bgrapolygon.pas(459,11) Hint: Found declaration: FillPolyAliased(TBGRACustomBitmap;{Open} Array Of TPointF;TBGRAPixel;Boolean;Boolean;TDrawMode);
    bgracanvas2d.pas(1165,65) Error: Incompatible type for arg no. 2: Got “{Dynamic} Array Of TPointF”, expected “{Open} Array Of TPointF”
    bgrapolygon.pas(498,11) Hint: Found declaration: FillPolyAntialiasWithTexture(TBGRACustomBitmap;{Open} Array Of TPointF;IBGRAScanner;Boolean;Boolean=”FALSE”);
    bgracanvas2d.pas(1167,63) Error: Incompatible type for arg no. 2: Got “{Dynamic} Array Of TPointF”, expected “{Open} Array Of TPointF”
    bgrapolygon.pas(472,11) Hint: Found declaration: FillPolyAliasedWithTexture(TBGRACustomBitmap;{Open} Array Of TPointF;IBGRAScanner;Boolean;TDrawMode);
    bgracanvas2d.pas(1172,25) Error: function header doesn’t match any method of this class “DrawShadow(const {Open} Array Of TPointF;const {Open} Array Of TPointF);”
    bgracanvas2d.pas(141,15) Error: Found declaration: DrawShadow(const {Open} Array Of TPointF;const {Open} Array Of TPointF);
    bgracanvas2d.pas(1185,29) Error: Incompatible type for arg no. 1: Got “TYPES.TPointF”, expected “BGRABITMAPTYPES.TPointF”
    geometrytypes.inc(797,10) Hint: Found declaration: isEmptyPointF(const TPointF):Boolean;
    bgracanvas2d.pas(1203,13) Error: Incompatible types: got “BGRABITMAPTYPES.TPointF” expected “TYPES.TPointF”
    bgracanvas2d.pas(1224,15) Error: Incompatible types: got “BGRABITMAPTYPES.TPointF” expected “TYPES.TPointF”
    bgracanvas2d.pas(1233,51) Error: Incompatible type for arg no. 2: Got “TBGRAPixel”, expected “IBGRAScanner”
    Compile package lhelpcontrolpkg 0.2: Aborted, Warnings: 1
    lhelpcontrol.pas(238,18) Warning: Symbol “CommandLine” is deprecated

    any idea?

    • Fabio Luis Girardi Autor do postResponder

      I think that this is caused because I used development versions of BGRABitmap and BGRAControls. Now I use stable versions of these libs. I’ll publish a new snapshot today. I did some tests with Lazarus 1.6.0 + FPC 3.0.0 Win32 and everything appears to be OK.

      Please test it. The updated snapshot file name is pascalscada_0.7.3_20170307.tar.bz2

      I’m uploading it now.

  4. robin Responder

    Do you have any tutorial/manual on how to do alarming with this packages?

    I would really like to see how this is done with modbus tcp.

    Best regards
    Robin

  5. Fabio Responder

    This should be done via source code because alarming is missing feature in PascalSCADA yet, because I’m not a skilled developer across multiple databases. So, write these components is a big problem to me.

    But in my applications, I use a TPLCBlock to read all alarms together. The write on database occurs on event OnValueChange. On this event handler I declare a array of strings, where each array element represents the message of each alarm of TPLCBLock. Each active alarm receive a identifier, on this case it’s the auto increment key of the alarms database table and it’s stored on the application during all the life of this alarm. When a alarm is finished, I use this alarm identifier to finish it on database. After finish it on database, the value 0 (zero) is assigned to the variable that stores the alarm identifier on application.

    I’ll write a example showing how implement this.

    • robin Responder

      Dear Fabio,

      Thank you for good information!! 🙂

      I would like to see the example on how to implement this. Please let me know when you have an example ready 🙂

      I really like PascalScada, you have done a great job.

    • robin Responder

      Hi Fabio,

      Thank you for the example 🙂
      Looks great!

      I managed to change it to modbus tcp and mysql.
      Now i need to figure out how to implement an acknowledge to the PLC. Keeping the alarm in the alarm list until it is acknowledged and normal status.

      Best regards

  6. Fabio Luis Girardi Autor do postResponder

    To keep alarms in alarm list while it’s not acknowledge is simple, change the where on active alarm list from:

    WHERE dt_finished IS NULL;

    To

    WHERE dt_finished IS NULL OR dt_ack IS NULL;

    • robin Responder

      Hi,

      Thank you!
      Yes, i figured out that 🙂

      But how can I at the same time update the ack column for the alarm in the database send an acknowledge value to a certain holding register (same index as alarm but in a higher range) in the PLC by selecting one alarm from the DBGrid and pressing an ACK button?

      What are the limitations on TPLCBlock? How many arrays can I have in one TPLCBlock? And how many TPLCBlocks can i have in my project before it gets to slow or crashes?

      Best regards

  7. Pawel Responder

    Hello,

    I need any example how I should configure components TCP_UDPPort, ISOTCPDriver, TagBit to work with S7 1200. Maybe small example, or step by step configuration..?

  8. Popescu Dragos Responder

    Hi,
    When I try to install pascalscada 0.7.5 I’ve got the error message “Cannot find fpdebug used by Lazarus”
    What I should to install?

    • Fabio Luis Girardi Autor do postResponder

      This error isn’t related with Pascalscada. Fpdebug is a package shipped with lazarus.

      You can try: menu packages => install/uninstall packages. Check if fpdebug is on the list on the left side of window that will open (installed packages). If yes, uninstall fpdebug, then click on button called “save and rebuild”

  9. George Vasiliou Responder

    Hello,
    i have trouble installing PascalScada under Debian 10 Testing with Lazarus 2.0.
    I got the bellow errors:

    Compile package pascalscada_common 0.7.5: Success, Hints: 2
    hsutils.pas(42,3) Note: Local variable “c” not used
    hsutils.pas(38,6) Hint: Unit “math” not used in hsutils
    Compile package BGRABitmapPack 9.6.1: Exit code 1, Errors: 7, Warnings: 137, Hints: 52
    bgrautf8.pas(157,13) Warning: Symbol “UTF8CharacterLength” is deprecated: “Use UTF8CodepointSize instead.”
    bgrawritepng.pas(279,6) Warning: Local variable “diff” does not seem to be initialized
    geometrytypes.inc(545,3) Hint: Variable “str” of a managed type does not seem to be initialized
    bgrablend.pas(219,7) Warning: Local variable “minxThird” does not seem to be initialized
    bgrablend.pas(219,7) Warning: Local variable “minx” does not seem to be initialized
    bgraresample.pas(380,30) Warning: Local variable “vertTransition” does not seem to be initialized
    bgraresample.pas(1498,19) Hint: Local variable “sum” does not seem to be initialized
    bgrapath.pas(398,5) Warning: Local variable “nb” does not seem to be initialized
    bgrapath.pas(448,5) Warning: Local variable “nb” does not seem to be initialized
    bgrapath.pas(1869,1) Warning: function result variable of a managed type does not seem to initialized
    bgrapath.pas(2412,30) Hint: Variable “APos” does not seem to be initialized
    bgrapath.pas(2429,38) Hint: Variable “APos” does not seem to be initialized
    bgrapen.pas(1359,65) Warning: Local variable “littleBorder” does not seem to be initialized
    bgrapen.pas(1433,27) Warning: Local variable “leftInter” does not seem to be initialized
    bgrapen.pas(1435,59) Warning: Local variable “rightInter” does not seem to be initialized
    bgrapen.pas(1509,24) Warning: Local variable “results” of a managed type does not seem to be initialized
    bgragradientscanner.pas(1615,64) Warning: Local variable “alpha” does not seem to be initialized
    bgragradientscanner.pas(1615,64) Warning: Local variable “pmask” does not seem to be initialized
    bgragradientscanner.pas(1615,64) Warning: Local variable “ptex” does not seem to be initialized
    bgragradientscanner.pas(1761,52) Warning: Local variable “alpha” does not seem to be initialized
    bgragradientscanner.pas(1761,52) Warning: Local variable “pmask” does not seem to be initialized
    bgragradientscanner.pas(1862,52) Warning: Local variable “ptex” does not seem to be initialized
    bgrapolygon.pas(1022,48) Hint: Variable “y2” does not seem to be initialized
    bgrapolygon.pas(1022,45) Hint: Variable “x2” does not seem to be initialized
    bgrapolygon.pas(1022,42) Hint: Variable “y1” does not seem to be initialized
    bgrapolygon.pas(1022,39) Hint: Variable “x1” does not seem to be initialized
    bgrapolygon.pas(1033,48) Hint: Variable “y2” does not seem to be initialized
    bgrapolygon.pas(1033,45) Hint: Variable “x2” does not seem to be initialized
    bgrapolygon.pas(1033,42) Hint: Variable “y1” does not seem to be initialized
    bgrapolygon.pas(1033,39) Hint: Variable “x1” does not seem to be initialized
    bgrasse.pas(334,19) Warning: Check size of memory operand “movss: memory-operand-size is 32 bits, but expected [128 bits]”
    bgrasse.pas(372,16) Warning: Check size of memory operand “movss: memory-operand-size is 32 bits, but expected [128 bits]”
    bgrasse.pas(402,16) Warning: Check size of memory operand “movss: memory-operand-size is 32 bits, but expected [128 bits]”
    bgrasse.pas(435,22) Warning: Check size of memory operand “movss: memory-operand-size is 64 bits, but expected [128 bits]”
    bgrasse.pas(446,22) Warning: Check size of memory operand “movss: memory-operand-size is 64 bits, but expected [128 bits]”
    perspectivecolorscan.inc(5,21) Warning: Check size of memory operand “movss: memory-operand-size is 32 bits, but expected [128 bits]”
    perspectivecolorscan.inc(7,21) Warning: Check size of memory operand “movss: memory-operand-size is 32 bits, but expected [128 bits]”
    perspectivecolorscan.inc(12,21) Warning: Check size of memory operand “movss: memory-operand-size is 32 bits, but expected [128 bits]”
    perspectivecolorscan.inc(14,21) Warning: Check size of memory operand “movss: memory-operand-size is 32 bits, but expected [128 bits]”
    perspectivecolorscan.inc(58,22) Warning: Check size of memory operand “movss: memory-operand-size is 32 bits, but expected [128 bits]”
    perspectivecolorscan.inc(5,21) Warning: Check size of memory operand “movss: memory-operand-size is 32 bits, but expected [128 bits]”
    perspectivecolorscan.inc(7,21) Warning: Check size of memory operand “movss: memory-operand-size is 32 bits, but expected [128 bits]”
    perspectivecolorscan.inc(12,21) Warning: Check size of memory operand “movss: memory-operand-size is 32 bits, but expected [128 bits]”
    perspectivecolorscan.inc(14,21) Warning: Check size of memory operand “movss: memory-operand-size is 32 bits, but expected [128 bits]”
    perspectivecolorscan.inc(58,22) Warning: Check size of memory operand “movss: memory-operand-size is 32 bits, but expected [128 bits]”
    perspectivecolorscan.inc(5,21) Warning: Check size of memory operand “movss: memory-operand-size is 32 bits, but expected [128 bits]”
    perspectivecolorscan.inc(7,21) Warning: Check size of memory operand “movss: memory-operand-size is 32 bits, but expected [128 bits]”
    perspectivecolorscan.inc(12,21) Warning: Check size of memory operand “movss: memory-operand-size is 32 bits, but expected [128 bits]”
    perspectivecolorscan.inc(14,21) Warning: Check size of memory operand “movss: memory-operand-size is 32 bits, but expected [128 bits]”
    perspectivecolorscan.inc(5,21) Warning: Check size of memory operand “movss: memory-operand-size is 32 bits, but expected [128 bits]”
    perspectivecolorscan.inc(7,21) Warning: Check size of memory operand “movss: memory-operand-size is 32 bits, but expected [128 bits]”
    perspectivecolorscan.inc(12,21) Warning: Check size of memory operand “movss: memory-operand-size is 32 bits, but expected [128 bits]”
    perspectivecolorscan.inc(14,21) Warning: Check size of memory operand “movss: memory-operand-size is 32 bits, but expected [128 bits]”
    perspectivescan2.inc(32,26) Warning: Check size of memory operand “movss: memory-operand-size is 32 bits, but expected [128 bits]”
    perspectivescan2.inc(32,26) Warning: Check size of memory operand “movss: memory-operand-size is 32 bits, but expected [128 bits]”
    perspectivescan2.inc(32,26) Warning: Check size of memory operand “movss: memory-operand-size is 32 bits, but expected [128 bits]”
    perspectivescan2.inc(32,26) Warning: Check size of memory operand “movss: memory-operand-size is 32 bits, but expected [128 bits]”
    perspectivescan2.inc(32,26) Warning: Check size of memory operand “movss: memory-operand-size is 32 bits, but expected [128 bits]”
    perspectivescan2.inc(32,26) Warning: Check size of memory operand “movss: memory-operand-size is 32 bits, but expected [128 bits]”
    perspectivescan2.inc(32,26) Warning: Check size of memory operand “movss: memory-operand-size is 32 bits, but expected [128 bits]”
    perspectivescan2.inc(32,26) Warning: Check size of memory operand “movss: memory-operand-size is 32 bits, but expected [128 bits]”
    perspectivescan2.inc(32,26) Warning: Check size of memory operand “movss: memory-operand-size is 32 bits, but expected [128 bits]”
    perspectivescan2.inc(32,26) Warning: Check size of memory operand “movss: memory-operand-size is 32 bits, but expected [128 bits]”
    perspectivescan2.inc(32,26) Warning: Check size of memory operand “movss: memory-operand-size is 32 bits, but expected [128 bits]”
    perspectivescan2.inc(32,26) Warning: Check size of memory operand “movss: memory-operand-size is 32 bits, but expected [128 bits]”
    perspectivescan2.inc(32,26) Warning: Check size of memory operand “movss: memory-operand-size is 32 bits, but expected [128 bits]”
    perspectivescan2.inc(32,26) Warning: Check size of memory operand “movss: memory-operand-size is 32 bits, but expected [128 bits]”
    perspectivescan2.inc(32,26) Warning: Check size of memory operand “movss: memory-operand-size is 32 bits, but expected [128 bits]”
    perspectivescan2.inc(32,26) Warning: Check size of memory operand “movss: memory-operand-size is 32 bits, but expected [128 bits]”
    perspectivescan2.inc(32,26) Warning: Check size of memory operand “movss: memory-operand-size is 32 bits, but expected [128 bits]”
    perspectivescan2.inc(32,26) Warning: Check size of memory operand “movss: memory-operand-size is 32 bits, but expected [128 bits]”
    perspectivescan2.inc(32,26) Warning: Check size of memory operand “movss: memory-operand-size is 32 bits, but expected [128 bits]”
    perspectivescan2.inc(32,26) Warning: Check size of memory operand “movss: memory-operand-size is 32 bits, but expected [128 bits]”
    perspectivescan2.inc(32,26) Warning: Check size of memory operand “movss: memory-operand-size is 32 bits, but expected [128 bits]”
    perspectivescan2.inc(32,26) Warning: Check size of memory operand “movss: memory-operand-size is 32 bits, but expected [128 bits]”
    perspectivescan2.inc(32,26) Warning: Check size of memory operand “movss: memory-operand-size is 32 bits, but expected [128 bits]”
    perspectivescan2.inc(32,26) Warning: Check size of memory operand “movss: memory-operand-size is 32 bits, but expected [128 bits]”
    perspectivescan2.inc(32,26) Warning: Check size of memory operand “movss: memory-operand-size is 32 bits, but expected [128 bits]”
    perspectivescan2.inc(32,26) Warning: Check size of memory operand “movss: memory-operand-size is 32 bits, but expected [128 bits]”
    perspectivescan2.inc(32,26) Warning: Check size of memory operand “movss: memory-operand-size is 32 bits, but expected [128 bits]”
    perspectivescan2.inc(32,26) Warning: Check size of memory operand “movss: memory-operand-size is 32 bits, but expected [128 bits]”
    perspectivescan2.inc(32,26) Warning: Check size of memory operand “movss: memory-operand-size is 32 bits, but expected [128 bits]”
    perspectivescan2.inc(32,26) Warning: Check size of memory operand “movss: memory-operand-size is 32 bits, but expected [128 bits]”
    perspectivescan2.inc(32,26) Warning: Check size of memory operand “movss: memory-operand-size is 32 bits, but expected [128 bits]”
    perspectivescan2.inc(32,26) Warning: Check size of memory operand “movss: memory-operand-size is 32 bits, but expected [128 bits]”
    perspectivescan2.inc(32,26) Warning: Check size of memory operand “movss: memory-operand-size is 32 bits, but expected [128 bits]”
    perspectivescan2.inc(32,26) Warning: Check size of memory operand “movss: memory-operand-size is 32 bits, but expected [128 bits]”
    perspectivescan2.inc(32,26) Warning: Check size of memory operand “movss: memory-operand-size is 32 bits, but expected [128 bits]”
    perspectivescan2.inc(32,26) Warning: Check size of memory operand “movss: memory-operand-size is 32 bits, but expected [128 bits]”
    perspectivescan2.inc(32,26) Warning: Check size of memory operand “movss: memory-operand-size is 32 bits, but expected [128 bits]”
    perspectivescan2.inc(32,26) Warning: Check size of memory operand “movss: memory-operand-size is 32 bits, but expected [128 bits]”
    perspectivescan2.inc(32,26) Warning: Check size of memory operand “movss: memory-operand-size is 32 bits, but expected [128 bits]”
    perspectivescan2.inc(32,26) Warning: Check size of memory operand “movss: memory-operand-size is 32 bits, but expected [128 bits]”
    perspectivescan2.inc(32,26) Warning: Check size of memory operand “movss: memory-operand-size is 32 bits, but expected [128 bits]”
    perspectivescan2.inc(32,26) Warning: Check size of memory operand “movss: memory-operand-size is 32 bits, but expected [128 bits]”
    perspectivescan2.inc(32,26) Warning: Check size of memory operand “movss: memory-operand-size is 32 bits, but expected [128 bits]”
    perspectivescan2.inc(32,26) Warning: Check size of memory operand “movss: memory-operand-size is 32 bits, but expected [128 bits]”
    perspectivescan2.inc(32,26) Warning: Check size of memory operand “movss: memory-operand-size is 32 bits, but expected [128 bits]”
    perspectivescan2.inc(32,26) Warning: Check size of memory operand “movss: memory-operand-size is 32 bits, but expected [128 bits]”
    perspectivescan2.inc(32,26) Warning: Check size of memory operand “movss: memory-operand-size is 32 bits, but expected [128 bits]”
    perspectivescan2.inc(32,26) Warning: Check size of memory operand “movss: memory-operand-size is 32 bits, but expected [128 bits]”
    bgracanvas.pas(917,36) Hint: Variable “y2” does not seem to be initialized
    bgracanvas.pas(917,33) Hint: Variable “x2” does not seem to be initialized
    bgracanvas.pas(917,30) Hint: Variable “y1” does not seem to be initialized
    bgracanvas.pas(917,27) Hint: Variable “x1” does not seem to be initialized
    bgracanvas.pas(996,36) Hint: Variable “y2” does not seem to be initialized
    bgracanvas.pas(996,33) Hint: Variable “x2” does not seem to be initialized
    bgracanvas.pas(996,30) Hint: Variable “y1” does not seem to be initialized
    bgracanvas.pas(996,27) Hint: Variable “x1” does not seem to be initialized
    bgracanvas2d.pas(962,3) Hint: Variable “AValue” of a managed type does not seem to be initialized
    bgracanvas2d.pas(1266,3) Hint: Variable “AValue” of a managed type does not seem to be initialized
    bgracanvas2d.pas(1570,25) Warning: function result variable of a managed type does not seem to initialized
    bgracanvas2d.pas(1843,3) Hint: Variable “repetition” of a managed type does not seem to be initialized
    blurfast.inc(170,12) Warning: Local variable “blurRowY” of a managed type does not seem to be initialized
    blurfast.inc(185,14) Warning: Local variable “blurRowX” of a managed type does not seem to be initialized
    blurnormal.inc(239,21) Warning: Local variable “sumA” does not seem to be initialized
    blurnormal.inc(239,21) Warning: Local variable “sumR” does not seem to be initialized
    blurnormal.inc(239,21) Warning: Local variable “sumG” does not seem to be initialized
    blurnormal.inc(239,21) Warning: Local variable “sumB” does not seem to be initialized
    blurnormal.inc(211,19) Warning: Local variable “DiffPixel” of a managed type does not seem to be initialized
    blurnormal.inc(168,15) Warning: Local variable “Pixel” of a managed type does not seem to be initialized
    blurnormal.inc(200,19) Warning: Local variable “DiffPixelArrayLineStart” of a managed type does not seem to be initialized
    blurnormal.inc(166,15) Warning: Local variable “PixelArrayLineStart” of a managed type does not seem to be initialized
    blurnormal.inc(239,21) Warning: Local variable “sumA” does not seem to be initialized
    blurnormal.inc(239,21) Warning: Local variable “sumR” does not seem to be initialized
    blurnormal.inc(239,21) Warning: Local variable “sumG” does not seem to be initialized
    blurnormal.inc(239,21) Warning: Local variable “sumB” does not seem to be initialized
    blurnormal.inc(211,19) Warning: Local variable “DiffPixel” of a managed type does not seem to be initialized
    blurnormal.inc(168,15) Warning: Local variable “Pixel” of a managed type does not seem to be initialized
    blurnormal.inc(200,19) Warning: Local variable “DiffPixelArrayLineStart” of a managed type does not seem to be initialized
    blurnormal.inc(166,15) Warning: Local variable “PixelArrayLineStart” of a managed type does not seem to be initialized
    blurnormal.inc(239,21) Warning: Local variable “sumA” does not seem to be initialized
    blurnormal.inc(239,21) Warning: Local variable “sumR” does not seem to be initialized
    blurnormal.inc(239,21) Warning: Local variable “sumG” does not seem to be initialized
    blurnormal.inc(239,21) Warning: Local variable “sumB” does not seem to be initialized
    blurnormal.inc(211,19) Warning: Local variable “DiffPixel” of a managed type does not seem to be initialized
    blurnormal.inc(168,15) Warning: Local variable “Pixel” of a managed type does not seem to be initialized
    blurnormal.inc(200,19) Warning: Local variable “DiffPixelArrayLineStart” of a managed type does not seem to be initialized
    blurnormal.inc(166,15) Warning: Local variable “PixelArrayLineStart” of a managed type does not seem to be initialized
    blurnormal.inc(239,21) Warning: Local variable “sumA” does not seem to be initialized
    blurnormal.inc(239,21) Warning: Local variable “sumR” does not seem to be initialized
    blurnormal.inc(239,21) Warning: Local variable “sumG” does not seem to be initialized
    blurnormal.inc(239,21) Warning: Local variable “sumB” does not seem to be initialized
    blurnormal.inc(211,19) Warning: Local variable “DiffPixel” of a managed type does not seem to be initialized
    blurnormal.inc(168,15) Warning: Local variable “Pixel” of a managed type does not seem to be initialized
    blurnormal.inc(200,19) Warning: Local variable “DiffPixelArrayLineStart” of a managed type does not seem to be initialized
    blurnormal.inc(166,15) Warning: Local variable “PixelArrayLineStart” of a managed type does not seem to be initialized
    bgrareadbmp.pas(229,23) Hint: Local variable “$result” does not seem to be initialized
    bgrareadbmp.pas(822,8) Warning: unreachable code
    bgrareadbmp.pas(845,8) Warning: unreachable code
    bgrareadbmp.pas(860,5) Note: Local variable “i” not used
    paletteformats.inc(339,24) Hint: Local variable “$result” does not seem to be initialized
    paletteformats.inc(326,24) Hint: Local variable “$result” does not seem to be initialized
    paletteformats.inc(319,24) Hint: Local variable “$result” does not seem to be initialized
    bgradefaultbitmap.pas(2053,29) Hint: Variable “ARect” does not seem to be initialized
    bgradefaultbitmap.pas(2393,3) Hint: Variable “sUTF8” of a managed type does not seem to be initialized
    bgradefaultbitmap.pas(3307,36) Hint: Variable “x” does not seem to be initialized
    bgradefaultbitmap.pas(3307,38) Hint: Variable “y” does not seem to be initialized
    bgradefaultbitmap.pas(3307,41) Hint: Variable “x2” does not seem to be initialized
    bgradefaultbitmap.pas(3307,44) Hint: Variable “y2” does not seem to be initialized
    bgradefaultbitmap.pas(3346,44) Hint: Variable “y2” does not seem to be initialized
    bgradefaultbitmap.pas(3346,41) Hint: Variable “x2” does not seem to be initialized
    bgradefaultbitmap.pas(3346,38) Hint: Variable “y” does not seem to be initialized
    bgradefaultbitmap.pas(3346,36) Hint: Variable “x” does not seem to be initialized
    bgradefaultbitmap.pas(4095,31) Hint: Variable “ABounds” does not seem to be initialized
    bgradefaultbitmap.pas(4120,31) Hint: Variable “ABounds” does not seem to be initialized
    bgradefaultbitmap.pas(4156,31) Hint: Variable “ABounds” does not seem to be initialized
    bgradefaultbitmap.pas(4270,14) Warning: Local variable “S” does not seem to be initialized
    bgradefaultbitmap.pas(4270,14) Warning: Local variable “Visited” of a managed type does not seem to be initialized
    bgradefaultbitmap.pas(4270,14) Warning: Local variable “VisitedLineSize” does not seem to be initialized
    bgradefaultbitmap.pas(4267,5) Warning: Local variable “Stack” of a managed type does not seem to be initialized
    bgradefaultbitmap.pas(4866,30) Hint: Variable “AOutputBounds” does not seem to be initialized
    bgradefaultbitmap.pas(4964,3) Hint: Variable “ABitmap” does not seem to be initialized
    bgradefaultbitmap.pas(5359,29) Hint: Variable “ARect” does not seem to be initialized
    bgradefaultbitmap.pas(5396,29) Hint: Variable “ARect” does not seem to be initialized
    bgradefaultbitmap.pas(5484,31) Hint: Variable “ABounds” does not seem to be initialized
    bgradefaultbitmap.pas(5498,31) Hint: Variable “ABounds” does not seem to be initialized
    bgradefaultbitmap.pas(5509,31) Hint: Variable “ABounds” does not seem to be initialized
    bgradefaultbitmap.pas(5522,31) Hint: Variable “ABounds” does not seem to be initialized
    bgradefaultbitmap.pas(5594,22) Hint: Variable “ARect” does not seem to be initialized
    bgradefaultbitmap.pas(5642,31) Hint: Variable “ABounds” does not seem to be initialized
    bgratext.pas(1174,26) Hint: Variable “ATextUTF8” of a managed type does not seem to be initialized
    bgralclbitmap.pas(681,7) Warning: unreachable code
    bgralclbitmap.pas(768,7) Warning: unreachable code
    bgragtkbitmap.pas(68,26) Error: Identifier not found “TGtk2DeviceContext”
    bgragtkbitmap.pas(68,44) Error: Error in type definition
    bgragtkbitmap.pas(118,36) Warning: unreachable code
    bgragtkbitmap.pas(123,5) Error: Illegal type conversion: “HDC” to “TGtkDeviceContext”
    bgragtkbitmap.pas(124,5) Error: Illegal type conversion: “HDC” to “TGtkDeviceContext”
    bgragtkbitmap.pas(129,36) Warning: unreachable code
    bgragtkbitmap.pas(229,36) Warning: unreachable code
    bgragtkbitmap.pas(230,25) Error: Illegal type conversion: “HDC” to “TGtkDeviceContext”
    bgragtkbitmap.pas(231,5) Error: Illegal type conversion: “HDC” to “TGtkDeviceContext”
    bgragtkbitmap.pas(234,36) Warning: unreachable code
    bgragtkbitmap.pas(272,5) Error: Illegal type conversion: “HDC” to “TGtkDeviceContext”
    bgragtkbitmap.pas(274,36) Warning: unreachable code
    Compile package zcore 7.2: Success, Hints: 4
    ZEncoding.pas(1743,67) Hint: Local variable “W” of a managed type does not seem to be initialized
    ZEncoding.pas(1894,67) Hint: Local variable “W” of a managed type does not seem to be initialized
    ZEncoding.pas(2112,57) Hint: Local variable “s” of a managed type does not seem to be initialized
    ZSysUtils.pas(2904,93) Hint: Function result variable of a managed type does not seem to be initialized
    Compile package zplain 7.2: Success, Warnings: 1, Hints: 1
    ZPlainFirebirdInterbaseConstants.pas(2307,21) Hint: C arrays are passed by reference
    ZPlainFirebirdDriver.pas(268,15) Warning: An inherited method is hidden by “Initialize;”
    Compile package pascalscada 0.7.5: Aborted, Hints: 13
    tag.pas(1143,49) Hint: Conversion between ordinals and pointers is not portable
    tag.pas(1179,25) Hint: Conversion between ordinals and pointers is not portable
    tag.pas(1180,25) Hint: Conversion between ordinals and pointers is not portable
    commport.pas(1047,31) Hint: Conversion between ordinals and pointers is not portable
    commport.pas(1082,40) Hint: Conversion between ordinals and pointers is not portable
    MelsecDriver.pas(460,3) Note: Local variable “qttags” not used
    MelsecDriver.pas(548,150) Hint: Local variable “tr” of a managed type does not seem to be initialized
    MelsecTCP.pas(76,4) Note: Local variable “aux” not used
    MelsecTCP.pas(327,3) Note: Local variable “i” not used
    MelsecTCP.pas(327,6) Note: Local variable “c” not used
    MelsecTCP.pas(327,9) Note: Local variable “c2” not used
    MelsecTCP.pas(327,13) Note: Local variable “size” not used
    MelsecTCP.pas(57,40) Hint: Unit “crossdatetime” not used in MelsecTCP

    • Fabio Luis Girardi Autor do postResponder

      Hi!

      What’s your OS?
      What’s your Lazarus version and arch (64 or 32 bits)?
      What’s your FPC version and arch (64 or 32 bits)?

  10. Jaco Responder

    Hi. I am trying to install Pascal Scada on the Raspberry Pi using the latest version of Lazarus (2.1.0) and FPC (3.3.1). The Bitmap controls wont install. I only need the Modbus Serial parts. How can I use only Modbus on a command line application ?

    • Fabio Luis Girardi Autor do postResponder

      Hi!

      Have you correctly setup the Raspberry Pi environment? Does your Rasp have at least 2GB of swap?

      Are you trying to install PascalSCADA via tarball ou via OPM? If you are trying to install via tarball/zip, please abort and use the package provided through OPM. For this, access menu Packages => Online Package manager, and then, choose PascalSCADA. I have a short article explaining how to install PascalSCADA via OPM, that in these days, it is the best way…

  11. Jeffrey Responder

    Hey

    i get an error when i try to install pascal scada in lazarus.

    Compile package pascalscada_full 0.7.5: exit code 1, errors 1;
    pascalscada_full.pas(10,3) fatal: cannot find lazarusPackagelntf used by pascalscada_full. Check if package FCL is in the dependencies of package pascalscada_full

    • Fabio Luis Girardi Autor do postResponder

      Appears to be a question specific to your Lazarus install environment. Had you tried to install PascalSCADA via OPM?

  12. Enrico Pugnali Responder

    Hi.
    I am trying to install Pascal Scada on the Raspberry Pi4 using the Lazarus (2.0.0) and FPC (3.0.4) via OPM.
    After download 4 packages and extract them, i have this error:

    Access Violation Press OK to ignore and risk data corruption.
    Press Abort to kill the program.

    Can you help me?
    Thanks

  13. ENRICO PUGNALI Responder

    Hi Fabio,
    I have increase swap memory to 2MB and then I have try to install PascalScada in Lazarus (2.0.0) via OPM.

    This is the OPM Sequence:
    1) Downloaded 4 packages (PascalScada with all dependency).
    2) Extracted all packages
    3) Opened and compiled these packages without error:
    bgrabitmappack.lpk, bgracontrols.lpk,
    pascalscada_common.lpk, pascalscada.lpk, pascalscada_db.lpk, pascalscada_hmi.lpk,
    pascalscada_full.lpk
    zcomponent.lpk

    At the end a popup asked to rebuild Lazarus with profile: IDE Normal;
    After presssed “Yes”, It compiled the profile without error, but at the end PascalScada packages are only extracted and not installed.
    Also bgracontrol.lpk and zcomponent.lpk was only extracted and not installed.

    Hve you any idea?

  14. Rodrigo Hernandes Responder

    Olá boa tarde tudo bem ?
    Percebi algo estranho no funcionamento.

    Programação em lazarus eu somente sei o básico , porem microcontrolador já faz um bom tempo que programo.

    Eu fiz a comunicação modbus , funcionou perfeitamente , porem como eu
    programei com um microcontrolador , então da para eu manipular os bits , eu percebi uma coisa , se eu desabilitar qualquer um
    dos bits de CRC (enviar zero no lugar), o scada pascal continua funcionar normalmente, ele somente para de receber se os dois bits de CRC
    são suspenso.

    Ele parece está fazendo um “ou” em vez de “E” no CRC ( ou esse ou aquele estiver correto)

    Para minha funcionalidade não haverá problema algum , porem só estou relatando pois está parecendo um erro pois aumenta a
    probabilidade de receber algum dado corrompido ….

    • Fabio Luis Girardi Autor do postResponder

      Boa tarde Rodrigo!

      Faz o seguinte: habilita o registro do log de comunicação no PascalSCADA e faz dois testes (e consequentemente, dois arquivos de log): Um com a geração de CRC habilitada no seu controlador E OUTRO TESTE com a geração do CRC desabilitada em seu controlador e me envia os dois arquivos de log. Descarregue os arquivos gerados neste link da minha conta no Mega ( https://mega.nz/megadrop/mHqhfY9fCzo ) para que eu possa investigar o que está acontecendo. Sinceramente isso não é para acontecer.

      Obrigado pelo feedback Rodrigo!

      • Rodrigo Hernandes Responder

        Acabei de enviar os arquivos de log que você pediu.
        fiz 4 arquivos de log.

        1º funcionando com os dois CRC ( Modo normal )
        2º desabilitei o primeiro CRC ( ele continua funcionando assim , recebendo dados na tela)
        3º desabilitei o segundo CRC ( ele continua funcionado assim , recebendo dados na tela)
        4º desabilitei os dois CRC ( assim para de mostrar na tela , é chamada o evento “OnCommErrorReading” )

        A versão que estou usando do Scada/pascal é a que vem disponível o download através do lazarus ( 0.75)

        Se quiser segunda feira te envio o código fonte do que estava fazendo
        não senho problema quanto a isso ….

        • Fabio Luis Girardi Autor do postResponder

          Consegue na sua aplicação colocar um TIPropertyGrid (paleta RTTI) e conectar a propriedade TIObject com o tag para observar qual valor a propriedade LastAsyncReadStatus está retornando?

          Se vc não tem este componente instalado, vc vai no menu Pacote -> Instalar/Desinstalar Pacotes (Package -> Install/Uninstall packages). Na tela que irá abrir, procure na lista da direita (Pacotes disponíveis/Available packages) o pacote “RunTimeTypeInfoControls 0.x”, selecione-o e clique no botão “Instalar seleção” (install selection) e logo em seguida no botão “Salvar e reconstruir IDE” (Save and rebuild IDE)

          Aguarde enquanto o lazarus instala o pacote e reinicia.

          Me mande um print da tela em designtime e em runtime.

          • Rodrigo Hernandes Responder

            Bom fiz na verdade um vídeo , talvez fique melhor visível.

            Já enviei o vídeo.

            tive um problema pois o TIPropertyGrid não atualizava em tempo real , até coloquei um timer com o comando TIPropertyGrid.update mas nada feito , ele somente atualizava quando clicava em cima dos itens dele.

            bom o vídeo está sequencial sem cortes …..
            O primeiro momento é com o CRC normal ou seja com dos dois CRC
            O segundo momento é sem o primeiro CRC
            O terceiro momento é sem O Ultimo CRC
            O Quarto é sem os dois CRC , neste caso ai sim ele para de atualizar os valores …….

            • Fabio Luis Girardi Autor do postResponder

              Vi o video. Preocupante. Vou ver se consigo simular esta situação. Caso contrário vou ver com você, para fazer um acesso remoto e tentar identificar este problema, lógico, se você concordar.

              • Rodrigo Hernandes Responder

                Sim concordo , porem terá que ser em algum final de semana( sábado ou domingo ) .
                Posso deixar tudo preparado quando precisar para o acesso online.

                Porem vou dar um “Pitaco”de como você pode fazer a simulação sem a controladora
                ( meio que ensinado o padre a rezar rsrsrs) , aqui fiz uma simulação sem o controlador .

                1º Coloquei dois conversores ( 2 USB / TTL ou 2 USB /rs485) liguei eles cruzados no computador.

                2º Usei um terminal serial ( Hércules Terminal )

                3º Somente programei para um unico endereço de memoria para os números ficarem mais simples (menores).

                4º Deixei um timeout bem longo EX: 5 segundos. e o delay timer em 2,5 segundos.

                5º Quando o scada pascal perguntar , eu envio a resposta pelo terminal , assim da para fazer a simulação.

                Fiz um vídeo e duas fotos de exemplo já vou enviar…..

                  • Rodrigo Hernandes Responder

                    Olá boa tarde.
                    pode sim , sábado ou domingo ?

                    Bom o ambiente de trabalho que você vai acessar é um Windows 7, instalação praticamente limpa , vai está dentro do Virtualbox.

                    Qual software você deseja usar para o acesso ?

                    ja vou deixar uma mini rede pronta rs 485 , no qual vai está ligado a controladora , e duas entradas no PC no qual pode se conectar o lazarus e algum monitor de serial.

                    • Fabio Luis Girardi Autor do post

                      Consegue sabado dia 27? Este final de semana estarei trabalhando em alguns clientes.

                  • Rodrigo Hernandes Responder

                    Dia 27 , quase certeza que sim.
                    Fica pré marcado para o dia 27.

                    Bom , para não ficar colocando dados inúteis aqui no seu site , vou enviando via e-mail para você ( o email de resposta deste site ), até porque depois vou ter que passar o acesso.

                    Qual programa vai usar para o acesso ? posso já adiantar e instalar….

          • Rodrigo Hernandes Responder

            Talvez te facilitaria mais ainda ….
            Posso fazer um vídeo com a aplicação rodando e fazer uma rede 485 onde com um outro conversor USB colocar um scanner de serial para visualizar os bits de entrada e saída em tempo real ( algo bem semelhante aos logs gerado)…

            Sua aplicação me ajudou bastante … por isso estou fazendo este feedback, grato.
            Rodrigo Hernandes

  15. Paulo Portugal Responder

    I try to install PascalScada on Lazarus Release 2.0.12 (win64) and I found an error when the package is installed. When I do ” Use->Install” it starts to compile but it stops in the unit “BGRATypewriter” in the function “function TBGRACustomTypeWriter.GetGlyphBox()” in line 595 “if g = nil then result := TAffineBox.EmptyBox else “.

    I have PascalScada working on Lazarus Release 2.0.6 (win64) without problems.

    Can you help me on that? I need urgently to solve this problem.

  16. Paulo Portugal Responder

    Thank you Fabio for the hyper-quick answer. It works ! (but I had to try to install twice. In the first installation everything was ok until building the Lazarus IDE. It gave an error on the pascal database. I try to install again and it worked!

    Once again, thank you !

  17. Thomas Responder

    Hi, I downloaded the latest package (0.7.5) today from sourceforge.
    I am running W10 – 64 Bits and during compile for I got the following error messages:

    (3104) Compiling bgratypewriter.pas
    C:\lazarus\Ext_Pack\PascalSCADA_0.7.5(1).tar\PascalSCADA_0.7.5\bgrabitmap\bgratypewriter.pas(31,25) Hint: (5024) Parameter “ADest” not used
    C:\lazarus\Ext_Pack\PascalSCADA_0.7.5(1).tar\PascalSCADA_0.7.5\bgrabitmap\bgratypewriter.pas(31,48) Hint: (5024) Parameter “AMatrix” not used
    C:\lazarus\Ext_Pack\PascalSCADA_0.7.5(1).tar\PascalSCADA_0.7.5\bgrabitmap\bgratypewriter.pas(83,32) Hint: (5024) Parameter “Tree” not used
    C:\lazarus\Ext_Pack\PascalSCADA_0.7.5(1).tar\PascalSCADA_0.7.5\bgrabitmap\bgratypewriter.pas(595,49) Error: (3349) Only static methods and static variables can be referenced through an object type
    C:\lazarus\Ext_Pack\PascalSCADA_0.7.5(1).tar\PascalSCADA_0.7.5\bgrabitmap\bgratypewriter.pas(598,91) Error: (3349) Only static methods and static variables can be referenced through an object type
    C:\lazarus\Ext_Pack\PascalSCADA_0.7.5(1).tar\PascalSCADA_0.7.5\bgrabitmap\bgratypewriter.pas(614,56) Error: (3349) Only static methods and static variables can be referenced through an object type
    C:\lazarus\Ext_Pack\PascalSCADA_0.7.5(1).tar\PascalSCADA_0.7.5\bgrabitmap\bgratypewriter.pas(656,96) Error: (3349) Only static methods and static variables can be referenced through an object type
    C:\lazarus\Ext_Pack\PascalSCADA_0.7.5(1).tar\PascalSCADA_0.7.5\bgrabitmap\bgratypewriter.pas(709,113) Error: (3349) Only static methods and static variables can be referenced through an object type
    C:\lazarus\Ext_Pack\PascalSCADA_0.7.5(1).tar\PascalSCADA_0.7.5\bgrabitmap\bgratypewriter.pas(712,51) Error: (3349) Only static methods and static variables can be referenced through an object type
    bgratypewriter.pas(963) Fatal: (10026) There were 6 errors compiling module, stopping
    Fatal: (1018) Compilation aborted

    Thanks and Best Reards – Thomas

  18. Vladimir Bazović Responder

    Hello,
    Thank you for excellent work and just a short question is there a CodeTyphon package planned? I think a lot of users now use CT and it would be “nice” to have support for it!

  19. Reid Responder

    I just update Lazarus 2.0.21 then trying to install PascalSCADA and got an error on installing. Use->Install” it starts to compile but it stops in the unit “BGRATypewriter” in the function “function TBGRACustomTypeWriter.GetGlyphBox()” in line 595 “if g = nil then result := TAffineBox.EmptyBox else “. I see that we need to do Install PascalSCADA using OPM. http://www.pascalscada.com/2017/04/04/pascalscada-on-opm-repository. I follow the instruction and got an error – Google 404. That’s an error.

  20. Rogerio Responder

    Olá Fabio, boa tarde!
    Gostaria de saber se a atual versão do lázaros a 2.2.0 é compatível com o pascalscada? É que tentei instalar o pacote mas esta dando 4 erros, relacionados a tipos de variáveis…….

    • Fabio Luis Girardi Autor do postResponder

      Olá Rogerio!

      Desculpe demorar tanto pra responder, tive problemas no e-mail antigo e somente hoje tive tempo de arrumar essa confusão.

      Sim, o PascalSCADA é compatível com o Lazarus 2.2.0, porem os pacotes que o PascalSCADA dependem ainda estão sendo ajustados para a nova versão. Notei recentemente que quem usa versões do Lazarus construidas com o FPCUPDeluxe que usam o FPC fixes (3.2.3 ou superior) tem diretivas de compilação que quebram a compilação do BGRABitmap, uma das dependencias do PascalSCADA. Porem se você usa versões do site (Laz 2.2.0 e FPC 3.2.0 ou Laz 2.2.2+FPC 3.2.2) estes problemas não deveriam acontecer. Ja tentou instalar o PascalSCADA numa configuração limpa do Lazarus?

  21. Sven Ruin Responder

    I have tried to install PascalSCADA on a computer running Windows 7 (32-bit). Errors appeared with the latest versions. I had success with Lazarus 2.0.8 (with FPC 3.0.4) and PascalSCADA 0.7.5. Thank you Fabio and others for the great work you have done with this!

  22. Yun Gu Responder

    ZDbcCache.pas(3209,13) Error: Incompatible types: got “Boolean” expected “Int64”

    why?i work in lazarus2.2.4 win10

Deixe uma resposta para 3Picure Cancelar resposta

O seu endereço de e-mail não será publicado. Campos obrigatórios são marcados com *