form yükleme ?

[eliteprogrammer]

bir tane yükleniyor ekranı hazırladım (kpt). içerisinde gif uzantılı bir resim var. normalde çalışıyor. form1 yüklerken formun show unda " kpt " yi show yapıyorum. form 1 in show unun bittiği yerde kpt yi hide yapıyorum.
ama kpt üzerinde ki gif uzantılı resim maalesef animasyonunu gerçekleştiremiyor. bunu nasıl sağlayabilirim ?

[rsimsek]

Bu konuda delphi ile birlikte gelen örnek projelere bakabilirsin: C:\Program Files\Delphi 7\Demos\Db\MastApp\MastApp.dpr

[lazio]

bu iş için ben şöyle bir yöntem kullanıyorum;
Project Source da..

Kod: Tümünü seç

frmSplash := TfrmSplash.Create(Application);
frmSplash.Show;
frmSplash.Update;
frmSplash.lblStatus.Caption := 'XXX Hazırlanyor..';
Application.ProcessMessages;
...
Application.CreateForm(TfrmDM_SP, frmDM_SP);  // DataModule lerin Create i Daha güzel bir açılış için progress bar ve birkaç sleep kullanabilirsin
Application.CreateForm(TfrmDM_Qry, frmDM_Qry);
Application.CreateForm(TfrmDM_SYS, frmDM_SYS);
Sleep(200);
frmSplash.Hide;
frmSplash.Free;
frmPass.ShowModal;
Application.Run;

bu durumda splash da herhangi bir kod yazmadan halledebilirsin..