كيفية استقبال اي اسم تحويله الي الهكس

[Polia]

السلام عليكم ورحمة الله 
اخواني اريد معرفة كيفية استقبال اي اسم من Edit وتحويله الي Hex ومن ثم جمع اعداد ال Hex 
وطباعتهم في Edit اخر بلغة الدلفي

[x-member]

مرحبا , قم بعمل فورم يحتوي على 2 مكونات  Edit و مكون Button 
الكود كالتالي : ضع ال Function تحت التعليمة {$R *.dfm} مباشرة 
 

 
function custom ( const s:string):string;
var i,k : integer;
begin
k := 0;
    for i := 1 to length(s) do
      begin
         k  := k + ord(s[i]);
      end;
      result := result + IntToHex(k,2);
end;

في حدث الضغط على ال Button  : 

edit2.text := custom(edit1.text);

[Polia]

مرحبا , قم بعمل فورم يحتوي على 2 مكونات  Edit و مكون Button 
الكود كالتالي : ضع ال Function تحت التعليمة {$R *.dfm} مباشرة 

شكرا لك عزيزي مودتي وتقديري

---

---

رحبا , قم بعمل فورم يحتوي على 2 مكونات  Edit و مكون Button 

أضافة الي هدا السؤال
بخصوص الفنكشن costume مدا تعيد هل تعيد int ام string وما معني النوع string بعد الأقواص

[الباحث]

أضافة الي هدا السؤال
بخصوص الفنكشن costume مدا تعيد هل تعيد int ام string وما معني النوع string بعد الأقواص

معنى string بعد الاقواس أن الدالة ترجع القيمه من من نوع سلسله(string)