Addin popup form

Add-in Express™ Support Service
That's what is more important than anything else

Addin popup form
I have issue with form in word, modal form dissapears and word hangs 
Kristjan H




Posts: 27
Joined: 2005-10-29
My code:

Form2 := TForm2.Create(Self);
try
Form2.ShowModal;
finally
FreeAndNil(Form2);
end;

I basically need this form always on top, but when i change form properties then i get error.

tnx

Kris
Posted 12 Nov, 2005 04:06:20 Top
Dmitry Kostochko


Add-in Express team


Posts: 2742
Joined: 2004-04-05
Hi Kristjan,

I have just created and tested a simple add-in with a Delphi form. I have set the FormStyle property to fsStayOnTop. It works without any errors. See the code below.


procedure TAddInModule.adxCommandBar1Controls0Click(Sender: TObject);
begin
  Form1 := TForm1.Create([B]nil[/B]);
  try
    Form1.ShowModal;
  finally
    FreeAndNil(Form1);
  end;
end;


Posted 12 Nov, 2005 06:14:58 Top