Código de error - Access violation at address 0044p983 in module 'Project1.exe'.

[delphi.com.ar]

Y la pregunta del millón... ¿Quién creó la instancia de TForm2?

Si no tienes puesto que tu proyecto cree automáticamente al inicio los formularios, cosa que no recomiendo, tienes que encargarte de crear la instancia del mismo. Es un error típico de los programadores en VB cuando migran a Delphi, ya que en VB no queda claro quien crea los formularios, con solo llamarlos se crean.

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
begin
  if form2 = nil then
    form2 := TForm2.Create(self);

  form2.ShowModal;
end;

Saludos!

[P0werBurn]

Empezado por delphi.com.ar

Y la pregunta del millón... ¿Quién creó la instancia de TForm2?

Si no tienes puesto que tu proyecto cree automáticamente al inicio los formularios, cosa que no recomiendo, tienes que encargarte de crear la instancia del mismo. Es un error típico de los programadores en VB cuando migran a Delphi, ya que en VB no queda claro quien crea los formularios, con solo llamarlos se crean.

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
begin
  if form2 = nil then
    form2 := TForm2.Create(self);

  form2.ShowModal;
end;

Saludos!

Gracias!
Ahora lo pruebo y te digo

[P0werBurn]

Perfecto!

Gracias, gracias, y gracias. Le cuento el posible problema:

estoy estudiando un curso de hace ya varios años (de 1997, para ser exactos), y usa delphi 2.0.

Hasta ahora me ha ido bien, pero aquí habrá dado algún problema.

Muchas gracias,

P0werBurn.

[[AzidRain]]

Como apunte, siempre que te salga este error, se trata del mismo problema algún objeto que utilizas sin crearlo previamente. Aqui tienes otra forma sencilla de manipular forms sin tener que utilizar una variable:

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
begin
  With TForm2.Create(nil) Do   //aquí creas el objeto
  Try
     ShowModal;  //aquí lo usas (en este caso solo lo muestras)
  finally
     free;  // Y aquí lo liberas cuando ya lo usaste
  end;
end;