دروس Ftp / Smtp /client-server /http/..كلها مع Indy

نبدأ الآن بتعريف أهم المكونات في Indy أو أكثرها إستعمالا ولكن قبل ذلك لا بد لنا أن نعرج على أهم البروتوكولات التي تتعامل معها مكتبة عناصر indy :

-- مامعنى كلمة بروتوكول : هو الشيء المتعارف علية و المحكوم بقوانين و قواعد معينة.

-- بروتوكول نقل الملفات FTP (File Transfer Protocol) هو بروتوكول خاص بنقل الملفات الكبيرة نسبيا بطريقة سريعة بين أجهزة الكمبيوترالبعيدة ( client- server ) والموجودة في شبكة تستخدم بروتوكول (TCP/IP) مثل شبكة الأنترنت .

-- بروتوكول نقل النص المترابط – التشعبي HTTP (Hypertext Transfer Protocol) : هو بروتوكول نقل النص المترابط (ملفات ذات محتوى متعدد الوسائط –Multimedia ) ويتشابه مع بروتوكول نقل الملفات FTP من الأجهزة الخادمة البعيدة (remote servers) ولكنهما يختلفان في أن بروتوكول نقل النص المترابط (HTTP) يستخدم المستعرض (Web browser) لعرض الملفات المنقولة من الخادم (Server) على شاشة المستخدم (Client) لتأخذ في النهاية شكل صفحات الويب التي نعرفها بينما بروتوكول نقل الملفات FTPيخزن الملفات المنقولة في القرص الصلب لجهاز المستخدم.

-- بروتوكول السيطرة – التحكم في الإرسال TCP/IP(Internet Protocol /Transmission Control Protocol) : يعتبر بروتوكول TCP/IP من أهم البروتوكولات الموجوده من أجل التخاطب في الشبكات و يعتبر الان لغة التخاطب الوحيده في الانترنت و يوجد العديد من لغات التخاطب ما بين العتاد و المعدات في الشبكه الواحده و لكن الـ TCP/IP يعتبر البروتوكول الرئيسي و بذلك لغة التخاطب هذه هي اللغه الافضل و الأكثر شيوعاً في العالم و من مميزاتها أنها ممكن أن تعمل مع أي بروتوكول آخرو بروتكول الـ TCP/IP هو المسؤول عن الـ IP Address و هو يمثل عنوان مرسل و مستقبل الإتصال على الشبكة.

-- العملاء (Client) : نطلق هذه التسمية بعد أن تتم عملية الإتصال بين العميل والخادم (Server) ونستطيع تشبيه هذه العملية بالمكالمة الهاتفية حيث أن العميل هنا هو الشخص الذي يقوم بالإتصال.

-- الخادم (Server) : هو الذي يجيب على الطلبات القادمة من العملاء ويقوم الخادم بمعالجة العديد من الطلبات لأكثر من زبون في نفس الوقت وبشكل آني مثل المكالمة الهاتفية فأنت عندما تجري إتصال هاتفي وكان الهاتف في الطرف الثاني معطل يجيبك خادم شبكة الهاتف فورا بوجود عطل .

-- عنوان IP (IP Address) : كل حاسوب موجود على الشبكة التي تعمل تحت نظام السيطرة على الإرسال (TCP/IP) يملك عنوان IP وهو من الشكل 192.168.0.1 وقد ترتبط مجموعة من عناوين IP بعنوان IP واحد .

وهناك العديد من البروتوكولات الأخرى التي تتعامل معها INDY لكن نكتفي بهذا القدرلنبدأ الآن بطرح بعض الأمثلة عن كيفية إستخدام عناصر indy في برامجنا.

نبدأ الآن مع أول برنامج لنا نستعمل فيه مكتبة العناصر Indy - سيكون برنامج يستعمل بروتوكولFTP لرفع وتنزيل الملفات من موقعك(Server) من أجل ذلك سنستعمل العناصر التالية من مكتبة العناصر INDY :

-- IdFTP : يتعامل هذا المكون مع بروتوكول نقل الملفات FTP الذي هو جزء أساسي من نظام تبادل الملفات لتحميل وتنزيل الملفات ، وكذلك في إدارة الملفات والأدلة ، كما ذكرنا سابقا بروتوكول نقل الملفات بروتوكول شائع لتوزيع البرمجيات ، وتحميل الملفات على خادم الشبكة ، وتوفير المحفوظات لأغراض مختلفة، كما أن هذا العنصر يحتوي على كل الأقسام والأنواع والإجراءات والوظائف اللازمة لتعريف وتنفيذ FTP صنف عميل .

-- IdAntiFreeze : يعمل Indy على ما يعرف بـ blocking model يعني إذا أنت مثلا أدخلت عنوان خادم ما وبمجرد ضغطك على زر الإتصال يبدأ عمل هذا العنصر حيث أن دور هذا العنصر هو تجميد العمليات الأخرى حتى يتم الحصول على جواب لعملية الإتصال الأولى ، وتبقى العمليات الأخرى في حالة إستثناء مرفوع (معلقة) ويتولى Tidantifreezebase تقرير إذا كان هناك حالات أخرى خلقت أثناء عملية الإتصال هذا يعني أن عنصر واحد فقط من هذا المكون يمكن أن يكون نشيط في نفس التطبيق ويستعمل هذا المكون مايعرف بـ : global variable GAntiFreeze .

-- IdLogEvent : هذا العنصر سليل Tidlogbase ويكمن دوره في الإخطاروالتبليغ بالمدخلات والمخرجات وأي تغير في الوضع كما يقوم بنشر أحداث المقابض الخاصة بإستقبال وإرسال البيانات (Data) والتبليغ عن حالة الإتصال (notifications in the socket connection state) .

وسنحتاج أيضا إلى المكونات التالية من مكتبة العناصر في دلفي :

-OpenDialog

-SaveDialog

-HeaderControl

-ProgressBar

-PopupMenu

-DirectoryListBox

-DebugListBox

-CheckBox1

بالإضافة لـ Button و Editو نقوم بتصميم واجهة البرنامج كالتالي :

تجدون في المرفقات برنامج FTP كامل تستطيعون من خلاله تنزيل وتحميل الملفات من الخادم SERVER

من خلال هذا المثال البسيط الذي يستخدم ثلاث عناصر INDY يتضح لنا مدى سهولة التعامل مع مكتبة العناصر INDY لإنشاء تطبيقات بمواصفات عالية وسهولة بالغة

FTP.rar

السلام عليكــم ورحمـة الله وبركاتــه ،،

نتكلم في هذا الدرس عن Tidhttp

Tidhttp : هو سليل Tidcustomhttp

يتعامل هذا المكون من مكتبة العناصر في indy مع بروتوكول http وكما قلنا سابقا بروتوكول http مسؤول عن عرض الملفات ذات الوسائط المتعددة من خلال مستعرض الويب ، ويقوم Tidhttp بنشر ما يعرف بـ handlers المتعلقة بالأحداث والخصائص على الأصناف الآباء للسماح بالدخول من خلال تطبيق الزبون.، كما أن Tidhttp يوفر الدعم لكل من http v1.0 و http v1.1

هذا المثال سوف يوضح مبدأعمل هذا المكون

نقوم بفتح مشروع جديد ونضع العناصر التالية من مكتبة العناصر في دلفي :

في هذا المثال سوف نقوم بإنشاء برنامج لتحميل الملفات من خلال إدخال عنون URL يدويا طبعا هذا العنوان سوف يكون رابط تحميل ملف ما

مثال ://attachment/88986

من خلال هذا المثال يتضح لنا كيف يمكن لنا أن نتعامل مع بوتوكول HTTP من خلال INDY

نبدأ على بركة الله:

نقوم بتحديد Tidhttp ومن محرر الخواص نختار قائمة الأحداث وفي الخانة onAuthorization من أجل الإنتقال إلى محرر الأكواد ونكتب ما يلي :

procedure TForm1.IdHTTP1Authorization(Sender: TObject;
Authentication: TIdAuthentication; var Handled: Boolean);
begin
showmessage('ERROR');
end;

ثم في خانة onWork نكتب مايلي:

procedure TForm1.IdHTTP1Work(Sender: TObject; AWorkMode: TWorkMode;
const AWorkCount: Integer);
begin
if AWorkMode = wmRead then
begin
ProgressBar1.Position := AWorkCount ;
Label1.Caption := IntToStr(AWorkCount) + 'Bytes de :' + inttostr(ProgressBar1.Max) ;
end;

end;

ثم في خانة onWorkbegin نضغط مرتين ونكتب مايلي :

procedure TForm1.IdHTTP1WorkBegin(Sender: TObject; AWorkMode: TWorkMode;
const AWorkCountMax: Integer);
begin
if AWorkMode = wmRead then
begin
ProgressBar1.Max := AWorkCountMax ;
ProgressBar1.Position := 0 ;
end;

وفي خانة onWorkend نضغط مرتين ونكتب ما يلي :

procedure TForm1.IdHTTP1WorkEnd(Sender: TObject; AWorkMode: TWorkMode);
begin
if AWorkMode = wmRead then
Label1.Caption := 'Completed';
showmessage('Completed');
ProgressBar1.Position := 0 ; end;

إنتهينا الآن من العمل على عنصر IdHTTP1

ننتقل الآن إلى العنصر الذي قمنا بشرحه سابقا IdAntiFreeze1

نقوم بتغيير الخاصية Active لهذا العنصر من False إلى True فقط

ننتقل الآن إلى زر الحفظ :

نضغط مرتين على زر الحفظ ونكتب ما يلي :

procedure TForm1.Button2Click(Sender: TObject);
begin
SaveDialog1.Execute;
edit2.Text:=SaveDialog1.FileName;
end;

ننتقل الآن إلى زر التحميل نضغط مرتين ونكتب ما يلي :

procedure TForm1.Button1Click(Sender: TObject);
var
F: TFileStream;
begin
try
idhttp1.Request.Username:=edit3.text;
idhttp1.Request.password:=edit4.text;
idhttp1.Request.BasicAuthentication:=true;
F := TFileStream.Create(edit2.text, fmCreate);
IdHTTP1.Get(edit1.text,F);
finally
F.Free;
end;
end;

وهذا رابط المثال : http:/index.php?showtopic=198691

ومن أجل إثراء الموضوع هذا مثال آخر عثرت عليه وأنا أتجول في النت وهو مثال رائع يستخدم نفس عناصر INDY التي سبق شرحها وإنما بأسلوب رائع

حيث أنه يمكنك تحميل أكثر من ملف في نفس الوقت ومن أكثر من عنوان واحدوهو شبيه ببرامج التحميل التي نعرفها

هذه صورة المثال الثاني :

تجدون المثال الثاني في المرفقات

HTTPMultiFileDownloader.zip

هل توقفت الدروس هنا اخي tahasit

لا يا أخي زكيرى لم تتوقف هنا ومازال الكثير مما ينبغي شرحه

وفي القريب العاجل جدا إن شاء الله

الذي شغلني عن إتمام الدرس هو أني أحضر لمذكرة التخرج تقني سامي في الإعلام اللآلي ولم أجد المؤسسة المناسبة لحد الآن

الله معين

زكيري عبد العالي كتب:

الله معين

كنت اريد ان اكتب طلب مساعدة عن موضوع ال ftp

الله يجزيكم الخير شكرا لكم جميعاً

السلام عليكــم ورحمـة الله وبركاتــه ،،

أنا حملت المثال المتعلق بالاتصال ب الموقع و الاطلاع على مجلدات الموقع و ملفاته

بس المشكلة بالمثال عم يظهر التاريخ بالشكل 00:00 2005/12/01

اخدت المثال و حاولت تطبيقه بدون على دلفي 2007 لكن ظهر التاريخ على الشكل التالي Jan 12 2005 مع اني اعطيته الفورمات المطلوب

حتى حملت تطبيق أخر واعطيته فورمات لكن ظهر بنفس الاسلوب

و انا بحاجة لتاريخ الملف من أجل

هل من الممكن الحصول على تاريخ السيرفر بواسطة الدلفي ؟

السلام عليكــم ورحمـة الله وبركاتــه ،،

المشكلة لدي انا لدي برنامج محاسبة و عن طريق برنامج المحاسبة في قائمة أرغب بوضع تحميل التحديث عن طريق زر مثلاً

عن الضغط قمت بتحصيل تاريهخ النسخة عن طريق fileAge الأن تبقى لدي الحصول على تاريخ التحديث النسخة المرفوعة عن الموقع استخدمت IDFTP لكن التاريخ اذا كان في غير عام

ظهر بالشكل Jan 12 2005

لكن اذا كان في نفس العام يظعر على الشكل لا يظهر العام يظهر الوقت عوضاً عنه

Sep 28 03:10

استخدمت فورمات للتاريخ لكن اعطاني خطأ

و جزاكم الله كل خير

مشكور

اخي helaly هل تعرف عنوان منفذ ال Lan

وشكراً