پیغام
[DCC Error] E1026 File not found: 'Calendar_Images.res'
میده
Delphi XE2
Printable View
پیغام
[DCC Error] E1026 File not found: 'Calendar_Images.res'
میده
Delphi XE2
فايل Calendar_Images.res بايد داخل فايل Solar_Calendar_Package_v3.0.1.rar باشه.
موقعی رو فرم قرار میدهم فارسی به خوبی نمایش می ده ولی موقع اجرا کلمات به صورت ناخوانا دیده می شوند. میشه راهنمایی کنید؟ آیا در محیط دلفی (XE2) تنظیم خاصی وجود داره. چون وقتی سمپل خود شما رو اجرا می کنم مشکلی وجود نداره؟:افسرده:
تنظیمات ویندوز رو برام بفرستید
سلام آقای خرسندی
از زحماتتان متشکریم
ولی بازهم ببرای تاریخ میلادی مشکل دارد اصلا چرا از encodedate در کامپوننتان استفاده نمی کنید؟
یا اگر هم نمیتوانید این جوری مشکل را حل بکنید مثل تاریخ شمسی باهاش برخورد بکنید یعنی از نوع رشته بگیریدش و خلاص
ممنون
با چه نوع فرمتی مشكل داره؟
موقعی که ویندوز ما فرمت تاریخ میلادیش فرق بکند با مشکل مواجه می شود.
فکر بکنم در داخل کامپوننت فرمت تاریخ میلادی yyyy/mm/dd باشد پس موقعی که ویندوز ما فرمت تاریخش به صورت dd/mm/yyyy باشد با مشکل مواجه می شود
یعنی موقعی که بر روی دکمه solardatepiker کلیک می کنیم (موقعی که مقدار text آن خالی است مشکلی ندارد) مقدار text در کامپوننت به تاریخ میلادی با فرمت ثابت تبدیل می شود
و در این هنگام سیستم تاریخ میلادی را نمی تواند شناسایی بکند و error می دهد، فکر بکنم با استفاده از تابع encodedate مشکل حل بشود ولی قبل از آن نیاز به شناسایی و جدا کردن روز و ماه و سال میلادی و تبدیل آنها به مقدار عددی می باشد.
موفق باشید از زحماتتان کمال تشکر را دارم.
سلام من یک برنامه دارم که بارها و بارها از نسخه قبلی درش استفاده شده میتونم ببا دست کاری کد های این جدیده رو جای گزین کنم؟مثلا با نوت پد؟
سلام آقای
ehstrn2010
موقع نصب کامپوننت error می دهد.
PngImage_29 RCData "..\\..\\..\\Desktop\\1\\29.png"
عکسها را نمی شناسد.
با سلام و تشكر
مطمئن هستيد كه توي دلفي 7 نصب ميشه؟
ارور زياد ميده.
[Error] SolarCalendarPackage.pas(5430): Undeclared identifier: 'GradientFillCanvas'
[Error] SolarCalendarPackage.pas(5430): Undeclared identifier: 'gdVertical'
[Error] SolarCalendarPackage.pas(5753): Undeclared identifier: 'GradientFillCanvas'
[Error] SolarCalendarPackage.pas(5753): Undeclared identifier: 'gdVertical'
[Error] SolarCalendarPackage.pas(5965): Object or class type required
[Error] SolarCalendarPackage.pas(5965): Object or class type required
[Error] SolarCalendarPackage.pas(5965): Incompatible types: 'TButtonType' and 'Integer'
[Error] SolarCalendarPackage.pas(5971): Undeclared identifier: 'GradientFillCanvas'
[Error] SolarCalendarPackage.pas(5971): Undeclared identifier: 'gdVertical'
[Error] SolarCalendarPackage.pas(5977): Undeclared identifier: 'GradientFillCanvas'
[Fatal Error] SolarCalendarPack.dpk(39): Could not compile used unit 'SolarCalendarPackage.pas'
اول یک تشکر ویژه بابت کامپوننت
یک باگ کوچیک ! :
می خوام با استفاده از TSolarMonthCalender و مقادیر زیر :
MC.DayName + ' ' + IntToStr(MC.Day) + ' ' + MC.MonthName + ' ' + IntToStr(MC.Year);
یک رشته مثل این بسازم : " پنجشنبه 27 مهرماه 1391 "
اما رشته ای که ساخته میشه اینه : " جمعه 0 0 Sut " !
به نظر میاد در هنگام گرفتن مقدار day این مشکل پیش میاد ، اگر این مقدار رو از دستورات بالا حذف کنیم :
MC.DayName + ' ' + MC.MonthName + ' ' + IntToStr(MC.Year);
این رشته ساخته میشه : " پنجشنبه مهرماه 1391 "
به نظر میرسه موقع گرفتن مقدار day مشکلی به وجود میاد
پ.ن : از دلفی 2010 و ویندوز 7 نسخه ی Ultimate 64 Bit استفاده می کنم
با سلام خدمت آقاي محمد خرسندي
يك ايراد يا باگ
از تاريخ 1399 به بعد تاريخ 1100 رو نشون ميده و ميره از 1300 شروع ميكنه ...
حدس من اينه كه ايراد تو اين function باشه :نقل قول:
اول یک تشکر ویژه بابت کامپوننت
یک باگ کوچیک ! :
می خوام با استفاده از TSolarMonthCalender و مقادیر زیر :
MC.DayName + ' ' + IntToStr(MC.Day) + ' ' + MC.MonthName + ' ' + IntToStr(MC.Year);
یک رشته مثل این بسازم : " پنجشنبه 27 مهرماه 1391 "
اما رشته ای که ساخته میشه اینه : " جمعه 0 0 Sut " !
به نظر میاد در هنگام گرفتن مقدار day این مشکل پیش میاد ، اگر این مقدار رو از دستورات بالا حذف کنیم :
MC.DayName + ' ' + MC.MonthName + ' ' + IntToStr(MC.Year);
function TSolarMonthCalendar.GetDay: integer;
begin
//ResetYMD(Text, FCurrYear, FCurrMonth, FCurrDay);
ResetYMD(OutDate, FCurrYear, FCurrMonth, FCurrDay);
if FCurrDay > 0 then
Result := FCurrDay
else
Result := 0;
end;
در اين function با تغيير متغير Text به OutDate مشكل حل مي شه .
شايد كامپوننتي كه غير اين مورد ، موردهاي ديگه اي در آن اصلاح كردم رو هم آپلود كنم
فعلا كه سرور برنامه نويس سرش شلوغه
با سلام خدمت دوستان
ورژن اصلاح شده Solar_Calendar_Package_3_0_2 رو براي دانلود گذاشتم تا بلكه زودتر ايرادهاش رفع بشه و يك تقويم كاملاً حرفه اي فارسي داشته باشيم
البته بايد از آقاي خرسندي عزيز تشكر كرد
ايرادات مشاهده شده توسط من :
1- از تاريخ 1399 به بعد تاريخ 1100 رو نشون ميده و ميره از 1300 شروع ميكنه ...
البته اگه آقاي تاجیک لطف كنند و اين پست رو پاك نكنند
سلام برای دلفی xe3 سازگار هست؟:اشتباه:
با سلام خدمت استاد خرسندی و سایر اساتید
ظاهرا با ویندوز سون مشکل دارد . ابا سایر دوستان به این مشکل برخورد کرده اند؟ راه حل ان چیست؟ متشکرم
دوستان من به دلایلی مجبورم اینو تو دلفی 7 استفاده کنم موقع نصب این ارور ها رو میده کسی میدونه چطور باید برطرفشون کرد؟
[Error] SolarCalendarPackage.pas(5430): Undeclared identifier: 'GradientFillCanvas'
[Error] SolarCalendarPackage.pas(5430): Undeclared identifier: 'gdVertical'
[Error] SolarCalendarPackage.pas(5753): Undeclared identifier: 'GradientFillCanvas'
[Error] SolarCalendarPackage.pas(5753): Undeclared identifier: 'gdVertical'
[Error] SolarCalendarPackage.pas(5965): Object or class type required
[Error] SolarCalendarPackage.pas(5965): Object or class type required
[Error] SolarCalendarPackage.pas(5965): Incompatible types: 'TButtonType' and 'Integer'
[Error] SolarCalendarPackage.pas(5971): Undeclared identifier: 'GradientFillCanvas'
[Error] SolarCalendarPackage.pas(5971): Undeclared identifier: 'gdVertical'
[Error] SolarCalendarPackage.pas(5977): Undeclared identifier: 'GradientFillCanvas'
[Fatal Error] SolarCalendarPack.dpk(39): Could not compile used unit 'SolarCalendarPackage.pas'
آقای خرسندی، آیا این کامپوننت برای XE3 هم جواب میده؟؟
چون موقع نصب ارر های زیادی گرفته میشه
سلام
من موقع نصب آخرین ورژن این کامپوننت به مشکل برخوردم.
از دلفی 7 و ویندوز سون استفاده میکنم.
این خطاها وجود دارد:
ضمیمه 100576
کسی از دوستان چنین مشکلی نداشته؟:اشتباه:
ممنون
یعنی هیچکس همچین مشکلی نداره یا نمی دونه مشکل از کجاست ؟!http://www.pic4ever.com/images/127fs4573872.gif
سلام وقتی با این کامپوننت یک روز یک روز اضافه می کنم 30 اسفند رو حساب نمی کنه :ناراحت: می تونید راهنماییم کنید؟
نقل قول:
سلام وقتی با این کامپوننت یک روز یک روز اضافه می کنم 30 اسفند رو حساب نمی کنه می تونید راهنماییم کنید؟
سلام اين نسخه اصلاح شده رو نصب كنين ببينين مشكلتون حل مي شه يا نه؟نقل قول:
نقل قول: كامپوننت تقويم شمسی
با سلام خدمت دوستان
ورژن اصلاح شده Solar_Calendar_Package_3_0_2 رو براي دانلود گذاشتم تا بلكه زودتر ايرادهاش رفع بشه و يك تقويم كاملاً حرفه اي فارسي داشته باشيم
البته بايد از آقاي خرسندي عزيز تشكر كرد
ايرادات مشاهده شده توسط من :
1- از تاريخ 1399 به بعد تاريخ 1100 رو نشون ميده و ميره از 1300 شروع ميكنه ...
البته اگه آقاي تاجیک لطف كنند و اين پست رو پاك نكنند
Solar_Calendar_Package_3_0_2
سلام
آیا نسخه سازگار با xe3 هم هست؟
ممنون
سلام کسی نسخه سازگار با دلفی 7 رو داره ؟! این نسخه نهایی رو دلفی 7 جواب نمیده!!!http://www.pic4ever.com/images/4fvgdaq_th.gif توی سایت sourceforge هم فقط آخرین ورژن موجوده و لینک ورژن های قبلی که تو همین تاپیک هست هم به همون ورژن نهایی منتهی میشهhttp://www.hummer4x4offroad.com/foru...s/hanghead.gif ممنون
سلام سال نویتان مبارک
خواسته ی شما اشتباه است
این ورژنهای جدید که از این کامپوننت ایجاد شده ، به مرور مشکلات یا باگهای برنامه رفع شده با اینکه هنوز هم کامل نیست
ولی بایستی یک تغییراتی بدهید تا کامپوننت روی دلفی 7 هم نصب بشود ولی باز بهتره سعی بکنید که به دلفی های جدیدتر روی بیاورید
چون من هم مشکلات شما را داشته ام
مثلا دلفی جدیدتر را نداشتم ولی دانلودش کردم
و بعد سیستم ام توانایی کافی برای نصب دلفی جدیدتر را نداشت (حجم درایوهایم کم بود)
یا برنامه ها و کامپوننتهایم را مجبور می شدم تغییر بدهم (مخصوصا استفاده از تابعpchar)
ولی بعدا دیدم این افزایش ورژن می ارزد
مخصوصا اینکه از unicode پشتیبانی می کنند
پس بهتره از دلفی های جدیدتر استفاده بکنید
سلام
تابع ConvertDate رو فقط با monthcalendar میشه انجام داد ؟!! تو کامپوننتهای non-visible نیست هیچ کدوم ؟؟
سلام آقای خرسند
من کامپوننت شما را بررسی کردم و تصمیم دارم از این کامپوننت در پروژه های برنامه نویسی استفاده کنم کار بسیار ارزشمندی است انشاء الله موفق باشید
پیشنهاد : جهت کامپوننت دو label در نظر بگیرید جهت عنوان تقویم و نمایش روز هفته جلوی تاریخ مانند تصویر زیر
ضمیمه 103017
سلام آقای خرسند
یک پیشنهاد جدید : اگر دو رقم اول تاریخ بوسیله یک متغیر حهت راحتی کاربر ثابت شود که کاربر هر بار نیاز نیاز به وارد کردن آن نباشد می تواند در راحتی ورود اطلاعات موثر باشد
مثال : 1392/01/01 رقم 13 ثتبیت شده باشد که کاربر تنها رقم های 92/01/01 را وارد کند
سلام مجدد
آقای سازگاری تقویم با دلفی XE3 در دستور کارتون قرار داره؟امیدی هست؟
ممنون
من نسخه ايشون رو سازگار با XE3 كردم و آپلود مي كنمنقل قول:
سلام مجدد
آقای سازگاری تقویم با دلفی XE3 در دستور کارتون قرار داره؟امیدی هست؟
ممنون
ضمیمه 103405
از آقاي خرسندي درخواست مي كنم اگه روزي خواستند كامپوننتشون رو ارتقا بدند روي اين نسخه كار كنند چون چند تا باگ رو رفع كردم و اگه زحمت بكشند ، اين كامپوننت رو به بهبود بيشتر مي ره
باز هم از زحمات ايشون ممنون
سلام آقای خرسندنقل قول:
رشتهی روز مورد نظر رو میتونید از توابع کامپوننت بگیرید و هر جا که خواستید نمایش بدید
راهنمای شما رو من مطالعه کردم شما درست می گید اما من منظورم اینه که وقتی برنامه نویس کامپوننت را روی فرم قرار می دهد label های مذکور هم روی فرم قرار بگیرد(کامپوننت ترکیبی) و نیاز به این نباشد که دو کامپوننت label و کامپوننت solar را روی فرم قرار دهد و با هم آنها را تنظیم نماید و با استفاده از توابع لیبل ها را مقدار دهی نماید.
https://barnamenevis.org/showthread.p...=1#post1613160
https://barnamenevis.org/showthread.p...=1#post1616476
https://barnamenevis.org/showthread.p...=1#post1620193
اصلاحات صورت گرفته :
حدس من اينه كه ايراد تو اين function باشه :نقل قول:
اول یک تشکر ویژه بابت کامپوننت
یک باگ کوچیک ! :
می خوام با استفاده از TSolarMonthCalender و مقادیر زیر :
MC.DayName + ' ' + IntToStr(MC.Day) + ' ' + MC.MonthName + ' ' + IntToStr(MC.Year);
یک رشته مثل این بسازم : " پنجشنبه 27 مهرماه 1391 "
اما رشته ای که ساخته میشه اینه : " جمعه 0 0 Sut " !
به نظر میاد در هنگام گرفتن مقدار day این مشکل پیش میاد ، اگر این مقدار رو از دستورات بالا حذف کنیم :
MC.DayName + ' ' + MC.MonthName + ' ' + IntToStr(MC.Year);
function TSolarMonthCalendar.GetDay: integer;
begin
//ResetYMD(Text, FCurrYear, FCurrMonth, FCurrDay);
ResetYMD(OutDate, FCurrYear, FCurrMonth, FCurrDay);
if FCurrDay > 0 then
Result := FCurrDay
else
Result := 0;
end;
در اين function با تغيير متغير Text به OutDate مشكل حل مي شه .
و تغييرات گرافيكي و بقيه كه يادم نيست
سلام
آقا من این فایل ها رو که دانلود می کنم حالا چه از اینجا و چه از SF در هر دو حالت متون فارسی رو چه در سورسش و چه در نمایشش عجق وجق نشون میده!
لیستشو حداقل کسی باشه بهم بده خودم درستش می کنم. یا دانلود کنید ببینید مشکل منو دارید اگه نداشتید برام فایل رو ایمیل کنید
خداخیرتون بده
hp1361@gmail.com
ممنون
نقل قول: كامپوننت تقويم شمسی
سلام
من موقع نصب آخرین ورژن این کامپوننت به مشکل برخوردم.
از دلفی 7 و ویندوز سون استفاده میکنم.
این خطاها وجود دارد:
https://barnamenevis.org/attachment.p...6&d=1361866354
کسی از دوستان چنین مشکلی نداشته؟:اشتباه:
ممنون
سلام
من دلفی 7 و ویندوز 8 دارم و دقیقا خطا دوستمان javad3d که نشان داده می دهد.
کسی برای دلفی 7 .dpk را دارد که اینجا آپلود کند
سلام من هم در دلفي هم مشكل دوستانم جواد و علي را دارم.لطفا راه حل اين مشكل را عنوان كنيد.در ضمن روزهاي پاييني تقويم با كليك روي آن به روز ماه بعد منتقل مي شود كه ايراد بزرگي است.ممنون ميشم راهنمايي بفرماييد
با عرض سلام و خسته نباشید خدمت دوستان
و تشکر فراوان خدمت آقای خرسندی
من خودم مدتی هستش شروع کردم به کامپوننت نویسی میدونم چه امر سختی هستش و کمال تشکر رو دارم از آقای خرسندی
یه پیشنهاد دارم ولی نمیدونم دوستان ارائه کردن این پیشنهاد رو یا نه
توی کامپوننت میشه سال رو دستی تغییر بدیم ولی ماه رو نمی تونیم تغییر بدیم
اگه امکان تغییر دستی ماه باشه تو کامپوننت خیلی عالی میشه
توی عکس زیر تغییر سال رو نمایش میده
اگه اینگونه بشه تغییر داد عالی هستش البته در دو تا کامپوننت
http://www.up2www.com/uploads/1379103297311.jpg
سلام به همگی !
از دوستان کسی این کامپوننت رو برا XE5 سازگار کرده یا نه !؟
سلام بازهم در این مورد به مشکل خوردم
بهتر میدونم رفعش بکنید آقای مهندس
این تصویر را ببینید
من از دیتا سورس تاریخ را از سرور میگیرم
ضمیمه 114439
با تغییر دادن روال SetInDate به صورت زیر فکر بکنم مشکل حل میشه، آیا درسته؟؟
procedure TCustomSolarCalendar.SetInDate(const Value: String);
var
D:TDateTime;
begin
if Length(Trim(Value)) <> 0 then
begin
if FDateKind = dkGregorian then
begin
{$IFDEF CompilerVersion >= 23}
DecodeDate(StrToDate(FormatDateTime(FormatSettings .ShortDateFormat, StrToDate(Value))), FCurrYear, FCurrMonth, FCurrDay);
{$ELSE}
D:=EncodeDate(FCurrYear, FCurrMonth, FCurrDay);
DecodeDate(StrToDate(FormatDateTime(ShortDateForma t, D )), FCurrYear, FCurrMonth, FCurrDay);
{$ENDIF}
if not CheckInputDate(FCurrYear, FCurrMonth, FCurrDay) then
SeparateYMD(OutDate, FCurrYear, FCurrMonth, FCurrDay)
else
FInDate := Value;
FTopPanel.FYear.Caption := Format(ST_ENGLISHYEAR, [IntToStr(FCurrYear)]);
end
else
begin
SeparateYMD(Value, FCurrYear, FCurrMonth, FCurrDay);
if not CheckInputDate(FCurrYear, FCurrMonth, FCurrDay) then
SeparateYMD(OutDate, FCurrYear, FCurrMonth, FCurrDay)
else
FInDate := Value;
FTopPanel.FYear.Caption := Format(ST_PERSIANYEAR, [IntToStr(FCurrYear)]);
end;
FPrevMenuItem := FCurrMonth;
if FMonthObject = moPopupMenu then
begin
FMenu.Items[FPrevMenuItem - 1].Checked := True;
FMenu.Items[FPrevMenuItem - 1].RadioItem := True;
end
else
if FMonthObject = moComboBox then
FMonthCombo.ItemIndex := FPrevMenuItem - 1;
OutDate := InDate;
MonthChanging();
end;
end;
در این کامپوننت برای محاسبه تعداد روزهای بین دو تاریخ تابعی تعریف شده؟
مثلا از 1392/02/31 تا 1390/9/29 چند روزه؟!
برای این کار از کدهایی که در تاپیک موجود در امضای من هست استفاده کنید.
سلام
نسخه XE5 هم وجود دارد؟
تشکر
دوستان من سلام
این برنامه یک کامپوننت نیست، بلکه یک نمونه برنامه هست که با کدهای مختلفی که طی سرچ هام تو اینترنت پیدا کردم چند سال قبل (دوران دانشجویی) نوشتم و قابلیت تبدیل تاریخ های (شمسی / قمری / و میلادی) به همدیگه رو داره .
البته احتمالا تبدیل به و تبدیل از قمری یکسری مشکلاتی داره که نهایتا منجر به نمایش تاریخ یکی دو روز قبل یا بعد از تاریخ صحیح میشه که با صرف کمی وقت خودتون می تونید درستش کنید.
ضمنا آیکون برنامه در کنار ساعت ویندوز نمایش داده میشه که کد اون هم توی سورس هست و میتونید استفاده کنید.
امیدوارم لذت ببرید.
اگه دوست داشتید میتونید برای سلامتی امام زمان و همه افرادی که تو نوشتن کدهای این نرم افزار دست داشتن یه صلوات بفرستید، خصوصا اینکه تبدیل به تاریخ قمری خیلی سخت تو اینترنت گیر میاد.
ایمیل : KomeylWorld@Gmail.Com
سلام
میشه برای محاسبه تعداد روزها بین دو تاریخ شمسی ابتدا اون دو تاریخ رو به میلادی تبدیل کرد بعد با استفاده از تابع DaysBetween از یونیت DateUtils تعداد روزها رو محاسبه کرد؟ :متفکر:
تابعی که شما برای محاسبه تعداد روزها بین دو تاریخ شمسی استفاده کردین:
function Date_DaysBetween(Dt1, Dt2: string; DateBase: TDateBase): integer;
var
SYear1: integer;
SYear2: integer;
i, Day: integer;
X1, X2: integer;
begin
if DateBase = dbSolar then
begin
SYear1 := StrToInt(Copy(Dt1, 1, 4));
SYear2 := StrToInt(Copy(Dt2, 1, 4));
Day := 0;
for i := SYear1 +1 to SYear2 -1 do
Day := Day +Date_DaysPerYear(i, dbSolar);
X1 := Date_DaysOfYear(Dt1, dbSolar);
X2 := Date_DaysOfYear(Dt2, dbSolar);
Result := Day + X2 -X1 +IfThen(SYear1 = SYear2, 0, Date_DaysPerYear(SYear1, dbSolar));
end
else
Result := DaysBetween(StrToDate(Dt1, FormatSetting), StrToDate(Dt2, FormatSetting));
end;