كيف يمكن تجاهل الفرق بين "أحمد" و "احمد" في برنامج مكتوب بلغة الدلفي
تجاهل الفرق بين " أ " و" ا "
أين مطلوب التجاهل
(قواعد بيانات / أديت / ميمو/........إلخ)
الرجاء التحديد أكثر لعل الحل موجود إن شاء الله
I'm Away For Sometimes
I'll Finish My Works
Come Back Soon
More Study > More Search > More Try > More Learning > Great Success
على أي متغير String
وشكرا للاهتمام
السلام عليكم
الحل في المثال المرفق إن شاء الله
و إن لم يكن الحل المطلوب فأنا بالخدمة
و الاسلام ختام
I'm Away For Sometimes
I'll Finish My Works
Come Back Soon
More Study > More Search > More Try > More Learning > Great Success
اخي rober عندما تضع كود ما حاول ان تضعه في المنتدى كود أولا ثم إذا احببت أن تضع مثال,
هنا الكود الذي وضعه rober و الذي يقوم بتحويل "أ" إلى "ا"
procedure TForm1.Button1Click(Sender: TObject); var a : string; i : integer; begin a := edit1.Text; for i := 1 to length(a) do begin if a = 'أ' then a := 'ا'; end; edit1.Text := a; end;
رب اجعلني مقيم الصلاة ومن ذريتي ربنا وتقبل دعاء.
لا تنسى: "العقل مثل العضلة كلما استخدمته أكثر كلما ازدادت قوته"
مشكور أخي وائل على الملاحظة
وأعتذر على هذا الخطأ
لك مني فائق الشكر و الأحترام
و السلام ختام
I'm Away For Sometimes
I'll Finish My Works
Come Back Soon
More Study > More Search > More Try > More Learning > Great Success
السلام عليكم
آسف على التأخير
ولكن ليس هذا ما أبحث عليه
لأن عملية تغيير " أ" إلى " ا " قد تتطلب وقتا إضافياً عند البحث وخاصة في البيانات الكبيرة
لذا أنا أبحث عن شيء مثل تجاهل حالة الحروف الكبيرة والصغيرة بالنسبة للغة الإنجليزية
وأكرر شكري لاهتمامكم
وفقنا الله وإياكم لما يحبه ويرضاه
الرابط التالي يحتوي على عدة أمثلة عن string هي عبارة عن توابع موجودة في مكتبة SysUtils
أرجو أن يفيدك
I'm Away For Sometimes
I'll Finish My Works
Come Back Soon
More Study > More Search > More Try > More Learning > Great Success