سلام
دوستان منيه برنامه نوشتم كه بايد از كاربر بوسيله پنجره اي غير از پنجره اصلي اطلاعات رو بگيره . از mesagebox
استفاده مي كنم اما دو تا مشكل باهاش دارم
1- كاربر نبايد بيشتر از 7 كاراكتر اطلاعات وارد كنه . چطور كاربر رو محدود كنم
2- فونت اون جالب نيست (البته اين خيلي ضروري نيست اما از زيبايي برنامه كم ميكنه)
دوستاني كه ميتونن در اين موارد كمك كنن و اگه نميشه كاري كرد راهي ديگه براي گرفتن اطلاعات معرفي كنن
ممنون و منتظرم
اگه منظورت از Message Box یه فیلد باشه که کاربر بتونه توش تایپ کنه میتونی کارهای زیر رو انجام بدی:
یک MaskEdit بذاری و Editmask اون رو بصورت
تنظیم کنی.کد:aaaaaaa;1;_
بعد دیگه کاربر بیشتر از 7 کاراکتر نمیتونه تایپ کنه!
:biggrin:
سلام
نه دوست من اره اشتباه از من بود
منظورم Inputbox ست
ممنون و منظرم
نظر من اینه که یک فرم به شکل InputBox درست کن.
حالا کلیه ی خصوصیاتش رو میتونی خودت تعیین کنی.
با ShowModal هم فرم رو نمایش بده.
موفق باشید.
سلام
خوب مي توني از هفت تا كاراكتر اول استفاده كنيد و به بقيه كار نداشته باشي
سلام دوباره
دوستان ميخواستم بدونم كومپوننتي نيست كه اوپشن هايي مثل اين چيزي كه من مي خواهم بده
ممنون
من تا حالا نديدم.
ولي راحتترين كارت اينه كه توي KeyPress كد بنويسي :
متغير i هم توي formShow مساوي با 0 قرار بده.کد:if key = VK_Back then dec(i);
if i = 7 then key := #0
else inc(i);
موفق باشي و خبرشو بده.
سلام
از تركيب ايده هاي سولجر و ادميرال استفاده ميكنم
يه فرم براي دريافت اطلاعات و همچنين دستور فرمت براي دريافت عدد
راستي دوستان من با دستور showmodule فرمم رو نمايش ميدم اما اگه كاربر اينتر رو قبل از كامل كردن اديت باكس ها بزنه فرم بسته ميشه چيكار كنم كه تا اديت ها كامل نشدن فرم بسته نشه ؟
ممنون
برای Form2 توی onclosequery مقدار Canclose رو False کن.
فقط وقتی توی Edit هفت کاراکتر وارد شده بود مقدار Canclose رو True کن.
ممنون دوست عزيز