نحوه ساخت splash

[mehdimdp]

سلام
لطفا طريقه ساخت يك splash رو از صفر بيان كنيد.
نكته:
من هرچي توي اين سايت جستجو كردم ، چيزي دستگيرم نشد.
همه جا گفته بودند جستجو
ولي تو رو به خدا شماهم جستجو كنيد. اگه چيزي دستگيرتون شد به منم بگيد.

[Nima NT]

روشهای برنامه نویسی هم وجود داره ولی به من استفاده از کامپوننت رو پیشنهاد میکنم چون هم راحت تره و هم زیباتر از فرم ها عادی هست.
میتونید تو قسمت SmoothControls از کامپوننت TMS کنترل Splash رو استفاده کنید.
تو نسخه 5.1 هست , فکر می کنم آخرین نسخه اون هم باید باشه.
قابلیت های زیادی داره از جمله Alpha Blend Animation , Progress bar , ....

[Saeed_m_Farid]

سلام
لطفا طريقه ساخت يك splash رو از صفر بيان كنيد.
نكته:
من هرچي توي اين سايت جستجو كردم ، چيزي دستگيرم نشد.
همه جا گفته بودند جستجو
ولي تو رو به خدا شماهم جستجو كنيد. اگه چيزي دستگيرتون شد به منم بگيد.
سلام
خوب راست میگن، چه جوری گشتین؟
- یا منظورتون از Splash یه چیز دیگه اس یا درست نمیگردین؛ من که دستگیرم بود ولی با زم کاملاً دستگیرم شد!

نمايش چندين عكس در اجرای splash form (http://barnamenevis.org/forum/showthread.php?t=22310&highlight=Splash)
و در ادامه ...
ساخت یک لودر برای شروع برنامه با progressbar (http://barnamenevis.org/forum/showthread.php?t=143765&highlight=Splash)

کجای اینا نامفهومه؟ بگید تا کمکی از دستمون برمیاد بکنیم...

[mehdimdp]

نمايش چندين عكس در اجرای splash form (http://barnamenevis.org/forum/showthread.php?t=22310&highlight=Splash)
و در ادامه ...
ساخت یک لودر برای شروع برنامه با progressbar (http://barnamenevis.org/forum/showthread.php?t=143765&highlight=Splash)

کجای اینا نامفهومه؟ بگید تا کمکی از دستمون برمیاد بکنیم...

سلام
همه ي اين موارد به اونايي كه از قبل يك splash ساخته اند يا بلدند بسازند مربوط ميشه
ولي من اصلا نميدونم كه چيو كجا بايد استفاده كنم.

[merced]

ولي من اصلا نميدونم كه چيو كجا بايد استفاده كنم.

ببين. مي گن فرم splash پس قبل از هر چيز شما بايد فرمي داشته باشي. پس يك فرم براي اين كار طراحي و بذار كنار.

اولين خط برنامه چيه ؟ Application.Initialize;
اين خط كجاست؟ توي فايل پروژه (project1.dpr) چه جوري اين فايل رو ببينم ؟؟ از منوهاي دلفي منوي Project گزينه View Source اگه يه برنامه معمولي داشته باشي اين فايل به اين صورته


begin
Application.Initialize;
Application.CreateForm(TForm1, Form1);
Application.CreateForm(TForm2, Form2);
Application.CreateForm(TForm3, Form3);
Application.CreateForm(TForm4, Form4);
Application.CreateForm(TForm5, Form5);
Application.CreateForm(TForm6, Form6);
Application.CreateForm(TForm7, Form7);
Application.CreateForm(TForm8, Form8);
Application.CreateForm(TForm9, Form9);
Application.CreateForm(TForm10, Form10);
Application.CreateForm(TForm11, Form11);
Application.Run;
end.
اين فايل خط به خط اجرا ميشه از Application.Initialize; شروع مي شه تا Application.Run; اجرا بشه و فرم اصلي برنامه نمايش داده بشه.

حالا شما با فرمي كه به عنوان splash گذاشتي چي كار مي كني؟؟‌

من يه برنامه نوشتم كه هم فرم Login داره و هم فرم Splash كدش رو برات ميذارم ببيني چجوري كار شده




{$R *.res}


var

lf : TfLogin ; // formi be name flogin vojood dare (tarahi kardam) va ye motaghyer az noe flogin (Tflogin) tarif kardam
sf : TfSplash ; // in ham motaghayere forme splash

begin
Application.Initialize;

sf := TfSplash.Create(Application) ; // Create kardane form
sf.Update ;
sf.Show ; // Namayeshe form
sf.Update ;
sf.ProgressBar1.Position := 20 ; // Pishrafte progssess bar
Application.Title := 'My Application Title';
Application.CreateForm(TDM, DM);
...
...
...
sf.ProgressBar1.Position := 100 ; //
lf := TfLogin.Create(Application); // Sakhte forme login
lf.Update ;



lf.ShowModal ; // Namayeshe Forme Login

if lf.ModalResult = mrok then begin


sf.Close ;
Application.Run;
end
;
end.


توي رويداد OnCloseQuery فرم لاگين تست شده اگه مجوز ورود داشت فرم بسته نشه و ModalResult در صورتي برابر mrOK ميشه كه مجوز سازي انجام شده باشه.