چطور ميتونم يك edit رو به صورت چشمك زن در

واضح آرشیو وب فارسی:سایت ریسک: Aamoo07-08-2007, 02:28 PMسلام چطور ميتونم يك edit رو به صورت چشمك زن_ يا اينكه تو يه بازه زماني از رنگي به رنگ ديگه تغيير كنه_ در بيارم ( اين كار رو واسه اخطار دادن به كاربر ميخوام انجام بدم) پيشاپيش ممنون soldier07-08-2007, 05:41 PMخوب رنگ فونت رو میخواهی تغییر بدی یا رنگ خودش رو؟؟ Mavix07-08-2007, 07:08 PMبا سلام با استفاده از کمپوننت Timer خاصیت Color را تغییر بده. as1385136508-08-2007, 08:39 AMیک تایمر بر روی فرم قرار بده و مقدار زیر را برایش بنویس procedure TForm1.Timer1Timer(Sender: TObject); begin edit1.Color:=rgb(random(5000),random(5000),random( 5000)); edit1.font.Color:=rgb(random(5000),random(5000),ra ndom(5000)); end; Aamoo08-08-2007, 11:37 AMسلام با تشكر از توجه دوستان محترم خوب رنگ فونت رو میخواهی تغییر بدی یا رنگ خودش رو؟؟ رنگ خودش، ميخوام وقتي متنش يه چيز خاصي (مثل كلمه error ) شد مرتب بين دو رنگ مثلا سفيد و قرمر تغيير كنه تا به كاربر اخطار بده با سلام با استفاده از کمپوننت Timer خاصیت Color را تغییر بده. یک تایمر بر روی فرم قرار بده و مقدار زیر را برایش بنویس procedure TForm1.Timer1Timer(Sender: TObject); begin edit1.Color:=rgb(random(5000),random(5000),random( 5000)); edit1.font.Color:=rgb(random(5000),random(5000),ra ndom(5000)); end; ميشه لطفا در مورد rgb و random و اينكه چرا 3 تا random و اون اعداد (5000) يه كم توضيح بديد خيلي متشكرم از اينكه منو راهنمايي ميكنيد soldier08-08-2007, 11:51 AMسلام خوب پس ما کاری به رنگ خود فونت کاری نداریم. قبل از توضیحات باید بگم این کد کاملآ غلط میباشد. !!!! برای مشاهده محتوا ، لطفا ثبت نام کنید / وارد شوید !!!! خوب اول برای رنگ ها توی تاپیک "سوالات و آموزش برای مبتدی ها" کاملآ توضیح دادم... 62126 بگردید پیداش میکنید . یا بهتره در تاپیک جستجو کنید. خوب حالا ما یک متغیر از نوع Boolean تعریف میکنیم. !!!! برای مشاهده محتوا ، لطفا ثبت نام کنید / وارد شوید !!!! حالا یک تایمر میزاریم که رنگ رو تغییر بده. توی تایمر باید این متغیر عوض بشه... !!!! برای مشاهده محتوا ، لطفا ثبت نام کنید / وارد شوید !!!! خوب حالا وقتی این متغیر True بود. رنگ قرمز بشه و وقتی False بود سیاه بشه. !!!! برای مشاهده محتوا ، لطفا ثبت نام کنید / وارد شوید !!!! در مورد شرط if هم توی اون تاپیک که گفته بودم کاملآ توضیح داده شده... توجه داشته باش که اون چیزایی که توی پرانتز نوشتم رو باید حذف کنی. میخواستم فقط نمونه رنگ ها رو بگم... سوالی یا مشکلی بود در خدمتم... موفق باشید. Aamoo08-08-2007, 12:13 PMسلام soldier جان خيلي ممنونم ميرم امتحانش كنم (البته كدي كه as13851365 عزيز هم گذاشتند چيزي جالبي بود ولي متاسفا نه دقيقا اوني نبود كه ميخواستم ولي بازم ازش ممنونم) soldier08-08-2007, 01:26 PMسلام از as13851365 هم تشکر میکنیم. اما مشکلی که کدش داره. هم رنگ فونت رو تغییر میده و هم رنگ خود ایدت باکس رو... رنگش هم مشکل داره. ما نهایت رنگی که داریم . 255,255,255 هست نه 5000 در ضمن این به صورت شانسی رنگ تغییر میکنه. با اینکه شما می خواهید رنگ چشمک بزنه... اگر کدی که نوشتم کد مورد نظرتون نیست بیشتر توضیح بدید... منتظر خبرت هستم... موفق باشید Aamoo08-08-2007, 02:03 PMsoldier جان واقعا ازت ممنونم كد شما هموني بود كه من ميخواستم بازم متشكرم hamedvahedi02-10-2007, 09:01 AMبراي چشمك زدن label بهتره در تايمر، visible:=not(visible) براي چشمك زدن متن edit بهتره در تايمر،edit1.font.color:=edit1.color كنيد و دوباره edit1.font.color:=clblack ; كنيد. سایت ما را در گوگل محبوب کنید با کلیک روی دکمه ای که در سمت چپ این منو با عنوان +1 قرار داده شده شما به این سایت مهر تأیید میزنید و به دوستانتان در صفحه جستجوی گوگل دیدن این سایت را پیشنهاد میکنید که این امر خود باعث افزایش رتبه سایت در گوگل میشود

این صفحه را در گوگل محبوب کنید

[ارسال شده از: سایت ریسک]

[مشاهده در: www.ri3k.eu]

[تعداد بازديد از اين مطلب: 324]