دوشنبه، شهریور ۲۸، ۱۳۸۴

چطور میشه در برنامه دلفی امکان ویرایش یک صفحه وب را داد؟

یک کامپوننت مرورگر اینترنت در فرم برنامه بگذارید . در بخش تابع مربوط به ایجاد فرم سورس زیر را بنویسید.

uses MSHTML;

procedure TForm1.FormCreate(Sender: TObject) ;
begin
WebBrowser1.Navigate('http://delphi.webrah.com') ;
end;



در بخش مربوط به رویداد مرورگر اینترنتی هم سورس پائین را اضافه نمایئد.


procedure TForm1.WebBrowser1DocumentComplete(Sender: TObject;
const pDisp: IDispatch; var URL: OleVariant) ;
begin
((Sender as TWebBrowser).Document as IHTMLDocument2).designMode := 'on';
end;



حالا برنامه را اجرا کنید و ببینید که چطور براحتی میشه در این صفحه وب نوشت.
برای اینکه بتوانید این صفحه ویرایش شده را نگهداری کنید باید آنرا ذحیره نمائید. راهنمای ذخیره یک صفحه وب هم از طریق برنامه در مقاله زیر توضیح داده شده است.
چطور میشه محتوای یک صفحه html را ذخیره کرد

۳ نظر:

  1. به تشكر
    يك مشكل اساسي در وب براوزر وجود دارد مبني بر اينكه هر وقت سند را بدون ذخيره در فايل اچ تي ام ال براوز مي كنيم در برخي مواقع سورس آن را نمايش مي‌دهد!
    در برخي فورومهاي خارجي هم من شاهد اين سوال بوده‌ام ولي جوابي براي آن نيافته‌ام. شما راه حلي مي‌شناسيد؟

    پاسخحذف
  2. راستي!
    متن كامل سورس‌ها و ايونت‌ها و امكانات مختلف براي وب براوزر در دلفي را از كجا مي‌توان يافت؟
    در سايت‌هاي خارجي دستورات مشابهي (مثل همين مورد كه اكنون شما نوشته‌ايد) ديده مي‌شود ولي منبع جامعي لازم دارم.
    محسن زاده

    پاسخحذف
  3. پیشنهاد می کنم مشکل خودتان را دقیقتر در گروه معلم دلفی مطرح نمائید. در آ«جا دوستان برنامه نویس زیادی هستندکه می توانند در این زمینه به شما کمک نمایند.
    در مورد مشکلی که نوشته بودید می تواند ناشی از درست ذخیره نشدن صفخات باشد.
    من با کمک این سورس که در مورد ذخیره کردن صفحه وب نوشته ام در تمام برنامه هایم امکان ذخیره صفحات وب را داشته ام.

    پاسخحذف