diff --git a/Forms/UChatGPTQFrame.pas b/Forms/UChatGPTQFrame.pas index 6df0560..02ab703 100644 --- a/Forms/UChatGPTQFrame.pas +++ b/Forms/UChatGPTQFrame.pas @@ -218,7 +218,8 @@ procedure TFram_Question.Btn_AskClick(Sender: TObject); begin if IslegacyModel then begin - ShowMessage('You are trying to use model"' + '+' + TSingletonSettingObj.Instance.Model + '" which is deprecated') + ShowMessage('You are trying to use the model"' + TSingletonSettingObj.Instance.Model + '" which is deprecated, you can change the Model in setting form.'); + Exit; end; if mmoQuestion.Lines.Text.Trim.IsEmpty then