intanto sulla unit1 devi aggiungere:
uses unit2
poi nell'evento:
codice:procedure TForm1.Inserisci1Click(Sender: TObject); Var Form2 : TForm2; begin Form2 := TForm2.Create; Form2.Show; end;
intanto sulla unit1 devi aggiungere:
uses unit2
poi nell'evento:
codice:procedure TForm1.Inserisci1Click(Sender: TObject); Var Form2 : TForm2; begin Form2 := TForm2.Create; Form2.Show; end;