SQL Server

AI Modify Existing Image with Text Prompt

See more AI Examples

Uses an AI text prompt and uploaded image data to modify an existing image and receive the modified output. SQL Server

-- Important: See this note about string length limitations for strings returned by sp_OAMethod calls.
--
CREATE PROCEDURE ChilkatSample
AS
BEGIN
    DECLARE @hr int
    -- Important: Do not use nvarchar(max).  See the warning about using nvarchar(max).
    DECLARE @sTmp0 nvarchar(4000)
    DECLARE @success int
    SELECT @success = 0

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

    -- Load the data from an existing image.
    DECLARE @bdImageData int
    EXEC @hr = sp_OACreate 'Chilkat.BinData', @bdImageData OUT
    IF @hr <> 0
    BEGIN
        PRINT 'Failed to create ActiveX component'
        RETURN
    END

    EXEC sp_OAMethod @bdImageData, 'LoadFile', @success OUT, 'qa_data/jpg/kid_blue_coat.jpg'
    IF @success = 0
      BEGIN
        EXEC sp_OAGetProperty @bdImageData, 'LastErrorText', @sTmp0 OUT
        PRINT @sTmp0
        EXEC @hr = sp_OADestroy @bdImageData
        RETURN
      END

    DECLARE @ai int
    EXEC @hr = sp_OACreate 'Chilkat.Ai', @ai OUT

    EXEC sp_OASetProperty @ai, 'Provider', 'openai'

    -- Use your provider's API key.
    EXEC sp_OASetProperty @ai, 'ApiKey', 'MY_API_KEY'

    -- Choose a model.
    EXEC sp_OASetProperty @ai, 'Model', 'gpt-5'

    DECLARE @askParams int
    EXEC @hr = sp_OACreate 'Chilkat.JsonObject', @askParams OUT

    EXEC sp_OAMethod @askParams, 'UpdateString', @success OUT, 'image.output_format', 'jpeg'
    EXEC sp_OAMethod @ai, 'SetAskParams', @success OUT, @askParams

    EXEC sp_OAMethod @ai, 'InputAddImageData', @success OUT, @bdImageData, ''
    EXEC sp_OAMethod @ai, 'InputAddText', @success OUT, 'Modify the image by replacing the blue coat with a Metallica T-shirt.'

    -- Give the AI some time (2 minutes).
    EXEC sp_OASetProperty @ai, 'IdleTimeoutMs', 120000

    -- Ask the AI for image output.
    EXEC sp_OAMethod @ai, 'Ask', @success OUT, 'image'
    IF @success = 0
      BEGIN
        EXEC sp_OAGetProperty @ai, 'LastErrorText', @sTmp0 OUT
        PRINT @sTmp0
        EXEC @hr = sp_OADestroy @bdImageData
        EXEC @hr = sp_OADestroy @ai
        EXEC @hr = sp_OADestroy @askParams
        RETURN
      END

    -- Get the image response data.;
    EXEC sp_OAMethod @ai, 'GetOutputBd', @success OUT, @bdImageData
    IF @success = 0
      BEGIN
        EXEC sp_OAGetProperty @ai, 'LastErrorText', @sTmp0 OUT
        PRINT @sTmp0
        EXEC @hr = sp_OADestroy @bdImageData
        EXEC @hr = sp_OADestroy @ai
        EXEC @hr = sp_OADestroy @askParams
        RETURN
      END

    EXEC sp_OAMethod @bdImageData, 'WriteFile', @success OUT, 'c:/aaworkarea/out.jpg'


    PRINT 'Success.'

    -- -------------------------------
    -- Sample Input:
    -- -------------------------------
    -- 

    -- -------------------------------
    -- Sample Output:
    -- -------------------------------
    -- 

    EXEC @hr = sp_OADestroy @bdImageData
    EXEC @hr = sp_OADestroy @ai
    EXEC @hr = sp_OADestroy @askParams


END
GO