[Risolto] Fatal Error incomprensibile

[petrusic]

Non capisco : in compilazione mi compare il seguente messaggio d'errore:

cofamtrasf.pas(60.22) Fatal: Syntax error. ";" expected but "=" found

allego l'immagine con lo spezzone di codice incriminato.

Sicuramente ho inserito male la var con linizializzazione delle matrici da utilizzare in seguito.
Il mio intendimento è quello di inserire dette righe di var e quelle dei type relativi in ambito privato della classe, allo scopo di rendere le varaibili visibili in tutta la classe e soltanto in essa.
Ho, perciò cercato di individuare il punto corretto, ma, evidentemente, non ci sono riuscito
riporto anche tutto il contenuto del file .pas

[nomorelogic]

in una classe ci possono essere variabili statiche ma, in quanto variabili,
credo si possano inizializzare con valore solo ad istanza creata (nel costruttore)

forse nel tuo caso può essere sufficiente una costante tipizzata che può invece essere inizializzata come membro di classe

Codice: [Seleziona]

   ...
   private
    type TbCoCas = array[0..1, 0..1] of Integer;
         TbCoPartMov = array[0..2, 0..1] of Integer;
         TbCoPreMom = array[0..1, 0..1] of Integer;

    const
      TbCas: TbCoCas = ( (101001000, 101001997),
                         (101001990, 101001999) );
      TbPartMov: TbCoPartMov = ( (102001000, 103999999),
                                 (105001000, 203999999),
                                 (205001000, 999999999) );
      TbPreMom: TbCoPreMom = ( (104001000, 104999000),
                               (204001000, 204999000) );
    public

    end;

un altro paio di appunti:

• nota che nel codice quì sopra la keyword type è indicata solo una volta (la prima), finché definisci tipi, non serve ripetere
• in pascal è convenzione che i tipi e le classi abbiamo un identificatore che inizia per T mentre le variabili membro di una classe (non le proprietà) dovrebbero iniziare con F

chiaramente è una convenzione e puoi scrivere come vuoi
ma leggere ad esempio

Codice: [Seleziona]

    const
      TbCas: TbCoCas = ( (101001000, 101001997),
                         (101001990, 101001999) );

è meno leggibile (almeno per un programmatore pascal) di

Codice: [Seleziona]

    const
      FTbCas: TbCoCas = ( (101001000, 101001997),
                         (101001990, 101001999) );

nomorelogic

[petrusic]

[li]in pascal è convenzione che i tipi e le classi abbiamo un identificatore che inizia per T mentre le variabili membro di una classe (non le proprietà) dovrebbero iniziare con F[/li][/list]

Purtroppo non ho ancora preso confidenza con le convenzioi Pascal. Stasera ho trovato questo manuale ed ho comniciato a leggerlo. Sicuramente mi adeguerò
Tornando al programma che ho cominciato, ho spostato  la dichiarazione type sotto la keyword private e modificato la var in const. Ho avviato la compilazione ma c'è sempre l'errore fatale di sintassi che non capisco come e dove intervenire per eliminarlo.
Ora lo dà a livello della prima riga sotto la keyword type
Allego il nuovo file .pas

[nomorelogic]

quello è un ottimo manuale, scritto un po' di tempo fa per Delphi

dai un'occhiata anche qua, è una introduzione per lazarus/free pascal recente e molto valida
https://castle-engine.io/modern_pascal_introduction.html

[nomorelogic]

Tornando al programma che ho cominciato, ho spostato  la dichiarazione type sotto la keyword private e modificato la var in const. Ho avviato la compilazione ma c'è sempre l'errore fatale di sintassi che non capisco come e dove intervenire per eliminarlo.
Ora lo dà a livello della prima riga sotto la keyword type

forse mi sono spiegato male
la keyword type non dovevi eliminarla completamente ma dovevi eliminare solamente  le ripetizioni dopo la prima
il codice sotto compila correttamente

Codice: [Seleziona]

  private
    type TbCoCas = array[0..1, 0..1] of Integer;
          TbCoPartMov = array[0..2, 0..1] of Integer;
          TbCoPreMom = array[0..1, 0..1] of Integer;

  const

[petrusic]

la keyword type non dovevi eliminarla completamente ma dovevi eliminare solamente  le ripetizioni dopo la prima
il codice sotto compila correttamente

No, non ti eri spiegato male. Sono stato sbadato io; poi, addirittura, forse per la stanchezza di leggere Pascal quasi a tempo pieno, non mi sono manco accorto, con la manifestazione dell'errore, di avere tralasciato nel copia-incolla la parolina magica.
Spero che ora vada bene. Non lo posso verificare ancora perchè ci sono altri errori da capire e correggere di conseguenza.
Allego di nuovo il file .pas, ma solo per mostrare come lo stato di *avanzamento lavori*
Grazie!

[petrusic]

in pascal è convenzione che i tipi e le classi abbiamo un identificatore che inizia per T mentre le variabili membro di una classe (non le proprietà) dovrebbero iniziare con F

riprendo questa tua sottolineatura da attenzione perchè non ho ancora trovato niente in proposito, nemmeno nel link, ultimo che mi hai suggerito e che comunque sto consultando.
 

[petrusic]

Va bene. Trovato.