30-06-2011, 05:44 PM
mohfa كتب :اولا حاول :
إستعمال ال Head في مكان ال Get .
ثانيا لاتنسى :
تحرير ال Data
والله المستعان
لقد حاول مع head لكن لا تظهر اي شيئ في
كود :
[align=left]procedure TForm1.IdHTTP1Redirect(Sender: TObject; var dest: string;
var NumRedirect: Integer; var Handled: Boolean; var VMethod: string);
begin
form1.Edit1.Text := dest;
end;
[/align]كود :
[align=left] edit1.Text := idhttp1.Response.Location;
[/align]
شكرا لك على النصيحة نعم نسيت تحري data من الذاكرة لاني الان احاول التعلم وحل المشكلة بعدها اقوم بكتابة الكود من جديد