+- delphi4arab منتديات دلفي للعرب (https://delphi4arab.net/forum)
+-- قسم : منتديات دلفي للعرب التعليمية (https://delphi4arab.net/forum/forumdisplay.php?fid=3)
+--- قسم : سؤال و جواب حول دلفي (https://delphi4arab.net/forum/forumdisplay.php?fid=15)
+--- الموضوع : سؤال حول المكون tiehttp (/showthread.php?tid=3976)
سؤال حول المكون tiehttp - DAMAX2010 - 09-03-2012
السلام عليكم
كيف اجد نتيجة من موقع ؟
يعني مثلا موقع أكتب فيه عملية حسابية يعطيني النتيجة و أكون مبرمج هذه السكربت بالphp
استعمل post لكي أتحكم في الأرقام الحسابية و النتيجة تكون في ملف برمجي أخر
و شكرا
سؤال حول المكون tiehttp - Agmcz - 10-03-2012
وعليكم السلام
الامر ليس صعب تستطيع عمل POST and GET by idhttp
ضع سكربت وان شاء الله نساعدك جميعا
سؤال حول المكون tiehttp - onexite - 10-03-2012
السلام عليكم
في الزر
PHP كود :
iehttp1.ExecuteURL('http://127.0.0.1:8887/calc.php?a=10&b=11');
edt1.text:=IEHTTP1.sl.Text
وهذا السكربت
PHP كود :
<?php
$a=$_GET['a'];
$b=$_GET['b'];
echo $a+$b;
?>سؤال حول المكون tiehttp - DAMAX2010 - 10-03-2012
ghost-dz كتب :ضع سكربت وان شاء الله نساعدك جميعالو ملكت السكربت لما سالت
فقط قلت مثال
شكرا لك أخي
سؤال حول المكون tiehttp - onexite - 10-03-2012
edt1.Text:=idhtp1.Get('http://127.0.0.1:8887/calc.php?a=10&b=11');[/PHP]
واجعل السكربت بسيط بدون عناوين او قفز او الوان .
مثلا هذا
PHP كود :
<?php
echo '<title>test</title>';
$a=$_GET['a'];
$b=$_GET['b'];
echo $a+$b;
?>PHP كود :
<title>test</title>21
سؤال حول المكون tiehttp - DAMAX2010 - 10-03-2012
PHP كود :
edt1.Text:=idhtp1.Get('http://127.0.0.1:8887/calc.php?a=10&b=11');
position:=Pos(s,edt1.Text);
link:=Copy(edt1.Text,(position+length(s)),5);
فكرت في هذا لكن النتيجة لن تكون 5 أرقام كل مرة :p
سؤال حول المكون tiehttp - DAMAX2010 - 10-03-2012
مع العلم أن
PHP كود :
s:='<title>test</title>';
و
PHP كود :
s,link:string;
أستعمل سكربتك
سؤال حول المكون tiehttp - onexite - 10-03-2012
استخدم trim للحذف الفراغات
trim(Copy(edt1.Text,(position+length(s)),5); )
وبدل 5 اجعلها length(edt1.text)