كيف أنقل محتوى Quickreport إلى ملف Excel ؟

Uses QRExport;
//...
procedure TForm1.btnXLSClick(Sender: TObject);
Var expFilt : TQRExcelFilter;
begin
  expFilt := TQRExcelFilter.create( 'D:\TEMP\QR\essai.xls' );
  Try
	FenTest2.QuickRep1.ExportToFilter( expFilt );
  Finally
	expFilt.free;
  End;
end;

هذا الكود يسمح لك بانشاء ملف XLS

بسم الله الرحمن الرحيم

اظن ان qreport 4 به مكون جاهز لهذا الغرض وما عليك الا ان تحفظ ملف ال qreport بصيغة xls واظن ان هذا الاصدار من qreport قد قدمته انت يا بلال لك جزيل الشكر

مشكور أخ بلال على المساعدة.............

ولكن الدلفي يعطيني Error عند هذا السطر:

expFilt := TQRExcelFilter.create( 'D:\TEMP\QR\essai.xls' );

ممكن أعرف السبب...............

expFilt := TQRExcelFilter.create( 'D:\TEMP\QR\essai.xls' );

هذا مسار افتراضي لست مجبرا بالعمل به غيره فقط اجعله مثلا :

C:\essai.xls

السلام عليكم و رحمة الله و بركاته

عندما وضعت هذا السطر

expFilt := TQRExcelFilter.create( 'D:\TEMP\QR\essai.xls' );

نتج خطأ

Incompatible types:'TComponent' and 'String'

و شكرا.