win7 -delphi7 openfile sorunu dosya açma menüsü arka planda

[forumsad]

arkadaşlar

win7 de delphi 7 kullanıyorum

openfile kullanırken dosya seçme menüsü arkaplanda kalıyor dolayısıyla açıldığını göremiyorum bu sorunu nasıl çözebilirim acaba

saygılar


kod.

Kod: Tümünü seç

 Excel := CreateOleObject('Excel.Application');
 repeat
   FileName := Excel.GetOpenFileName;

 until  FileName <> '0';
 Book := Excel.WorkBooks.Open(FileName);
 Excel.Visible := true;
 Sheet := Book.Worksheets[1];