+- delphi4arab منتديات دلفي للعرب (https://delphi4arab.net/forum)
+-- قسم : منتديات دلفي للعرب التعليمية (https://delphi4arab.net/forum/forumdisplay.php?fid=3)
+--- قسم : سؤال و جواب حول دلفي (https://delphi4arab.net/forum/forumdisplay.php?fid=15)
+--- الموضوع : اتجاه الكتابة من اليمين الى اليسار بالنسبة للعربية (/showthread.php?tid=4296)
اتجاه الكتابة من اليمين الى اليسار بالنسبة للعربية - addidou23 - 22-06-2012
السلام عليكم و رحمة الله و بركاته
وجدت الحل بالنسبة لتحويل اتجاه الكتابة بالنسبة من اليمين الى اليسار
اولا نكتب في evenemnt الحدث OnKeyPress
كود :
var OldSysLocal:TSysLocale;
begin
OldSysLocal:=SysLocale;// pour pouvoir le remettre
SysLocale.MiddleEast := True;
Edit1.BiDiMode := bdRightToLeft;
SysLocale := OldSysLocal;
end;تقبلوا تحياتنا و من لديه فكرة افضل المرجو افادة الجميع
اتجاه الكتابة من اليمين الى اليسار بالنسبة للعربية - hanipino - 24-06-2012
و عليكم السلام و رحمة الله
جرب هاذا الكود فى الحدث OnCreate للفورم مثلا
PHP كود :
var
Style: LongInt;
begin
Style := GetWindowLong(Edit1.Handle, GWL_STYLE);
SetWindowLong(Edit1.Handle, GWL_STYLE, Style or ES_RIGHT);
Edit1.Invalidate;
end;