![]() |
Chilkat HOME Android™ AutoIt C C# C++ Chilkat2-Python CkPython Classic ASP DataFlex Delphi DLL Go Java JavaScript Node.js Objective-C PHP Extension Perl PowerBuilder PowerShell PureBasic Ruby SQL Server Swift Tcl Unicode C Unicode C++ VB.NET VBScript Visual Basic 6.0 Visual FoxPro Xojo Plugin
(Xojo Plugin) Simple AI Image GenerationSee more AI ExamplesCreate an image by providing a text description.Note: This example requires Chilkat v11.4.0 or greater.
Dim success As Boolean success = False // This example assumes the Chilkat API to have been previously unlocked. // See Global Unlock Sample for sample code. Dim ai As New Chilkat.Ai ai.Provider = "openai" // Use your provider's API key. ai.ApiKey = "MY_API_KEY" // Choose a model. ai.Model = "gpt-5" Dim askParams As New Chilkat.JsonObject success = askParams.UpdateString("image.output_format","jpeg") success = askParams.UpdateString("image.size","1024x1024") success = askParams.UpdateString("image.quality","low") success = ai.SetAskParams(askParams) success = ai.InputAddText("Generate a small, cute illustration of a gray tabby cat hugging a happy otter wearing an orange scarf") // Ask the AI for image output. success = ai.Ask("image") If (success = False) Then System.DebugLog(ai.LastErrorText) Return End If // Get the image response data. Dim bdImageData As New Chilkat.BinData success = ai.GetOutputBd(bdImageData) If (success = False) Then System.DebugLog(ai.LastErrorText) Return End If success = bdImageData.WriteFile("c:/aaworkarea/out.jpg") System.DebugLog("Success.") |
||||
© 2000-2026 Chilkat Software, Inc. All Rights Reserved.