dark-man
شنبه 12 آذر 1390, 18:42 عصر
بخشید پس اون یونتی که این جوری ایجاد شده اصلا هیچ کاری نمی کنه؟
عقاب جان ، منم همین مشکل رو داشتم و البته مشکل رو به روش زیر حل کردم که با اکثر ساختارهای xml-rpc سازگار هست . امیدوارم به دردت بخوره .
procedure TForm1.Button1Click(Sender: TObject);
var
PostDataStream : TStringStream;
ParamData : TStringStream;
begin
PostDataStream := TStringStream.Create('');
ParamData := TStringStream.Create('');
ParamData.WriteString('<?xml version="1.0" encoding="UTF-8"?>');
ParamData.WriteString('<methodCall>');
ParamData.WriteString('<methodName>system.listMethods</methodName>');
ParamData.WriteString('<params></params>');
ParamData.WriteString('</methodCall>');
try
//Connect
IdHTTP1.Post('http://localhost/wordpress/xmlrpc.php', ParamData, PostDataStream);
Memo2.Text := PostDataStream.DataString;
finally
ParamData.Free;
PostDataStream.Free;
end;
// Parse the rich edit text here
end;