الكتابة الأحروف الصغيرة فقط بالدلفي 2019

شفرة برمجية
if (key in ['a'..'z']) OR (key = #8) then
begin
key:=key;
end
else
begin
key:=#0;

[@SamerASSIL]

للـ edit خاصية اسمها CharCase . فقط بدلها . بالاضافة انك في الفيديو استخدم in وهذا لا يصلح كان يجب ان تستخدم CharInSet .

[@ahappylife9700]

شكراا أخي في الله