كمك فوري لطفا كمكم كنيد

[kiss_my_l0ve]

لطفا اين نمونه برنامه رو نگاه كنيد ببينيد كجاش ايراد داره


http://up.iranblog.com/images/mrndcstrqkv75ejhw477.rar

[M_Maskout]

سلام
نام خوبی برای تاپیک نذاشتین!

برنامتون بدون هیچ اشکالی اجرا می‌شه.
اما اگه منظور شما اینکه چرا تو روتین Text3_DblClick کاری که می‌خواین انجام نمی‌شه، باید بگم مشکل از تابع Age و گزینه‌های ساختار Case بکار رفته توی اون هست، اگر فقط دوست دارین مشکل فعلی بر طرف بشه کافیه هرچی "< a >" هست رو با "To" عوض کیند.

برای توضیح بیشتر:
سطر Case 1 < a > 30 (با فرض اینکه مقدار a مثلاً 5 باشه) برای کمپایلر این مفهوم رو داره: (Case 1 < (5 > 30. داخل پرانتز یه عبارت بولی با ارزش عددی 0 هست پس می‌شه: Case 1 < 0. و در اینجا هم چون 1 بزرگتر از 0 هست بنابراین ارزش عدد مقدار case می‌شه 0. و در نهایت منظور این خط Case 0 هست که قطعاً متفاوت از مقدار a هست.