PDA

View Full Version : چگونه درختواره راهنمای ساخته شده در دلفی را راست چین کنم ؟



nasiri
پنج شنبه 21 خرداد 1383, 17:02 عصر
من با نرم افزار help & manual یک راهنما برای یک نرم افزار نوشتم ولی نمی توانم دختواره آن را راست چین کنم اگر کسی در مورد اطلاعاتی دارد کمکم کند.
با تشکر
نصیری

ali643
پنج شنبه 21 خرداد 1383, 20:18 عصر
راستش من میخواستم چند وقت دیگه این موضوع رو بعنوان یک مقاله بنویسم، اما بدلیل نداشتن فرصت اونرو بصورت یک پست اینجا مینویسم.

فقط یک پیش نویس بگم، انهم اینکه بنظر من هیچ زبانی بهتر از دلفی برنامه نویسی ویندوز را لذت بخش نمیکند!

چرا؟ خوب خودتون ببینید...

این کدی است که من برای آینه کردن کامپوننت های مبتنی بر ویندوز (مشتقات TWinControl) در دلفی نوشته‌ام:



const
WS_EX_NOINHERITLAYOUT = $00100000; // Disable inheritence of mirroring by children
WS_EX_LAYOUTRTL = $00400000; // Right to left mirroring

procedure SetWinControlBiDi(Control: TWinControl);
var
ExStyle: Longint;
begin
ExStyle := GetWindowLong(Control.Handle, GWL_EXSTYLE);
SetWindowLong(Control.Handle, GWL_EXSTYLE, ExStyle or WS_EX_RTLREADING or WS_EX_RIGHT
or WS_EX_LAYOUTRTL or WS_EX_NOINHERITLAYOUT );
end;



نحوه استفاده:
نام کامپوننت مورد نظر (در اینجا TreeView‌ خود دلفی) را به آن پاس کنید. مثال:


SetWinControlBiDi(TreeView2);


به تصویر انتهای صفحه توجه کنید.

نکته: این کد در ویندوزهایی که قابلیت نمایش متون راست به چپ دارند (مانند ویندوزهای 98، Me عربی/فارسی، ویندوز 2000 و XP که زبان فارسی یا عربی آن فعال شده باشد) کار میکند.

nasiri
جمعه 22 خرداد 1383, 17:17 عصر
سلام دوست عزیز ، ضمن تشکر از لطف شما به عرض میرساند ، منظور من درختواره بدنه help که توسط برنامه help & Manual نوشته شده است می باشد که در زیر ضمیمه شده است

از کمک اساتید محترم نهایت تشکر را دارم