السلام عليكم ورحمة الله وبركاته
كيف الحال و مساء الخير ...
ما المشكله في هذا الكود اريد من ان يضع النص في خانة الباسورد لموقع hotmail
على الرابط هذا
https://login.live.com/?wa=wsignin1.0&rp...cexp=false
ولكن عندما اضع النص وانفذ الامر لا يتم الاجراء على خانة الباسورد في موقع Hotmail وتبقى فارغه كما هي لماذا
هذا الكود
procedure Tmain.Button1Click(Sender: TObject);
var
DataPost: TSTringList;
begin
Memo1.Text := '--------Get-------';
Memo1.Text := IdHTTP.Get(Edit2.Text);
Memo1.Text := '--------Get-------';
DataPost := TSTringList.Create;
DataPost.Values['i0118'] := Edit1.Text;
Memo1.Text := IdHTTP.Post(Edit2.Text, DataPost);
DataPost.Free;
end;
ووضعت الID لخانة الباسورد في موقع hotmail وهو 'i0118' ولكن لا يتم لصق الكلام الذي اكتب في خانة الباسورد هل هناك خطاء او طريقتي غير صحيحه