delphi 土耳其大写字母和不出现在可编辑的TCombobox字段中,如何强制所有表单元素使用TURKISH_CHARSET

olqngx59  于 2022-11-23  发布在  其他
关注(0)|答案(1)|浏览(178)

bounty已结束。回答此问题可获得+50声望奖励。奖励宽限期将在14小时后结束。Tom希望吸引更多人关注此问题。

一些大写的土耳其字母,如和,在TComboBox编辑区域或TSpeedButton(标题)上使用时,显示不好。例如,显示为带点的Y。土耳其小写字母显示良好。
在具有Default ANSI_CHARSET的TLabel上使用时,所有这些都显示为OK。所有组件的字体都相同,Verdana。用户在控制面板中将非Unicode应用程序区域设置为土耳其语。
当COMBOBOX.font.Charset设置为TURKISH_CHARSET时,这些大写字母开始正常工作;
是否有代码解决方案将所有形式的应用程序中使用的所有元素更改为默认使用TURKISH_CHARSET?
像这样循环每个窗体的每个Control;

if AControl is TWinControl then begin
     TwinControl(AControl).font.Charset :=TURKISH_CHARSET;
     end;

此代码的问题是TWinControl没有.FONT属性。

z9zf31ra

z9zf31ra1#

解决方案是在所有.DFM文件中将ANSI_CHARSET替换为DEFAULT_CHARSET

相关问题