easyDelphi Q&A
0 تصويتات
30 مشاهدات
Need install old componnet httpserver in Delphi rio
سُئل في تصنيف vcl بواسطة (280 نقاط) | 30 مشاهدات
 
Why???????????????

1 إجابة واحدة

0 تصويتات
put it's unit file in the project folder. and put it's name in uses section.
this must be enough unless you use a very old one like in delphi 7 !
تم الرد عليه بواسطة (20,380 نقاط)
المشكل في استخدام الوحدة انها تحتاج الى الكثير من الوحدات الاخرى.  السبب في اني عند استخدام الاصدار القديم في دلفي 7 يمكن ارسال واستقبال الداتا بنجاح لكن في الاصدار الجديد الارسال لا يتم ارسلت النص عن طريق acontext.connection.iohandler.writeln(str) لكن لم يتم الارسال لو ممكن مثال لارسال نص واستقبال الرد في هذا المكون الجديد
1 ـ تاكد من انه لا يوجد تغير في طريقة الاستخدام . ( ارجع للمراجع في الموقع الرسمي للمكون ).
2 ـ تاكد من اضافة مسار المكون في الخيارات / library . هكذا لن تشغل بالك بما يحتاج من وحدات اخرى .
هناك اختلافات غير ظاهرة لي سارفق الكود ربما تعرف سبب الخلل في الدلفي 7 يعمل جيدا لكن  الدلفي ريو لا يعمل بسبب نسخة اندي 10
هذا الكود ع ملف html للتجريب
خاص بالدلفي ريو
procedure TForm1.IdHTTPServer1CommandGet(AContext: TIdContext;
  ARequestInfo: TIdHTTPRequestInfo; AResponseInfo: TIdHTTPResponseInfo);
var
    Stream : TStream;
   begin
   if ARequestInfo.Command = 'POST' then
      begin
         Stream := ARequestInfo.PostStream;
         if assigned(Stream) then
            begin
               Stream.Position := 0;
                    memo1.Lines.LoadFromStream(Stream);
            end;

      end  ;
end;

خاص بالدلفي  7
procedure TForm1.IdHTTPServer1CommandGet(AThread: TIdPeerThread;
  ARequestInfo: TIdHTTPRequestInfo; AResponseInfo: TIdHTTPResponseInfo);
var
      Stream : TStream;
    begin
   if ARequestInfo.Command = 'POST' then
      begin
         Stream := ARequestInfo.PostStream;
         if assigned(Stream) then
            begin
               Stream.Position := 0;
                    log.Lines.LoadFromStream(Stream);
                         end
      end;
      end;
الاختلاف في   AContext: TIdContext;   و   AThread: TIdPeerThread;
كود  html

<html>
<body>
Test POST<br>
<form id="form1" action="/" method="POST">
input 1: <input id="edit1" name="edit1"><br>
input 2: <input id="edit2" name="edit2"><br>
<button type="submit">Send</button>
</form>

</body>

</html>
في الحالتين. لا تحتاج هذا الاختلاف في الكود ..
ما هي رسالة الخطأ ؟
لا توجد رسالة خطا نفس الكود يعمل على  اندي 9 ولا يعمل على اندي 10
والله ضيعتني . مرة تقول لي دلفي ٧ ومرة تقول دلفي ريو ..ومرة تقول لي indy ٩ ومرة ١٠ ..
إلى الان لم افهم ما الذي تريد استخدامه بالنهاية .. يعني في ما هو طلبك بالنهاية ..
تريد تنفيذ هذا الاجراء في دلفي ريو مع اندي ١٠ ؟؟؟؟؟ هل هذا طلبك ؟؟؟
وانت تقول لا يعمل .. ولا تظهر رسالة خطأ .. كيف اذا عرفت انه لا يعمل ؟؟؟؟ وان المشكلة هنا وليست في غير مكان ؟؟؟؟؟؟
يا استاذ سامر انا عامل مشروعين واحد للدلفي 7 وواحد للدلفي ريو تمام عند تشغيل المشروع الخاص بدلفي 7 وارسال نص من المتصفح "الكود الموجود في html"  يتم استقبال النص في الميمو فاذا ارسلت كلمة  hellow. و رقم 12345 مثلا يتم عرضها في الميمو ونفس الخطوات مع مشروع على ريو لا يظهر شيء على الميمو ولا يظهر اي خطا لذلك عرفت ان الكود لم يعمل تستطيع ان تجرب عندك

اسئلة متعلقة

0 تصويتات
1 إجابة
سُئل يناير 10 في تصنيف Interbase بواسطة Noureddine Hadef (120 نقاط) | 45 مشاهدات
+2 تصويتات
2 إجابة
سُئل أكتوبر 7، 2018 في تصنيف vcl بواسطة xorpas (280 نقاط) | 67 مشاهدات
+2 تصويتات
3 إجابة
–1 تصويت
0 إجابة
سُئل مارس 21 في تصنيف vcl بواسطة Djamal Med (380 نقاط) | 18 مشاهدات
+2 تصويتات
1 إجابة
سُئل أكتوبر 27، 2018 في تصنيف vcl بواسطة youcef (240 نقاط) | 45 مشاهدات
ادعُ اصدقائك في الفايسبوك لمشاركتك
Comodo SSL

مرحبًا بك إلى EasyDelphi Q&A، حيث يمكنك طرح الأسئلة والحصول على الإجابة عليها من المستخدمين الآخرين.

لا يسمح بطلب او السؤال عن كراك او تفعيل او كسر او فك او اي شيء يخالف اتفاقيات الترخيص  مهما كان السبب ومهما كان البرنامج ونوعه. ولا حتى نشر روابط تحتوي على مثل هذه الاشياء لا في الاسئلة ولا في الاجابات ولا التعليقات . نهائيا

324 سؤال
533 إجابة
928 تعليق
222 مستخدم