PRB: Visual FoxPro Mac Cannot Understand Apple Object Types

• Microsoft Visual FoxPro for Macintosh, version 3.0b

SYMPTOMS

Microsoft Visual FoxPro for Power Macintosh does not support the Apple Object Model. Apple Objects such as "paragraph" , "word", "range", etc., cannot be passed directly or indirectly to Visual FoxPro for Power Macintosh.

WORKAROUND

You can cast or change the object, or a property of the object, into a simple data type that Visual FoxPro understands.

STATUS

This behavior is by design.

MORE INFORMATION

The following examples illustrate the problem and the workaround:

Enter the script:

   -- Save this script as "Excel2VFP"
   tell application "Microsoft Excel"
      Activate
      set Range "R1C1" to "Data to go to Visual FoxPro"
      get Range "R1C1"
      --get Value of Range "R1C1"
      set myVar to the result
   end tell

   tell application "Microsoft Visual FoxPro"
      Activate
      Do Script "SET DEFAULT TO HOME()"
      Do Script "DO TEST WITH '"& myVar &"'"
   end tell

   * Save this program as "Test" in the Visual FoxPro folder
   PARAMETER MyVar

   LenMyVar = LEN(MyVar)
   =MessageBox("The length of the data from Excel is ";
    +LEFT(STR(LenMyVar)))

   Can't make {...} into a string

Save the script, run it, and note that the process works properly because Visual FoxPro understands the "Value of" simple string type that is passed.

Following is another example of an attempt to pass data to Visual FoxPro. This example also fails initially, but returns a different error message.

Enter the script:

   -- Save this script as "STE2VFP"
   tell application "Scriptable Text Editor"
      activate
      open file "Macintosh HD:TestText"
      get contents of document 1
      -- get contents of document 1 as string
      set myVar to the result
      quit
   end tell

   tell application "Microsoft Visual FoxPro"
      Activate
      Do Script "SET DEFAULT TO HOME()"
      Do Script "DO TEST2 WITH '"& myVar &"'"
   end tell

   * Save this program as "Test2" in the Visual FoxPro folder
   PARAMETER MyVar

   LenMyVar = LEN(MyVar)
   =MessageBox("The length of the data from Scriptable Text Editor is ";
    +LEFT(STR(LenMyVar)))

    This is a test of VFP and AppleScript.

   Microsoft Visual FoxPro got an error: "do test2 with 'This is a test
   of VFP and AppleScript.' doesn't understand the Do Script message.

NOTE: You cannot pass a string longer than 255 characters to Visual FoxPro in this manner. If you attempt to pass a longer string, Visual FoxPro appears to hang on the Do Script command used to pass the variable to Visual FoxPro. To pass strings longer than 255 characters, use an ASCII text file that Visual FoxPro can append into a memo field or that can be read using low-level file I/O.