B4X Requires Chilkat v11.4.0+

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. B4X

Dim success As Boolean = False

'  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.
Dim bdImageData As ChilkatBinData
bdImageData.Initialize
success = bdImageData.LoadFile("qa_data/jpg/kid_blue_coat.jpg")
If success = False Then
    Log(bdImageData.LastErrorText)
    Return
End If


Dim ai As ChilkatAi
ai.Initialize("ai")

ai.Provider = "openai"

'  Use your provider's API key.
ai.ApiKey = "MY_API_KEY"

'  Choose a model.
ai.Model = "gpt-5.6-terra"

Dim askParams As ChilkatJsonObject
askParams.Initialize
askParams.UpdateString("image.output_format", "jpeg")
ai.SetAskParams(askParams)

ai.InputAddImageData(bdImageData, "")
ai.InputAddText("Modify the image by replacing the blue coat with a Metallica T-shirt.")

'  Give the AI some time (2 minutes).
ai.IdleTimeoutMs = 120000

'  Ask the AI for image output.
success = ai.Ask("image")
If success = False Then
    Log(ai.LastErrorText)
    Return
End If


'  Get the image response data.;
success = ai.GetOutputBd(bdImageData)
If success = False Then
    Log(ai.LastErrorText)
    Return
End If


bdImageData.WriteFile("c:/aaworkarea/out.jpg")

Log("Success.")

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

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