Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате
Форум программистов > Delphi: Сети > Передать текст


Автор: ConstantinXXX 18.3.2007, 13:42
У меня такая проблема, я сделал простенькую rpg игру, вот теперь хочу сделать сайт к ней. Проблема в заключается в следующем - хочу чтоб рекорды из игры передовались на web - сайт. 
Как передать текст из delphi 7 в php скрипт?
----------
P/s пожалуста не пишите чето типа (rambler поможет). У же искал, ненашол.  smile 
 smile 
Зарание спасибо.... Сменя "+"  smile 

Автор: W4FhLF 18.3.2007, 13:51
Для передчи используй метод POST. Информации по нему не просто тонны, в том числе и на этом форуме, в том числе и с примерами.

Автор: Matematik 18.3.2007, 13:57
Один из вариантов.
Код

var d:TIdMultiPartFormDataStream;
{...}
d := TIdMultiPartFormDataStream.Create;
try
  d.AddFormField('field1', 'data1'#13#10'123');
  d.AddFormField('field2', 'data2');
  d.AddFile('file1', 'c:\boot.ini', '');
  ShowMessage(idhttp1.Post('http://localhost/test_post.php', d));
finally
  d.Free;
end;


Код

// test_post.php
<PRE>
<?
print_r($_POST);
print_r($_FILES);
?>
</PRE>

Автор: ConstantinXXX 18.3.2007, 14:10
Matematik, спасиб, но блин чет непонятно smile и компелить нехочет, наверное модуль надо подключить? Какой?

Автор: Matematik 18.3.2007, 14:14
Вариант 2
Код

uses Urlmon;
  if URLDownloadToFile(nil, 'http://localhost/test_post.php?p1=v1&p2=v2', 'c:\dl.txt', 0, nil)=S_OK then
    showmessage('OK');


Код

<PRE>
<?
// test_post.php
print_r($_GET);
?>
</PRE>


Добавлено @ 14:15 
ConstantinXXX, 
Цитата(ConstantinXXX @  18.3.2007,  14:10 Найти цитируемый пост)
Matematik, спасиб, но блин чет непонятно smile и компелить нехочет, наверное модуль надо подключить? Какой? 

idhttp1:TIdHTTP вкладка Indy Clients

Powered by Invision Power Board (http://www.invisionboard.com)
© Invision Power Services (http://www.invisionpower.com)