Italian community of Lazarus and Free Pascal

Programmazione => Databases => Topic aperto da: giango - Settembre 28, 2020, 03:46:41 pm

Titolo: [RISOLTO]modulo database
Inserito da: giango - Settembre 28, 2020, 03:46:41 pm
Buongiorno a tutti! Eccomi di nuovo alle prese con il mio database in cui ora ora inserito un modulo dati. L'obiettivo è far puntare alcuni form con relative griglie al medesimo modulo dati. Come si può notare dallo screenshot, il modulo dati è stato correttamente agganciato alla griglia sul mainform, e quando avvio la compilazione tutto fila liscio. Il problema si presenta in runtime con il laconico messaggio che vedete in figura. Il problema a quanto pare sta nella procedura formcreate in cui cerco di agganciare il modulo dati per poi modificare dinamicamente la tabella di riferimento.
Mi potreste spiegare cosa succede, visto che ho appena iniziato a sviluppare con lazarus? Grazie!
Titolo: Re:modulo database
Inserito da: bonmario - Settembre 28, 2020, 06:39:24 pm
Non avendo i sorgenti non è semplice ... così al volo, probabilmente chiami un oggetto della Unit2 quando non è ancora stato creato.

Ciao, Mario
Titolo: Re:modulo database
Inserito da: giango - Settembre 28, 2020, 07:25:19 pm
Niente di più semplice! Eccoti il pacchetto che crea la cartella APP-02
Titolo: Re:modulo database
Inserito da: bonmario - Settembre 28, 2020, 07:41:58 pm
Proprio come ti dicevo prima: prima devi creare l'oggetto DataModule1 che hai dichiarato nella seconda unit, e solo dopo lo puoi utilizzare.

Ciao, Mario
Titolo: Re:modulo database
Inserito da: giango - Settembre 28, 2020, 07:53:19 pm
E' proprio qui che casca l'asino!
Se ho creato il datamodule in unit2, e tale unit2 è presente nella lista delle uses di unit1, perchè mai devo andare a ricreare in unit1 un oggetto di unit2 (qualcosa che esiste già), quando se in unit1 scrivo unit2.datamodule1 mi presenta automaticamente la lista delle opzioni da scegliere?
Se vede queste scelte significa che il datamodule è riconosciuto, ed anche i suoi elementi. E allora perchè lo devo ricreare in unit1???????
Mi sembra una ridondanza assurda, qualcosa che non mi si è mai presentata negli ambienti di sviluppo che ho usato da 30anni!
Senza dubbio non ho ancora capito bene la logica di queste "unit", ed anche se dispongo di un manuale di delphi3 che le espone in dettaglio, mi risulta molto difficile capirne i peculiari meccanismi.
Comunque esaminando il video in:
https://www.youtube.com/watch?v=dwb0wv6IJqA&t=60s
si nota che basta inserire il riferimento al datamodule nelle uses e basta.
Nessuna altra modifica al codice, come sembra ovvio!
Titolo: Re:modulo database
Inserito da: xinyiman - Settembre 28, 2020, 10:27:26 pm
Questo è il tuo codice nel file lpr
Codice: [Seleziona]
program project1;

{$mode objfpc}{$H+}

uses
  {$IFDEF UNIX}{$IFDEF UseCThreads}
  cthreads,
  {$ENDIF}{$ENDIF}
  Interfaces, // this includes the LCL widgetset
  Forms, Unit1, Unit2
  { you can add units after this };

{$R *.res}

begin
  RequireDerivedFormResource:=True;
  Application.Scaled:=True;
  Application.Initialize;
  Application.CreateForm(TForm1, Form1);
  Application.Run;
end.

Prova con questo, a me funziona.
Codice: [Seleziona]
program project1;

{$mode objfpc}{$H+}

uses
  {$IFDEF UNIX}{$IFDEF UseCThreads}
  cthreads,
  {$ENDIF}{$ENDIF}
  Interfaces, // this includes the LCL widgetset
  Forms, Unit1, Unit2
  { you can add units after this };

{$R *.res}

begin
  RequireDerivedFormResource:=True;
  Application.Scaled:=True;
  Application.Initialize;
  Application.CreateForm(TDataModule1, DataModule1);
  Application.CreateForm(TForm1, Form1);
  Application.Run;
end.
Titolo: Re:modulo database
Inserito da: giango - Settembre 29, 2020, 04:41:36 am
In effetti xinyman funziona perfettamente, andando ad aggiungere quella riga in più al file .lpr! A questo punto quello che non mi spiego è il perchè il file .lpr non viene aggiornato automaticamente dalla compilazione dei files unit.
Ho provato a creare un nuovo progetto completamente vuoto (solo il form1 e unit1) e ad aggiungere un datamodule vuoto.
Fatta la compilazione il form si apre regolarmente come previsto. Ma andando a vedere il file .lpr, anche stavolta il datamodule non è stato aggiunto.
Ma è normale tale funzionamento? Non ho trovato da nessuna parte una simile info!
Titolo: Re:modulo database
Inserito da: bonmario - Settembre 29, 2020, 08:07:16 am
E' proprio qui che casca l'asino!
Se ho creato il datamodule in unit2, e tale unit2 è presente nella lista delle uses di unit1, perchè mai devo andare a ricreare in unit1 un oggetto di unit2 (qualcosa che esiste già), quando se in unit1 scrivo unit2.datamodule1 mi presenta automaticamente la lista delle opzioni da scegliere?

Allora, apri il tuo progetto e poi vai qui: Progetto ==> Opzioni progetto ==> Form

DataModule1 risulta "solo" disponibile, se lo selezioni e lo sposti nella colonna di sinistra, dovrebbe essere anche lui creato automaticamente.
Dico dovrebbe, perché di solito piaca creare a me i form "secondari" quando mi serve.

Ciao, Mario
Titolo: Re:modulo database
Inserito da: giango - Settembre 29, 2020, 09:10:30 am
Buongiorno Mario! Come avrai notato il problema consiste nel mancato aggiornamento automatico del file .lpr in cui si dovrebbero trovare tutti i riferimenti ai form impiegati. Ho notato che se creo un nuovo form, questo viene aggiunto correttamente al progetto, ma ciò non avviene col datamodule, che devo aggiungere a mano.
Dici < se lo selezioni e lo sposti nella colonna di sinistra>, ma forse intendevi dire la colonna centrale, visto che i pannelli disponibili sono tre, vero?
Rimane comunque un comportamento anomalo rispetto ai form standard.
Titolo: Re:modulo database
Inserito da: bonmario - Settembre 29, 2020, 10:39:40 am
Sì, scusa, intendevo la colonna a sinistra rispetto a quella dove era in origine ....
Io questo problema non l'ho mai avuto, perché in questi casi, mi creo una unit, a cui aggiungo io alla initialization ed alla finalization la creazione e la distruzione degli oggetti dichiarati in questa unit.

Ciao, Mario
Titolo: Re:modulo database
Inserito da: giango - Settembre 29, 2020, 11:01:35 am
Grazie Mario! Comunque il problema è risolto. Senza dubbio è un baco softw che non è stato ancora risolto, ma l'importante è stato trovare il modo di aggirare l'ostacolo!