Código Delphi
[-]
implementation
uses Unit2;
{$R *.DFM}
procedure TForm1.Button1Click(Sender: TObject);
begin
Form2.ShowModal;
end;
Código Delphi
[-]
procedure TForm2.FormCreate(Sender: TObject);
begin
form2.Left:=form1.left -100;
form2.Top:=form1.top - 100;
end;
Te falta hacer Use del Form1
Un Saludo.