(DataFlex) Multimodal Input: File Data

See more AI Examples

Note: At the time of writing this example, xAI, Perplexity, and DeepSeek do not have the ability to accept non-image multimodal data or URLs.

Note: This example requires Chilkat v11.2.0 or greater.

Chilkat ActiveX Downloads ActiveX for 32-bit and 64-bit Windows

Use ChilkatAx-win32.pkg

Procedure Test
    Boolean iSuccess
    Handle hoAi
    Variant vBd
    Handle hoBd
    Variant vSbResponse
    Handle hoSbResponse
    String sTemp1

    Move False To iSuccess

    // This example assumes the Chilkat API to have been previously unlocked.
    // See Global Unlock Sample for sample code.

    Get Create (RefClass(cComChilkatAi)) To hoAi
    If (Not(IsComObjectCreated(hoAi))) Begin
        Send CreateComObject of hoAi
    End

    // The provider can be "openai", "google", or "claude".
    // At the time of writing this example, "deepseek", "xai", and "perplexity" do not have the ability to process non-image multimodal inputs.
    // Support for additional providers will be added in future versions of Chilkat.
    Set ComProvider Of hoAi To "claude"

    // Use your provider's API key.
    Set ComApiKey Of hoAi To "MY_API_KEY"

    // Choose a model.
    Set ComModel Of hoAi To "claude-opus-4-1-20250805"

    // Add both text input, and PDF file data.
    Get ComInputAddText Of hoAi "What is in this file?" To iSuccess

    Get Create (RefClass(cComChilkatBinData)) To hoBd
    If (Not(IsComObjectCreated(hoBd))) Begin
        Send CreateComObject of hoBd
    End
    // We're passing a relative local file path here.. (relative the the app's current working directory)
    Get ComLoadFile Of hoBd "qa_data/pdf/shakespeare.pdf" To iSuccess
    If (iSuccess = False) Begin
        Get ComLastErrorText Of hoBd To sTemp1
        Showln sTemp1
        Procedure_Return
    End

    // Provide the filename in the 1st argument.  The file extension is important to indicate the type of file.
    Get pvComObject of hoBd to vBd
    Get ComInputAddFileData Of hoAi "shakespeare.pdf" vBd "" To iSuccess

    // Ask the AI for text output.
    Get ComAsk Of hoAi "text" To iSuccess
    If (iSuccess = False) Begin
        Get ComLastErrorText Of hoAi To sTemp1
        Showln sTemp1
        Procedure_Return
    End

    // Get the text response.
    Get Create (RefClass(cComChilkatStringBuilder)) To hoSbResponse
    If (Not(IsComObjectCreated(hoSbResponse))) Begin
        Send CreateComObject of hoSbResponse
    End
    Get pvComObject of hoSbResponse to vSbResponse
    Get ComGetOutputTextSb Of hoAi vSbResponse To iSuccess
    Get ComGetAsString Of hoSbResponse To sTemp1
    Showln sTemp1

    // -------------------------------------------------------------
    // The response is in markdown format.
    // Also see Markdown to HTML Conversion Examples.
    // -------------------------------------------------------------

    // Sample output:

    // This PDF file contains a famous quote from William Shakespeare's "Romeo and Juliet". The quote appears twice on the page:
    // 
    // "These violent delights have violent ends
    // And in their triumph die, like fire and powder,
    // Which as they kiss consume. The sweetest honey
    // Is loathsome in his own deliciousness
    // And in the taste confounds the appetite.
    // Therefore love moderately; long love doth so;
    // Too swift arrives as tardy as too slow."
    // 
    // The file also includes a portrait image of William Shakespeare. This particular quote is spoken by Friar Lawrence in the play, warning about the dangers of passionate, 
    // immoderate love - suggesting that love that burns too intensely tends to burn out quickly, just as fire and gunpowder consume each other when they meet.


End_Procedure