الانتقال إلى المحتوى

OLE ربط وتضمين الكائنات


sam_t

Recommended Posts

السلام عليكم
ربط وتضمين الكائنات ... ياله من عنوان رنان

فيما يلي مثال عن بناء كائن "ورد" وفتح وثيقة جديدة وكتابة "Hello Word97" بداخلها ثم فتح نافذة حفظ باسم لتخزينها.


DECLARE
-- Declare the OLE objects
MyApplication OLE2.OBJ_TYPE;
MyDocuments   OLE2.OBJ_TYPE;
MyDocument    OLE2.OBJ_TYPE;
MySelection   OLE2.OBJ_TYPE;

-- Declare handle to the OLE argument list
args OLE2.LIST_TYPE;

BEGIN -- Create the Word.Application object and make Word visible
-- by setting the 'Visible' property to true
MyApplication := OLE2.CREATE_OBJ('Word.Application'); 
OLE2.SET_PROPERTY(MyApplication, 'Visible', 1);

-- get a handle on Documents collection
MyDocuments:= OLE2.GET_OBJ_PROPERTY(MyApplication, 'Documents');

-- Add a new document to the Documents collection
Mydocument := OLE2.INVOKE_OBJ(MyDocuments, 'Add');

-- Get a handle on Selection object
MySelection:=OLE2.GET_OBJ_PROPERTY(MyApplication, 'Selection');

-- Insert the text 'Hello Word97!' into word document
OLE2.SET_PROPERTY(MySelection, 'Text', 'Hello Word97!');

-- Save the document to the filesystem as EXAMPLE.DOC
args := OLE2.CREATE_ARGLIST;
OLE2.ADD_ARG(args, 'C:\DOCS\EXAMPLE.DOC');
OLE2.INVOKE(MyDocument, 'SaveAs', args);
OLE2.DESTROY_ARGLIST(args);

-- Close the document
OLE2.INVOKE(MyDocument, 'Close'); 

-- Release the OLE objects
OLE2.RELEASE_OBJ(MySelection);
OLE2.RELEASE_OBJ(MyDocument);
OLE2.RELEASE_OBJ(MyDocuments);
OLE2.RELEASE_OBJ(MyApplication);
END;




عند وضع الكود السابق على زر في فورم يعمل بشكل جيد.

الآن من يقول لي من أين يمكن الحصول على الباراميترات التي تم تمريرها لبرنامج الورد -- أو الكائن ورد -- والتي مثالها هنا
Visible من أين جاءت ؟؟؟
Documents من أين جاءت ؟؟؟ هل هناك ملف help يعطيني هذه الباراميترات
وكذلك Add و Selection و Text و SaveAs و close
جميعها موجودة في المثال السابق ولكن كيف تمت معرفتها ؟؟؟؟؟؟؟؟؟
كيف يمكنني استخدام باراميترات غيرها.
ولنفترض أنني أريد استخدام الباراميتر الذي يقوم بتغيير حجم الخط إلى 24 فكيف يمكنني أن أجد اسم هذا الباراميتر لعمل ذلك
أرجو من لذيه فكرة عن ذلك أو ملفات مساعدة عن microsoft word ole أو غيره المساعدة لفقر المواضيع المتعلقة بهذا الموضوع عن شرح لها.
مع الشكر الجزيل مقدماً
والسلام

رابط هذا التعليق
شارك

السلام عليكم
أخي العزيز mody شكرا جدا لك على مشاركتك الفعالة.

ولكن ألا يوجد شيء يساعد على التعامل مع الـ ole
حسنا، والأن ماذا لو كنت اريد التعامل مع ملف flash أو photoshop كيف يمكنني عمل ذلك لأن alt + f11 لا تعرض visual basic editor
نرجو من الجميع المشاركة

رابط هذا التعليق
شارك

  • بعد 2 سنة...
  • بعد 1 سنة...

انضم إلى المناقشة

يمكنك المشاركة الآن والتسجيل لاحقاً. إذا كان لديك حساب, سجل دخولك الآن لتقوم بالمشاركة من خلال حسابك.

زائر
أضف رد على هذا الموضوع...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   تمت استعادة المحتوى السابق الخاص بك.   مسح المحرر

×   You cannot paste images directly. Upload or insert images from URL.

جاري التحميل
×
×
  • أضف...

برجاء الإنتباه

بإستخدامك للموقع فأنت تتعهد بالموافقة على هذه البنود: سياسة الخصوصية