Estas haciendo referencia a una variable a la cual no le has asignado nada.
Código Delphi
[-]
with TForm1.Create(Self) do
try
Tipo := 2; ShowModal;
finally
free;
end;
Si te fijas a Form1 nunca le asignaste nada. Es por eso que al usarla te da el error de acceso de memoria.
Saludos...