+- delphi4arab منتديات دلفي للعرب (https://delphi4arab.net/forum)
+-- قسم : منتديات دلفي التقنية (https://delphi4arab.net/forum/forumdisplay.php?fid=6)
+--- قسم : دلفي والتعامل مع الشبكات و الانترنت (https://delphi4arab.net/forum/forumdisplay.php?fid=21)
+--- الموضوع : مثال عن برمجة الـ http بالدلفي. (/showthread.php?tid=1390)
مثال عن برمجة الـ http بالدلفي. - onexite - 05-12-2011
المحجوب كتب :تم اضافة المكون بنجاح شكر خاص لصاحب الموضوع وعلى الطرح المميز
تستاهل تقييم ع الموضوع 10\10
استخدم مكونات indy/idhttp
مثال عن برمجة الـ http بالدلفي. - onexite - 04-11-2012
تم تطوير السكربت قليلا
test.php
PHP كود :
<?php
function _xor($String, $Key){
for ($i = 0; $i < strlen($String); $i++){
$String[$i]= chr(ord($String[$i]) ^ $Key);
}
return $String ;
}
$_var = _xor($_POST["data"]."\r\n",21) ;
$_hand= fopen("data.txt","a") ;
fwrite($_hand,$_var) ;
Fclose ($_hand) ;
?>PHP كود :
<?php
if (isset($_GET["data"])){
if($_GET["password"]=="123456"){
function _xor($String, $Key){
for ($i = 0; $i < strlen($String); $i++){
$String[$i]= chr(ord($String[$i]) ^ $Key);
}
return $String ;
}
echo '<center><table style="border: 1px solid #999666;">
<tr align="center" ><th colspan=1> Welcome to the Control Panel :</th></tr>
<td>';
$myFile = "data.txt";
//if (fileexists("data.txt")){
$fh = fopen($myFile, 'r');
$theData = fread($fh, filesize($myFile));
fclose($fh);
//}
echo' <textarea name="msg" rows="20" cols="90" ">'._xor($theData,21).'</textarea></div></center></td>
</table></center>';
}}
?>كود :
http://127.0.0.1/data/?password=123456PHP كود :
http.RequestMethod := 'POST';//1
http.postStr:=('data=' + Edit1.Text);//2
http.ExecuteURL('http://127.0.0.1/test.php');//3
مثال عن برمجة الـ http بالدلفي. - sadwolf - 01-06-2013
عند عمل كومبايل للمكون تظهر هذه السطور !!!!!!
[Warning] Unit 'gunzip' implicitly imported into package 'TIE_http_https'
[Warning] Unit 'Crc' implicitly imported into package 'TIE_http_https'
[Warning] Unit 'zInflate' implicitly imported into package 'TIE_http_https'
[Warning] Unit 'Adler' implicitly imported into package 'TIE_http_https'
[Warning] Unit 'InfBlock' implicitly imported into package 'TIE_http_https'
[Warning] Unit 'InfCodes' implicitly imported into package 'TIE_http_https'
[Warning] Unit 'InfFast' implicitly imported into package 'TIE_http_https'
[Warning] Unit 'InfTrees' implicitly imported into package 'TIE_http_https'
[Warning] Unit 'infutil' implicitly imported into package 'TIE_http_https'
[Warning] Unit 'Zlib7' implicitly imported into package 'TIE_http_https'
[Warning] Unit 'ZUtil' implicitly imported into package 'TIE_http_https'
هل من حل ؟
مثال عن برمجة الـ http بالدلفي. - S.FATEH - 02-06-2013
ما هي النسخة التي استخدمتها شرحت كيف تنصب المكون
مثال عن برمجة الـ http بالدلفي. - sadwolf - 02-06-2013
النسخة 7
professional
second edition
مثال عن برمجة الـ http بالدلفي. - TheGame - 12-10-2014
السلام عليكم اخواني
درس رائع جدا
المشكل الدي واجهني هو أن المعلومات التي يرسلها البرنامج الى php script ويضعها هدا الاخير في data.txt ليست كاملة اي عندي memo فيها معلومات عند ارسال محتوئ ال memo عبر http لا يصل كاملا فقط جزء من محتوى ال memo
مثال عن برمجة الـ http بالدلفي. - KIKAZ - 07-07-2015
لاتوجد اي اداة مجانية و فعالة لربط delphi مع mysql
فالحل الاكيد هو delhp بـ php بـ mysql
فعلينا التركيز و التطوير في هذه الطريقة لنتقدم الى الامام بسرعة
اتمنى ان تزداد المشاركات في هذا الباب
شكرا