هل من امثلة على TSearchRec
#1
السلام عليكم ورحمة الله وبركاته 
عندما اريد البحث عن شئ معين لاتعلمة لا اجد الطريقة التي تساعدني للوصول الى ما اريد .
مثلا الصنف TSearchRec وجد مثال قديم بالمنتدى كان بموضوع خاص بي ولكن عندما اردت الرجوع الى اي مرجع لم اجده في كتب الباسكال ولم احصل على مثال لدلفي الا في ملف المساعدة وجد مثال ولم افهمه .
ما اريده هو شرح مبسط عن ذلك الصنف مع مثال لكل دالة او اجراء يحتويه ,, او درس كامل له على النت عربي او انجليزي .
شكرا .
قل إن صلاتي ونسكي ومحياي ومماتي لله رب العالمين
الرد
#2
PHP كود :
SearchRecArr:array of TSearchRec


كود :
procedure TForm2.Button1Click(Sender: TObject);
var
  SearchRec:TSearchRec;
  SearchRecArr:array of TSearchRec;
  i:integer;
begin
  i:=-1;
  if FindFirst('C:\Users\zeina.shehab\Desktop\New folder\z*.txt',faAnyFile,SearchRec)=0 then
  begin
    repeat
      SetLength(SearchRecArr,length(SearchRecArr)+1);
      SearchRecArr[high(SearchRecArr)]:=SearchRec;

      inc(i);  
      if SearchRec.Name='z2.txt' then
        caption:=SearchRecArr[i-2].Name;
    until (FindNext(SearchRec)<>0);
  end;
end;
أدبني الدهر فأراني نقص عقلي وإذا ما ازددت علما زادني علما بجهلي
[-] كل من 1 user says قال شكرا ل لؤي على المشاركة المفيدة
  • ELARAPY
الرد
#3
السلام عليكم
إضغظ Ctrl ثم ثم إضغظ بيمين الفأرة على الشيئ الذي تريد أن تعرف عليه أكثر سيأخذك دلفي الى السورس يمكنك ان تكتشف الكثير هناك...
و لرب نازلة يضيق لها الفتى ذرعا و عند الله منها المخرج
ضاقت فلما استحكمت حلقاتها فرجت و كنت اضنها لا تفرج
الرد
#4
(24-09-2019, 02:03 PM)S.FATEH كتب : السلام عليكم
إضغظ Ctrl ثم ثم إضغظ بيمين الفأرة على الشيئ الذي تريد أن تعرف عليه أكثر سيأخذك دلفي الى السورس  يمكنك ان تكتشف الكثير هناك...

استاذ فاتح هل يمكن تعلم لغة الدلفي من خلال ملف المساعدة بالنسبة للمبتدئ ؟
قل إن صلاتي ونسكي ومحياي ومماتي لله رب العالمين
الرد
#5
ملف المساعدة لمساعدتك على ايجاد شرح وافي للدوال و الاجراءات لا اعتقد انه يمكن التعلم به كبداية بالتوفيق اخي
و لرب نازلة يضيق لها الفتى ذرعا و عند الله منها المخرج
ضاقت فلما استحكمت حلقاتها فرجت و كنت اضنها لا تفرج
[-] كل من 1 user says قال شكرا ل S.FATEH على المشاركة المفيدة
  • ELARAPY
الرد
#6
(26-09-2019, 12:21 AM)ELARAPY كتب : هل يمكن تعلم لغة الدلفي من خلال ملف المساعدة بالنسبة للمبتدئ ؟

نعم يمكن
تصفح ملف المساعدة مفيد جدا
تعرف على ما يمكن فعله + امكانية وجود مثال
عزز معرفتك بتصفح كل ما تجده من ملفات مصدرية لبرامج مفتوحة تتعلم اساليب وحيل لن تجدها بالكتب او دورات
بالتوفيق
رَبَّنَا اغْفِرْ لِي وَلِوَالِدَيَّ وَلِلْمُؤْمِنِينَ يَوْمَ يَقُومُ الْحِسَابُ
[-] كل من 1 user says قال شكرا ل محمد عبد العزيز على المشاركة المفيدة
  • ELARAPY
الرد
#7
(30-09-2019, 08:42 AM)B.M.AbdelAziZ كتب :
(26-09-2019, 12:21 AM)ELARAPY كتب : هل يمكن تعلم لغة الدلفي من خلال ملف المساعدة بالنسبة للمبتدئ ؟

نعم يمكن
تصفح ملف المساعدة مفيد جدا
تعرف على ما يمكن فعله + امكانية وجود مثال
عزز معرفتك بتصفح كل ما تجده من ملفات مصدرية لبرامج مفتوحة تتعلم اساليب وحيل لن تجدها بالكتب او دورات
بالتوفيق

ربنا لا يحرمنا منك اخي الكبير القدر , والله من قلبي بارك الله فيكم جميعا .
قل إن صلاتي ونسكي ومحياي ومماتي لله رب العالمين
الرد
#8

كإضافة فقط
ليس شرط ان تفهم كل شيئ
عند تصفح ملف المساعدة تعرف وجود دوال لفعل كذا و اجراءات لفعل هذا وذاك
فقط تصفح وحاول تذكر ما استطعت، في يوم ما تحتاج الى فعل كذا تتذكر بوجود دالة تقوم بذلك...

عودة للموضوع: هل فهمت TSearchRec ام لا يزال هناك لبس ؟
رَبَّنَا اغْفِرْ لِي وَلِوَالِدَيَّ وَلِلْمُؤْمِنِينَ يَوْمَ يَقُومُ الْحِسَابُ
الرد
#9
لا لم افهمه ,,

انا ادرس كتابين للاستاذ معتز عبد العظيم واخترت تلك الكتب لان بها قدر لا بأس به من المعلومات وايضا لحداثتهم لانهم بتاريخ 2016

وانا اتبع ما اشرت به علي حيث اتبع الكتب اكثر من الفيديوهات ,, تقدمت في باسكال وانهيت المصفوفات والملفات .

ثم راجعت موضوع قديم لي على دلفي للعرب قد ساعدوني الاخوة فيه حل المشكله وهذا هو الموضوع

http://delphi4arab.net/forum/showthread....148&page=2

وكنت وقتها اريد التعامل مع الملفات من حيث تغير الاسم والامتداد ,, فوجدت اجابة الاخوة الافاضل غير موجودة بالكتب الذي ادرس فيها وغير موجوده بالكتب الانجليزية ولذلك طرحت هذا الموضوع مجددا وكنت اتمنى ان لا انهي درس الملفات حتى افهم كل ما يدور حولها .
قل إن صلاتي ونسكي ومحياي ومماتي لله رب العالمين
الرد
#10

انظر للصورة واخبرني ماذا تلاحظ

[صورة: VFAT_directory_entries.png]
رَبَّنَا اغْفِرْ لِي وَلِوَالِدَيَّ وَلِلْمُؤْمِنِينَ يَوْمَ يَقُومُ الْحِسَابُ
[-] كل من 1 user says قال شكرا ل محمد عبد العزيز على المشاركة المفيدة
  • invocker
الرد


التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم