الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

كيف اجعل الدالة ترجع array من string

مغلق
بدأه bachirk في 8 يونيو 2007 · 5 رد · 634 مشاهدة · في لغة Delphi
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

كيف اجعل الدالة ترجع array من string على النحو التالي

   function a(b:integer):array of  string

وهذا بدون اضافة type جديد

#2

أعتقد أنه لا يمكن ذلك

لماذا تريدها بذلك الشكل ؟

تعريف type جديد سيفيد ..

من الأفضل أن تستخدم TStringList كـ parameter بدلاً من إستخدام dynamic type كـ function return type ...

ضع الفكرة التي تريد تطبيقها فربما تجد حلول غير التي تريدها ...

"First they ignore you, then they laugh at you, then they attack you, then you win"

===

اقتباس

حُكَّامُـنَا إِنْ تَصَـدّوا لِلْحِمَــى اقْتَحَمُـوا ***** وَإِنْ تَصَدَّى لَـهُ المُسْتَعْمِـرُ انْسَحَبُـوا

هُمْ يَفْرشـُونَ لِجَيْـشِ الغَــزْوِ أَعْيُنَـهُـمْ ***** وَيَدَّعُــونَ وُثُـوبَـاً قَـبْـلَ أَنْ يَثِـبُــوا

الحَاكِمُـونَ و«وَاشُنْـطُـنْ» حُكُومَتُـهُـمْ ***** وَاللامِعُــونَ وَمَـا شَعَّـوا وَلا غَرَبُــوا

القَاتِلُـــونَ نُبُــوغَ الشَّـعْــبِ تَرْضِـيَـــةً ***** لِلْمُعْتَدِيــنَ وَمَـا أَجْـدَتْـهُـمُ الـقُــرَبُ

لَهُمْ شُمُـوخُ «المُثَنَّـى» ظَاهِـرَاً وَلَهُـمْ ***** هَـوَىً إِلَـى بَابَـك الخَرْمِـيّ يُنْتَسَـبُ

البردوني "أبو تمام وعروبة اليوم" 1971

===

اقتباس
عبيد الهوى يحكمون البـلاد ***** ويحكمهــم كلّهـــم درهــــــم

و تقتـادهـم شهـوة لا تنــام ***** وهـــم فـي جـهالتهــم نــــوّم

ففــي كـــلّ ناحيــة ظـالـــم ***** غبــــــيّ يسـلـّطــــه أظلـــم

أيا من شبعتم على جوعــنا ***** وجـــوع بنينـا ألـم تتخمـــوا ؟

ألم تفهموا غضبة الكادحين ***** على الظلـم ؟ لا بدّ أن تفهموا

البردوني "نحن و الحاكمون "

#3

فكرة استخدام tstringlist فكرة رائعة

رغم اني اعرف tstringlist لكنها لم تخطر ببالي

بالنسبة للفكرة التي اريد تطبيقها

انا مشارك في مسابقة الخورزميات التي وضعها الاخ ايوب

تجد رابطها في توقيعي انذهب الى السؤال الثالث في المسابقة الحالية

تجد ان المطلوب هو دالة تخرج مجموعة من string

شكرا جزيلا

#4

عند التعامل مع مصفوفة ديناميكية يمكن فقط وضعها في ال parameter ولا يمكن ارجاعها في النمط المرجع اي عندما نكتب هكذا يكون صحيح

function s(s2:integer;s1:array of string):integer;
begin
  Result:= 1;
end;

اما عند التعامل مع المصفوفة العادية لا يمكن وضعها لا في ال parameter ولا في النمط المرجع و لذلك يجب استخدام type و لا يمكن تعديل هذا الشيئ لأنه من قواعد اللغة

استخدم Tstring او Tstringlist او اي نمط stringlist فهو يفي بالغرض من اجل الخوازمية التي تريد حلها

اذا لم تعجبك قواعد التعامل مع المصفوفة في دلفي يمكنك حل الخوارزمية بلغة اخرى :)

رب اجعلني مقيم الصلاة ومن ذريتي ربنا وتقبل دعاء.

لا تنسى: "العقل مثل العضلة كلما استخدمته أكثر كلما ازدادت قوته"

#5

انا اتكلم لغة واحدة delphi

شكرا

#6
bachirk كتب:
انا اتكلم لغة واحدة delphi

خطأ يقع فيه الجميع

Delphi ليست لغة

ولغة Delphi هي Object Pascal :P

d4baa0.gif

هذا الموضوع مغلق.

مواضيع مشابهة