奇怪的问题，字体控件FontDialog中的数据如何显示和保存？？-CSDN论坛

奇怪的问题，字体控件FontDialog中的数据如何显示和保存？？

C++ Builder > 基础类

收藏回复

[问题点数：99分，结帖人Cbfan]

⋅急---- 求正则表达式转换，高手请进！ ⋅Word 2007 怎样编辑XML文档？ ⋅C# Object的问题，奇怪!好奇!怎么办? - 高手请进！！！ 更多帖子 关注私信空间博客 cbfan 等级 本版专家分：1580 结帖率 100%: if(FontDialog1->Execute())
   {
     Label1->Caption=FontDialog1->Font->Name;

     Label1->Font->Charset=FontDialog1->Font->Charset;
     Label1->Font->Color=FontDialog1->Font->Color;

     Label1->Font->Style=FontDialog1->Font->Style;
   }

   Edit1->Text=Label1->Font->Charset;
   Edit2->Text=Label1->Font->Color;

------------------------------------------------------

执行，我选择了Western编码；绿色字体；

Edit1~2分别显示：1，32768。

我想让它显示：Western;clGreen; 如何实现？？？？？谢谢。

2002-04-08 20:59:30

点赞只看楼主引用举报楼主收起

展开阅读全文

⋅急---- 求正则表达式转换，高手请进！ ⋅Word 2007 怎样编辑XML文档？ ⋅C# Object的问题，奇怪!好奇!怎么办? - 高手请进！！！ 更多帖子 关注私信空间博客 cbfan 等级 本版专家分：1580: 没人会吗？？

我就是想要保存
Label1->Font->Charset;
Label1->Font->Color;

在.ini文件中，

程序启动时，再读取。

我发现，这没有我想象得那么简单~~

2002-04-08 22:27:17

点赞只看TA 引用举报 #1得分 0

⋅急---- 求正则表达式转换，高手请进！ ⋅Word 2007 怎样编辑XML文档？ ⋅C# Object的问题，奇怪!好奇!怎么办? - 高手请进！！！ 更多帖子 关注私信空间博客 cbfan 等级 本版专家分：1580: 因为Label1->Font->Charset;和 Label1->Font->Color;保存的结果都是数字~~
我想让他们保存成字符串，如：Western; clGreen;

2002-04-08 22:36:22

点赞只看TA 引用举报 #2得分 0

⋅招聘项目经理、软件工程师 ⋅关于BS架构系统，防止SQL注入攻击的思路 ⋅好久没来了，发个笑话 更多帖子 关注私信空间博客 windindance 等级 本版专家分：9788 勋章 蓝花 2002年3月 C++ Builder大版内专家分月排行榜第三 2002年3月 Delphi大版内专家分月排行榜第三: 很遗憾
应该没有好的办法
你就把他们保存为数字吧
实际上你就算真的保存为字符串，你也没有办法读取的

如果你真的想保存为字符串
可以自己写一个函数返回（好象很笨哦：）
if (Color == clGreen)
return "clGreen";
else
...

2002-04-08 22:43:39

点赞只看TA 引用举报 #3得分 10

⋅关于POS开发 ⋅各位gg,jj,mm,dd,兄弟想和你们打听个消息. ⋅pcAnywhere使用问题 更多帖子 关注私信空间博客 kingcaiyao 等级 本版专家分：44373 勋章 红花 2002年9月 C++ Builder大版内专家分月排行榜第一 2002年8月 C++ Builder大版内专家分月排行榜第一 2002年4月 C++ Builder大版内专家分月排行榜第一 2002年3月 C++ Builder大版内专家分月排行榜第一 黄花 2002年7月 C++ Builder大版内专家分月排行榜第二 2002年2月 C++ Builder大版内专家分月排行榜第二: 你可以将它们保存字符串，不过你需要定义两个数组，一个是整型数组，一个是字符串数组。整型数组用于列举出所有可能取得的数字值，而字符串数组则用于列举出所有字体名称，字符集名称等。然后将两者对应就可以保存到你的Ini文件中去。

2002-04-09 08:53:19

点赞只看TA 引用举报 #4得分 10

⋅程序在XP下出现同样的任务进程，同时无反应在，如何处理？ ⋅　调试BUG　苦恼的XE7 ⋅先进先出，用SQL求未出货数据 更多帖子 关注私信空间博客 ppower 等级 本版专家分：25708: 其實,你保存個數字到INI中,再從INI中讀這個數字不就成了嗎?
保存字符串的話,讀入時還要再轉換一次的啊.

2002-04-09 10:02:25

点赞只看TA 引用举报 #5得分 10

⋅急---- 求正则表达式转换，高手请进！ ⋅Word 2007 怎样编辑XML文档？ ⋅C# Object的问题，奇怪!好奇!怎么办? - 高手请进！！！ 更多帖子 关注私信空间博客 cbfan 等级 本版专家分：1580: 我试过了，没有成功。能不能具体说说，谢谢~~

2002-04-09 14:26:08

点赞只看TA 引用举报 #6得分 0

⋅新人报道，请多关照 ⋅初识前端模板 ⋅再来一个原创冷笑话吧。 更多帖子 关注私信空间博客 王集鹄 等级 本版专家分：2935 勋章 银牌 2001年12月总版技术专家分月排行榜第二 红花 2002年5月 Delphi大版内专家分月排行榜第一 2002年1月 Delphi大版内专家分月排行榜第一 黄花 2007年11月 .NET技术大版内专家分月排行榜第二 2007年1月 Delphi大版内专家分月排行榜第二 2006年12月 Delphi大版内专家分月排行榜第二 2006年10月 Delphi大版内专家分月排行榜第二 2002年8月 Delphi大版内专家分月排行榜第二 2002年6月 Delphi大版内专家分月排行榜第二 2001年12月 Delphi大版内专家分月排行榜第二 蓝花 2002年4月 Delphi大版内专家分月排行榜第三: //BCB新手请多指教

//---------------------------------------------------------------------------
void __fastcall TForm1::Button1Click(TObject *Sender)
{
  AnsiString vIdent;
  CharsetToIdent(Label1->Font->Charset, vIdent);
  Edit1->Text = Ident;
  Edit2->Text = ColorToString(Label1->Font->Color);
}
//---------------------------------------------------------------------------

2002-04-09 15:01:34

点赞只看TA 引用举报 #7得分 40

⋅关于POS开发 ⋅各位gg,jj,mm,dd,兄弟想和你们打听个消息. ⋅pcAnywhere使用问题 更多帖子 关注私信空间博客 kingcaiyao 等级 本版专家分：44373 勋章 红花 2002年9月 C++ Builder大版内专家分月排行榜第一 2002年8月 C++ Builder大版内专家分月排行榜第一 2002年4月 C++ Builder大版内专家分月排行榜第一 2002年3月 C++ Builder大版内专家分月排行榜第一 黄花 2002年7月 C++ Builder大版内专家分月排行榜第二 2002年2月 C++ Builder大版内专家分月排行榜第二: 这样看看：程序片段
.....

char *sCharset[20]={"ANSI_CHARSET",.....};//具体你可看看TFontCharSet这个数据类型
TFontCharSet FCH;
FCH=Edit1->Font->CharSet;
IniFile->WriteString(keyname,sCharSet[FCH]);
.....
关于将颜色值保存成字符串方法与上类同。

2002-04-09 15:59:52

点赞只看TA 引用举报 #8得分 29

⋅关于POS开发 ⋅各位gg,jj,mm,dd,兄弟想和你们打听个消息. ⋅pcAnywhere使用问题 更多帖子 关注私信空间博客 kingcaiyao 等级 本版专家分：44373 勋章 红花 2002年9月 C++ Builder大版内专家分月排行榜第一 2002年8月 C++ Builder大版内专家分月排行榜第一 2002年4月 C++ Builder大版内专家分月排行榜第一 2002年3月 C++ Builder大版内专家分月排行榜第一 黄花 2002年7月 C++ Builder大版内专家分月排行榜第二 2002年2月 C++ Builder大版内专家分月排行榜第二: TO cbfan:
注意我上面的代码是随后写的，自已要整理一下，因为：
ANSI_CHARSET 0 ANSI characters.
DEFAULT_CHARSET 1 Font is chosen based solely on Name and Size. If the described font is not available on the system, Windows will substitute another font.
SYMBOL_CHARSET 2 Standard symbol set.
MAC_CHARSET 77 Macintosh characters. Not available on NT 3.51.
SHIFTJIS_CHARSET 128 Japanese shift-JIS characters.
HANGEUL_CHARSET 129 Korean characters (Wansung).
JOHAB_CHARSET 130 Korean characters (Johab). Not available on NT 3.51

GB2312_CHARSET 134 Simplified Chinese characters (mainland china).
CHINESEBIG5_CHARSET 136 Traditional Chinese characters (Taiwanese).
GREEK_CHARSET 161 Greek characters. Not available on NT 3.51.
TURKISH_CHARSET 162 Turkish characters. Not available on NT 3.51
VIETNAMESE_CHARSET 163 Vietnamese characters. Not available on NT 3.51.
HEBREW_CHARSET 177 Hebrew characters. Not available on NT 3.51
ARABIC_CHARSET 178 Arabic characters. Not available on NT 3.51

BALTIC_CHARSET 186 Baltic characters. Not available on NT 3.51.
RUSSIAN_CHARSET 204 Cyrillic characters. Not available on NT 3.51.
THAI_CHARSET 222 Thai characters. Not available on NT 3.51
EASTEUROPE_CHARSET 238 Includes diacritical marks for eastern european countries. Not available on NT 3.51.
OEM_CHARSET 255 Depends on the codepage of the operating system.
这些数值并不是连续的，所以写的时候要注意处理一下.

2002-04-09 16:13:43

点赞只看TA 引用举报 #9得分 0

⋅关于POS开发 ⋅各位gg,jj,mm,dd,兄弟想和你们打听个消息. ⋅pcAnywhere使用问题 更多帖子 关注私信空间博客 kingcaiyao 等级 本版专家分：44373 勋章 红花 2002年9月 C++ Builder大版内专家分月排行榜第一 2002年8月 C++ Builder大版内专家分月排行榜第一 2002年4月 C++ Builder大版内专家分月排行榜第一 2002年3月 C++ Builder大版内专家分月排行榜第一 黄花 2002年7月 C++ Builder大版内专家分月排行榜第二 2002年2月 C++ Builder大版内专家分月排行榜第二: 如果你嫌麻烦的话，不如这样：
typdef MyCharSet
{
TFontCharSet Fch;
String CharSetName;
}
MyCharSet RFCharSet[19];
然后根据上面的TFontCharSet，对这19个元素赋值：
MyCharSet[i].Fch=ANSI_CHARSET;
MyCharSet[i].CharSetName="ANSI_CHARSET";
.....
....
TFontCharSet ch=Edit->Font->ChartSet;
IniFile->WriteString(KeyName,MyCharSet[ch].CharSetName);
.....
...

2002-04-09 16:17:56

点赞只看TA 引用举报 #10得分 0

1 2

收起

收藏回复

cbfan

等级：

关注私信 TA的帖子

Excel模版表格拆分批量套打 批量打印 拆分工作簿表格拆分: 2、选择设置好打印格式或者想要的其他格式的模版文件； 3、点击左数据源表格的第一行，观察右边的数据列标题对应显示的是所在的列标题。 4、点击右侧模版表格要填写数据的单元格，观察右边模版目标单元格...

妙用Microsoft Excel的宏命令批量打印工作表: Microsoft Excel是很多办公一族的常用工具，其强大的功能几乎能满足所有有数据处理方面的要求。而其自带的宏命令更是能简化一些数据处理中重复性的工作。一次笔者要把一批资料的纸张大小由B4纸调整为A4纸，并在打印...

Office批量打印助手(Excel 批量打印、Word 批量打印): 本程序能批量打印 Word 文件、Excel 工作簿。使用程序前请先安装 .NET Framework 4.0 或 .NET Framework 4.0 Client Profile 如果觉得程序好用，请打赏作者。我为人人，人人为我。在主界面的“其他”--&g...

条码软件批量打印标签连接Excel方式: Excel表格文件保存数据方便，很多用户使用它存放复杂的表单数据，比如仓储进销存、固定资产的盘点管理等，Excel单元格不仅可以实现单列统计、也可以实现多列的合并，学习和掌握起来也比较简单。如何将数据一行行...

Word、Excel组合批量打印信封(转): Word、Excel组合批量打印信封(转)　很多学校期末都都要给学生寄成绩通知单，教务处需要打印大量的信封。利用Word XP与Excel XP可以协作来批量打印信封，一起来看看吧。 1、准备阶段 (1)新建一Exce...

报表如何批量导出成 excel 文件: excel 文件，但是在实际使用中通常会要求报表不需要展现，直接通过一些操作将报表导出成 excel 文件，并且往往会要求批量导出成 excel 文件，下面通过几个示例介绍下报表不展现，如何批量生成 excel 文件。...

批量打印多个工作簿中指定工作表: 对指定文件夹下所有工作簿中指定工作表进行打印

按文件名数值排序批量打印Excel文件: 刚开始没仔细想这个问题，无非就是排个序嘛，网上随便找了一段实现批量打印Excel文件的VBA代码改一下，先创建一个数组，储存当前目录下的所有Excel文件名，排序再逐个打印。把写好的宏文件扔过去要他试用，才...

python自动化办公（第9课）批量调整Excel中字体、样式: python自动化办公（第9课）批量调整Excel中字体、样式 - 修改字体样式 Font(name=“字体名”,size=字体大小,bold=是否加粗,italic=是否斜体,color=字体颜色) from openpyxl.styles import Font from openpyxl ...

python -- 将Excel文件内容批量插入mysql数据库: #读取Excel文件内容批量插入数据库 import random from pymysql import connect import xlrd # 打开xls文件 data = xlrd.open_workbook('文件') # 打开第一张表 table = data.sheets()[1] # 获取表的行数 nrows = ...

利用Python读取和修改Excel文件（包括xls文件和xlsx文件）——基于xlrd、xlwt和openpyxl模块: 本文介绍一下使用Python对Excel文件的基本操作，包括使用xlrd模块读取excel文件，使用xlwt模块将数据写入excel文件，使用openpyxl模块读取写入和修改excel文件。目录 1、使用xlrd模块对xls文件进行读操作 1.1...

Excel百宝箱: 【创建多版本打开方式】:如果安装了多个版本的Office，本工具可助您任意选择Excel文件的打开方式。通过文件右键的“发送到”菜单执行【生成2003样式菜单】:Excel 2007或者Excel 2010专用，可以产生2003样式的菜单来...

【复制同名文件】使用Python复制多个文件夹的同名文件到一个文件夹: 场景：爬虫得到的数据出现多个文件名相同，需要统一再次重命名。复制多个文件夹的同名文件到一个文件夹 #编码类型 #-*- coding: UTF-8 -*- #导入包 import os import shutil srcpath='./download_images/' ...

巧用EXCEL批量修改文件名(转): 平时经常会遇到为大批文件统一重新命名的问题，现将本人在实践中总结的一套“巧用Excel批量修改文件名”的方法介绍给大家。为了方便说明问题，我们用一个简单的实例来介绍如何巧用Excel批量修改文件名。例如...

mvc4 强大的导出和不需要上传文件的批量导入EXCEL--SNF快速开发平台3.1: 数据的导入导出，在很多系统里面都比较常见，这个导入导出的操作，在Winform里面比较容易实现，但在Web上我们应该如何实现呢？本文主要介绍利用MVC4+EasyUI的特点，并结合文件上传控件，实现文件不需要上传到服务器...

如何使用Excel表格导入数据批量开票: 写这遍文章的目的是方便以后个人使用，做个笔记记录。首先我来说一下它是做什么用的，它的主要作用是把用户的开票数据，Excel数据、ERP 系统导入到税控盘开票软件中。解决企业开票明细多、开票数据量大、...

《Excel实战技巧精粹》示例文件光盘文件: │ │ 技巧289 快速统一多个图表大小.xls │ │ 技巧290 使条形图分类轴的标签与源数据列显示顺序一致.xls │ │ 技巧291 自定义图表.xls │ │ 技巧292 图表公式SERIES的使用技巧.xls │ │ 技巧293 在图表中...

推荐 Word、EXCEL必备工具箱: EXCEL必备工具箱是一个同时支持EXCEL/WPS插件，自带免费多标签（类似于OfficeTab），安装后就可以使用，与excel/wps完全溶为一体，绝大部分操作执行后可撤销。完美支持32位/64位OFFICE，以及2014年11月抢先版及更高...

文件批量上传-统一附件管理器-在线预览文件(有互联网和没有两种)--SNF快速开发平台3.0...: 批量文件上传，并对每个文件大小限制，客户端无刷新可以对已经上传的附件进行名字变更，改成更友好的名称。可以对已经上传的文件进行删除。并记录文件大小，上传人、时间和修改人和时间等。可以下载附件到...

个人永久性免费-Excel催化剂功能第97波-快递单号批量查询物流信息: 电商时代，快递已进千万家，做电商零售行业的，快递信息的再挖掘，也显得更有意义，是数据精细化运营中必不可少的一环。一般站在系统的角度，数据用于业务流转的增删改查使用，而...今天Excel催化剂送上快递单号批...

vue-xlsx-table实现批量导入表格，将数据提取后传给后台保存: 1、npm install vue-xlsx-table --save 2、在main.js中 import vueXlsxTable from 'vue-xlsx-table'; Vue.use(vueXlsxTable, {rABS: false}); 3、在页面中 <vue-xlsx-table @on-select-file="selectExcel" style...

ETC电子发票台账工(生成Excel报表): ETC电子发票台账电子发票介绍工具特点：使用方法：ETC电子发票批量打印功能电子发票介绍什么是电子发票？为什么国家要大力推进电子发票的应用？电子发票是信息时代的产物，同普通发票一样，采用税务局统一发放的...

这个工具能替代Excel，可惜90%的人都没用过！: 日常工作中，涉及到数据的表格、计算、图表和分析，大家首选的一定是Excel。但我也看到不少知友困惑于Excel的深入学习难度，鸡肋的大数据处理效率。比如某同事为处理七八个维度，近万条数据奔溃不已；又有人几十...

Excel百宝箱8.0: 【工作表折分】：将当前工作表的数据按条件拆分成多个工作表，可以用任意列的数据做为拆分条件【合并工作簿】：将指文件夹中所有工作簿中所有工作表数据合并起来。有两种合并方式：将每个工作簿中的工作表合到当前...

Excel百宝箱9.0无限制破解版: 【创建多版本打开方式】:如果安装了多个版本的Office，本工具可助您任意选择Excel文件的打开方式。通过文件右键的“发送到”菜单执行【生成2003样式菜单】:Excel 2007或者Excel 2010专用，可以产生2003样式的菜单来...

在VBA编程中巧用EXCEL模板生成样式可变报表: Excel是微软公司Microsoft office办公软件的组件之一，它具有强大的制表功能且界面友好，可方便灵活地手工制作各式各样的柜签报表。也可使用Excel内置的系统开发工具VBA(Visual Basic for Application)对E...

Excel新增工具集: 3、多个工作表中相同位置的行(列)集中到同一表：本工作簿中有若干格式相同的表，为了便于观察各表相同位置数据的变化，可以首先用鼠标选定要观察的区域，然后执行本命令，则各工作表的同位置区域数据集中排列到同一...

Python批量命名某目录下的所有图片名字: Python批量命名某目录下的所有图片名字1. 需求2. Python解决需求2.1 文件遍历的方法2.2 文件重命名2.3 需求分析2.4 Python代码实现2.5 程序的扩展3. 参考文献 1. 需求在实验过程中，我们会拍摄很多照片，这时就会...

Excel百宝箱9.0无限制破解版.rar: 【创建多版本打开方式】:如果安装了多个版本的Office，本工具可助您任意选择Excel文件的打开方式。通过文件右键的“发送到”菜单执行【生成2003样式菜单】:Excel 2007或者Excel 2010专用，可以产生2003样式的菜单...

统一收款收据软件 v2014.02.27.zip: 统一收款收据打印软件适用于windows全系列平台，税务局2013年取消统一收款收据打印软件后，该软件一经推出，以其界面简洁、灵活的操作方式、可自定义强，可以套打已经印刷好的票据，也可以直接打印整个格式在白纸上...

相关热词 c# 时间排序 c# 必备书籍 c#异步网络通信 c#泛型约束类和结构 c#检测键盘输入堆排序c# c# 标注对象字段后 c# 抓包修改 c#窗体模版 c#让线程重启