[leroisss]

Здравствуйте, уважаемые форумчане!
Пишу приложение к интернет магазину на движке WordPress, в post запросе не могу получить в StringList эти параметры
referredby=" "
_wp_original_http_referer=" "
эти параметры являются переменной ссылкой
подскажите пожалуйста как это сделать. Заранее спасибо.

[Alegun]

Покажите чтоли кодом как "не могу получить" для затравки

[leroisss]

Delphi

Код:

z:= http.Get('http://220-400-volt.96.lt/wp-admin/post-new.php?post_type=product');
 site:= z ;
 a:= 'class="ab-item" href="http://220-400-volt.96.lt/wp-login.php?action=logout&_wpnonce=';
 delete(site, 1, (pos(a,site)+length(a))-1);
delete(site, 11, maxint);
 str.Add('_wpnonce='+ site) ;
 str.Add('_wp_http_referer=/wp-admin/post-new.php?post_type=product');
 str.Add('user_ID=1');
 str.Add('action=editpost');
 str.Add('originalaction=editpost');
 str.Add('post_author=1');
 str.Add('post_type=product');
 str.Add('original_post_status=auto-draft');
 site:= z ;
 a:= '"referredby" value=';
 delete(site, 1, (pos(a,site)+length(a))-1);
delete(site,length(a)-15 , maxint);
 str.Add('referredby='+site);
 str.Add('_wp_original_http_referer='+site);
 str.Add('auto_draft');
 site:= z ;
 a:= 'woocommerce_admin_meta_boxes_variations = {"post_id":"';
 delete(site, 1, (pos(a,site)+length(a))-1);
delete(site,length(a)-50 , maxint);
str.Add('post_ID='+site);

Html 

<input type="hidden" id="post_type" name="post_type" value="product" />
<input type="hidden" id="original_post_status" name="original_post_status" value="auto-draft" />
<input type="hidden" id="referredby" name="referredby" value="http://220-400-volt.96.lt/wp-admin/edit.php?post_type=product" />
<input type="hidden" name="_wp_original_http_referer" value="http://220-400-volt.96.lt/wp-admin/edit.php?post_type=product" /><input type='hidden' id='auto_draft' name='auto_draft' value='1' /><input type='hidden' id='post_ID' name='post_ID' value='604' /><input type="hidden" id="meta-box-order-nonce" name="meta-box-order-nonce" value="e538c62aa4" /><input type="hidden" id="closedpostboxesnonce" name="closedpostboxesnonce" value="e0a5809893" />

<div id="poststuff">

при выводе в мемо получается так 
_wpnonce=3e1a88eb54
_wp_http_referer=/wp-admin/post-new.php?post_type=product
user_ID=1
action=editpost
originalaction=editpost
post_author=1
post_type=product
original_post_status=auto-draft
referredby="" 
_wp_original_http_referer="" 
auto_draft
post_ID=606
meta-box-order-nonce=20faa2bb1e
closedpostboxesnonce=4bceefd945

MAD: пользуемся тегами!

[Alegun]

Переменная a и должна быть пустой, поскольку

Код:

delete(site, 1, (pos(a,site)+length(a))-1);

а она изначально всего лишь

Код:

a:= '"referredby" value=';

Ошибки парсинга

З.Ы. Кстати, в мемо прилетает немного другое

_wpnonce=e="hidden"
_wp_http_referer=/wp-admin/post-new.php?post_type=product
user_ID=1
action=editpost
originalaction=editpost
post_author=1
post_type=product
original_post_status=auto-draft
referredby="ht
_wp_original_http_referer="ht
auto_draft
post_ID=val

[leroisss]

Почему делая Get зарос на страницу, и вывожу весь html
эти два параметра приобретают вид
<input type="hidden" id="referredby" name="referredby" value="" />
<input type="hidden" name="_wp_original_http_referer" value="" /><input type='hidden' id='auto_draft' name='auto_draft' value='1' /><input type='hidden' id='post_ID' name='post_ID' value='656' /><input type="hidden" id="meta-box-order-nonce" name="meta-box-order-nonce" value="0e5f1102df" /><input type="hidden" id="closedpostboxesnonce" name="closedpostboxesnonce" value="2f75059ab0" />
referredby" value=""
wp_original_http_referer" value=""
на странице они есть а в мемо вообще даже get запросом вывести не получается, при добавление товара они имеют вид
type="hidden" id="referredby" name="referredby" value="http://220-400-volt.96.lt/wp-admin/post.php?post=642&action=edit" />
<input type="hidden" name="_wp_original_http_referer" value="http://220-400-volt.96.lt/wp-admin/post.php?post=642&amp;action=edit" /

уже голову сломал как их спарсить

[Alegun]

Да проще на теги опираться

Код:

function prs(ds,vs,ts: string):string;
begin
delete(vs, 1, (pos(ds,vs)+length(ds))-1);
Result:= Copy(vs,1,Pos(ts,vs)-1);
end;

begin
a:= '<input type="hidden" id="referredby" name="referredby" value="';
z:= '" />';
str.Add('referredby=' + prs(a,site,z));
end;

результат в мемо

referredby=http://220-400-volt.96.lt/wp-admin/edit.php?post_type=product