كيف احول حرف char من الحالة lowercase الي uppercase

[osama taha]

السلام عليكم
سؤالي كيف احول حرف char من الحالة lowercase الي uppercase و العكس . ماهي الدالة؟
مع ملاحظة ان المتغير من النوع char .
و شكرا.

[Happy03]

السلام عليكم
استخدم الدوال :
fonctions UPCASE() et LOWCASE().

[STRELiTZIA]

و عليكم السلام و رحمة الله

نعم كما جاء في اجابة الأخ Happy....


procedure TForm1.Button1Click(Sender: TObject);
var abc: Char;
begin
abc := 'A';
Edit1.Text := SysUtils.LowerCase(abc);
abc := 'z';
Edit2.Text := SysUtils.UpperCase(abc);
end;
يمكنك الاستغناء عن كتابة الوحدة SysUtils مع الدالة، وضعتها للتوضيح اكثر عن منبع دالة التحويل...

ايضا

System.UpCase


بالتوفيق ان شاء الله

[Happy03]

يمكنك استخدام
Edit2.Text:= LowerCase(Edit1.Text)[1];
وكذالك مع UpperCase
لأني لم استخدم ماذكرت لك من قبل ' لم اجربها'

[osama taha]

اشكركم من اعماق قلبي علي هذه الحفاوة في الرد.شكرا

[rama]

هناك طريقة سهلة جدا من دون استخدام أي كود :
قم بالذهاب الى خصائص ال edit في Object inspector أين ستجد خاصية CharCase و ستجد ثلاث اختيارات :
ecLowerCase
ecNormal
ecUpperCase
و يكفي اختيار واحدة لتبديل طريقة ادخال ال CHAR .