Skip to content

Commit 1798229

Browse files
committed
Merge branch 'develop'
2 parents 0e4c5ab + 9a7c461 commit 1798229

File tree

2 files changed

+8
-0
lines changed

2 files changed

+8
-0
lines changed

Src/Chat/DelphiAIDev.Chat.View.pas

Lines changed: 4 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -241,6 +241,10 @@ procedure TDelphiAIDevChatView.ConfScreenOnCreate;
241241
ShapeCommands.Top := 0;
242242
ShapeCommands.Width := ShapeCommands.Parent.Width;
243243
ShapeCommands.Height := ShapeCommands.Parent.Height;
244+
245+
{$IF CompilerVersion >= 34} //Sydney
246+
pnWaitCaption.StyleElements := pnWaitCaption.StyleElements - [seFont];
247+
{$ENDIF}
244248
end;
245249

246250
procedure TDelphiAIDevChatView.ConfScreenOnShow;

Src/DB/Chat/DelphiAIDev.DB.Chat.View.pas

Lines changed: 4 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -305,6 +305,10 @@ procedure TDelphiAIDevDBChatView.ConfScreenOnCreate;
305305
ShapeCommands.Top := 0;
306306
ShapeCommands.Width := ShapeCommands.Parent.Width;
307307
ShapeCommands.Height := ShapeCommands.Parent.Height;
308+
309+
{$IF CompilerVersion >= 34} //Sydney
310+
pnWaitCaption.StyleElements := pnWaitCaption.StyleElements - [seFont];
311+
{$ENDIF}
308312
end;
309313

310314
procedure TDelphiAIDevDBChatView.ConfScreenOnShow;

0 commit comments

Comments
 (0)