Uygulamamın açılışındaki siyah ekran Hakkında

[Fesih ARSLAN]

Naçizhane bir öneride bulunayım; 
Ana formunuzun OnShow olayında geçen,

procedure TForm6.FormShow(Sender: TObject);
begin
 AniIndicator1.Visible := True;
 AniIndicator1.Enabled := True;
 Application.Initialize;
 Application.CreateForm(TForm1, Form1);
 Application.CreateForm(TForm2, Form2);
 Application.CreateForm(TForm3, Form3);
 Application.CreateForm(TForm4, Form4);
 Application.CreateForm(TForm5, Form5);
 Application.CreateForm(TForm7, Form7);
 Application.CreateForm(TMainForm, MainForm);

 AniIndicator1.Enabled := False;
 AniIndicator1.Visible := False;
 Application.Run;
 form1.Show;

end;

kod kısımlarında; 
* Initialize ve Run bildirimleri ve bunlar arasında geçen tüm yapıcı metodlarınız, zaten uygulamalarınız tarafından otomatik yönetiliyor.
OnShow olayında değil de kullanıcı davranışına bağlı olarak (örn. Kayıt ekle butonuna tıklanması durumunda formu oluştur), yaparsanız daha doğru olur.
Mevcut kodlarınızda OnShow olayı zaten açılışta çalıştığı için tüm formlarınız da oluşacaktır.
* Initialize ve Run OnShow olayında ise dpr dosyasındaki (Ctrl + V) Initialize ve Run ne iş yapıyor. Onları sildiniz mi? Sildi iseniz Initalize olmayan bir uygulamanın OnShow olayı nasıl çalışıyor?  
* Son bir husus, AniIndicator Thread olmadan görünmeyecektir.