Newsgroup: it.comp.lang.delphi
Titolo: Invalid Propriety value

Ho una form (form1) che ne richiama altre 2 form2 e form3.
inserisco nella unit di form1 le form 2 e 3.
quando richiamo la form secondaria faccio ex form2.showmodal
e metto un bottone nella form2 con close.
quando tento di richiamare form3 mi dice INVALID PROPRIETY VALUE.
qualcuno ha un idea delle cause??
grazie

 quando tento di richiamare form3 mi dice INVALID PROPRIETY VALUE.
Posta il codice, please...
--
Jax
Journeying Artificial Xenomorph

unit Unit1;
interface
uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Unit3,Controls,
Forms,
  Dialogs, XPMan, MPlayer, StdCtrls, ExtCtrls, IdBaseComponent,
  IdComponent, IdTCPConnection, IdTCPClient, IdIRC, jpeg, ComCtrls,unit2,
  Buttons;
procedure TForm1.Button1Click(Sender: TObject);
begin
form3.Showmodal ;
end;
procedure TForm1.BTzoomClick(Sender: TObject);
begin
 //Visualizza Form
 form2.ShowModal ;
end;
-----------------------------UNIT2------------------------------------------
----
unit Unit2;
interface
uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls, ExtCtrls, ComCtrls;
type
  TForm2 = class(TForm)
    Image1: TImage;
    exit: TButton;
    LBcommento1: TLabel;
    richedit1: TRichEdit;
    procedure exitClick(Sender: TObject);
  private
    { Private declarations }
  public
    stringy:string;
  end;
var
  Form2: TForm2;
implementation
{$R *.dfm}
procedure TForm2.exitClick(Sender: TObject);
begin
close;
end;
end.
---------------------------UNIT 3-----------------------------------------
unit Unit3;
interface
uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls;
type
  TForm3 = class(TForm)
    GBirc: TGroupBox;
    GroupBox2: TGroupBox;
    GroupBox3: TGroupBox;
    LBserver: TLabel;
    EditServer: TEdit;
    Button1: TButton;
    Button2: TButton;
    procedure Button2Click(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;
var
  Form3: TForm3;
implementation
{$R *.dfm}
procedure TForm3.Button2Click(Sender: TObject);
begin
close;
end;
end.

 ha scritto nel messaggio
news:GRq6a.2998$%1.9...@tornado.fastwebnet.it...

Nessuna idea sull'errore?

 Nessuna idea sull'errore?
Per piacere, evita di riportare tutto il messaggio precedente per poi
scrivere una riga sola. Un bel Select+PGSu non ha mai ucciso nessuno.
Comunque se devo essere sincero, no, non ho nessuna idea, se il codice è
tutto qua...
L'unica cosa che mi viene in mente è che tu magari non hai postato per
semplicità tutto il codice, e nel codice reale tenti di impostare la
variabile stringy, che in Form2 c'è ma in Form3 no; ma probabilmente non
c'entra, perché non te lo compilerebbe neanche, mentre mi pare di aver
capito che ti capita a runtime.
Prova a darmi un po' più di dettagli...


Prova a darmi un po' più di dettagli...
Forse evitare di usare "Exit" per il nome di un bottone, visto che è
il nome di una procedura standard di Delphi, aiuterebbe nell'evitare
errori.
-- 
Andrea Laforgia
"640kb of memory should be enough for anyone." -- Bill Gates.

 Prova a darmi un po' più di dettagli...
Ho provato a copiare quello che hai postato in un nuovo progetto, stessi
componenti con gli stessi nomi e stesso codice, e non mi da nessun errore,
quindi l'errore è da qualche altra parte.
Il tuo è un errore di run-time o di compilazione?
Sarebbe anche utile sapere la riga in cui ti dà questo errore.


"Jax" <rispo...@newsgroup.grazie> ha scritto nel messaggio
news:RMK6a.313977$AA2.11...@news2.tin.it...

L'errore è a run time.
Quando nel main richiama form1.run;

 Quando nel main richiama form1.run;
Form1.Run????
