ذخیره محتویات یک صفحه اینترنتی

[omid_delphi2]

سلام
من میخواهم از طریق دلفی 7 محتویات یک صفحه اینترنتی را باز کرده و در یک فایل مثلا با فرمت text ذخیره کنم
لطفا راهنمایی فرمائید

[vcldeveloper]

نگفتید با چی می خواید باز کنید. اگر منظور باز کردن فایل از طریق TWebBrowser ،یا هر کنترلی که از IE ActiveX استفاده میکنه، هست:

Memo1.Lines.Text := Variant(WebBrowser1.Document).Body.InnerText;کد بالا محتویات صفحه را بصورت Text در یک Memo میریزه که می تونید Save اش کنید. اگر منظور بدست آوردن محتویات صفحه به همراه تگ های HTML هست، بجای InnerText بنویسید InnerHtml.

[omid_delphi2]

دوست عزیز اگر قبلا این سوال را پرسیده ای و به جواب رسیده ای خوب جواب انرا بده یا لااقل لینک آنرا بگذار
من نمیدونم چرا تو این سایت هر کی یه سوالی میپرسد 10 نفر میاند میگویند این سوال قبلا پرسیده شده ولی زحمت به خودشون نمیدهند لینکش را بگذارند
در هر صورت ممنون

[Iman_a13]

آقا سلام
این متغیر variant وقتی میزارم همش ایراد میگره راستشو بخوای اصلا دستور بالا جواب نمیده
آقای کشاورز یا یکی دیگه از دوستان اگه میشد سورس کامل تری برای این کار میزاشتون واقعا ممنون میشدیم