مشاهده نسخه کامل
: sp1000
03-12-2006, 08:45
با سلام خدمت دوستان :rolleye:
ساختن splashscreen
splashscreen چي هست؟ :blink:
splashscreen يک فرمي است که قبل از برنامه اصلي ما ظاهر ميشه تا برنامه اصلي ما قشنگ فايل هاش لود کنه و به
راحتي اجرا بشه حالا آموزش رو شروع مي کنيم فرض مي کنيم يک فرم داريم به نام Form1 که داخل آن برنامه نوشته ايم
براي ساختن splashscreen بايد يک فرم ديگه به نام مثلا Form2 بسازيم اين فرم قرار است اول برنامه اجرا بشه پس
حسابي زيبا طراحيش کنيد مي توانيد در آن نام برنامه اي که ساختيد همراه با اسم شرکت خود ، ورژن آن ، سال توليد وغيره
بنويسيد سپس همين فرم را انتخاب کنيد و نام آن را از Form2 به splashscreen تغيير دهيد و در قسمت
Object Inspector بر روي Borderstyle کليک کنيد و از کشوي رو بروي آن bsNone را انتخاب کنيد کار ما با
اين فرم به پايان رسيد حالا بر ميگرديم به فرم اصلي خودمان
به قسمتي که کد هاي مان را در آن مي نويسيم رفته و ميرويم به آخرين پارامتر جايي که آخرين .end نوشته شده قبل از همين
.end اين کد ها را مي نويسيم
begin
splashscreen := Tsplashscreen.create(application);
splashscreen.show;
splashscreen.Update;
application.Initialize;
application.CreateForm(TForm1,Form1);
Sleep(1000);
splashscreen.Close;
splashscreen.free;
application.Run;
لازم به ذکر است که Sleep مقدار زماني است که splashscreen نشان داده مي شود
و در قسمت application.CreateForm(TForm1,Form1); به جاي Form1 بايد نام فرم اصلي تان نوشته شود
کار ما به پايان رسيد حالا برنامه را اجرا کنيد ونتيجه را مشاهده نماييد اگه مشکلي بود بنويسيد :happy:
خداحافظ
:cool: :cool: :cool:
ساختن splashscreen
splashscreen چي هست؟ :blink:
splashscreen يک فرمي است که قبل از برنامه اصلي ما ظاهر ميشه تا برنامه اصلي ما قشنگ فايل هاش لود کنه و به
راحتي اجرا بشه حالا آموزش رو شروع مي کنيم فرض مي کنيم يک فرم داريم به نام Form1 که داخل آن برنامه نوشته ايم
براي ساختن splashscreen بايد يک فرم ديگه به نام مثلا Form2 بسازيم اين فرم قرار است اول برنامه اجرا بشه پس
حسابي زيبا طراحيش کنيد مي توانيد در آن نام برنامه اي که ساختيد همراه با اسم شرکت خود ، ورژن آن ، سال توليد وغيره
بنويسيد سپس همين فرم را انتخاب کنيد و نام آن را از Form2 به splashscreen تغيير دهيد و در قسمت
Object Inspector بر روي Borderstyle کليک کنيد و از کشوي رو بروي آن bsNone را انتخاب کنيد کار ما با
اين فرم به پايان رسيد حالا بر ميگرديم به فرم اصلي خودمان
به قسمتي که کد هاي مان را در آن مي نويسيم رفته و ميرويم به آخرين پارامتر جايي که آخرين .end نوشته شده قبل از همين
.end اين کد ها را مي نويسيم
begin
splashscreen := Tsplashscreen.create(application);
splashscreen.show;
splashscreen.Update;
application.Initialize;
application.CreateForm(TForm1,Form1);
Sleep(1000);
splashscreen.Close;
splashscreen.free;
application.Run;
لازم به ذکر است که Sleep مقدار زماني است که splashscreen نشان داده مي شود
و در قسمت application.CreateForm(TForm1,Form1); به جاي Form1 بايد نام فرم اصلي تان نوشته شود
کار ما به پايان رسيد حالا برنامه را اجرا کنيد ونتيجه را مشاهده نماييد اگه مشکلي بود بنويسيد :happy:
خداحافظ
:cool: :cool: :cool: