论文部分内容阅读
摘 要： 为了减少业务人员工作量，更好的与电视台衔接，烟台市气象局开发人员根据业务需要和提高工作效率的要求及时研发了气象影视业务平台，该平台采用经典的 Delphi 7开发，可以一键式提供天气实况、天气预警、未来三天天气预报和24小时分区县天气预报，周一提供周天气预报，并自动通过邮箱发送，目前平台已投入业务运行。
关键词： 气象影视;一键式;邮件发送
中图分类号： TP391. 41 文献标识码： A DOI：10.3969/j.issn.1003-6970.2020.06.017
本文著录格式：潘旭光，黄本峰，武强，等. 气象影视业务平台设计与实现[J]. 软件，2020，41（06）：7779
【Abstract】： In order to reduce the workload of business personnel and better connect with the TV station， the developers of Yantai Meteorological Bureau developed the meteorological film and television business platform in time according to the business needs and the requirements of improving work efficiency. The platform adopts the classic Delphi 7 development， which can provide weather conditions， weather early warning， weather forecast for the next three days and 24-hour weather forecast for districts and counties with one key. Weekly weather forecast is provided on Monday and sent automatically through email. At present， the platform has been put into operation.
【Key words】： Meteorological film and television; One click; Email
0 引言
電视天气预报节目一直都是电视台收视率较高的栏目。近年来，随着新媒体技术的迅猛发展，有人开发了气象影视数字化媒体资源管理平台并思考节目的创新与发展[1-10]，烟台传统电视天气预报也收到了冲击，为了烟台电视天气预报在激烈的竞争中更好的发展和生存，借助烟台广播电视台在全省率先实现全频道高清播出的契机，自2019年开始，烟台市气象局改变服务方式，由之前的制作、录制节目，改为提供气象信息资料，以保证高清版电视天气预报节目正常播出。
为了减少业务人员工作量，更好的与电视台衔接，烟台市气象局开发人员根据业务需要和提高工作效率的要求及时研发了气象影视业务平台，该平台可以提供天气实况、天气预警、未来三天天气预报和24小时分区县天气预报，周一提供周天气预报，目前平台已投入业务运行。
1 系统设计
烟台气象影视业务平台采用经典的 Delphi 7开发。Delphi 7具有功能强大的可视化开发设计环境和编译速度快的优点。平台分模块化操作，平台主要分提取气象台文本、提取分县预报、分县转换、提取周报、一键发送、历史查询和软件设置等7个模块。
1.1 提取气象台文本
气象台文本由后台本文提供，包括预警信号、未来三天天气预报及其全市主要图标文字信息。前两项内容一键式提取到平台的编辑框中，在提取前，平台先自动判断文本是否存在，若不存在给出提示，另外，在提取时自动过滤掉预报员姓名、森林火险气象等级和一氧化碳中毒潜势预报等无关信息。最后，气象台文本下面会自动给出未来三天主要图标文字信息编辑模板，值班员手工输入主要天况和气温预报。
1.2 提取分县预报
分县预报由后台文本提供，内容包括各分区县的天况、风向、风力和气温预报。所有内容都是一键式提取到平台的编辑框中，在提取前，先进行格式转换，如把全角标点符号转换为半角格式。平台按照电视台需要的顺序提取各县市区的预报内容。
1.3 分县转换
把分县预报按照转换策略转换成电视台需要的格式内容，主要是从天况中自动挑取两个两个主要的，分县预报内容由天况、风向、风力、气温和特殊项5项组成，第5项特殊项一般是指霜冻、雾和冰雹等灾害性天气，例如分县预报内容是“多云转阴，北到西北风，5-6级转3-4级，0-5℃，有霜冻”，转换后提取的天况就是“霜冻”和“阴”，天况转换流程图如图1。点击分县转换后平台显示中间转换结果，若检查没问题可以点击转换按钮转换为电视台需要的格式内容，若有问题可以修改后台转换策略重新转换。最后转换结果如图3所示。
1.4 提取周报
周报内容每周一更新，包括全市一周天气展望和每天具体天气预报和森林火险预报等。所有内容都是一键式提取后台word文本中的内容到前台文本编辑框中。
1.5 一键发送
在提取气象信息资料后，会自动加上邮件的标题，当点击发送按键后，气象信息资料就会通过公用邮箱自动群发给电视台编辑的个人邮箱，平台会弹出提示框，显示各邮箱的发送情况，并且下发的状态栏会给出最终的发送结果并记录日志文件，日志内容主要包括连接邮件服务器及发送邮件情况。若发送的是气象台文本，平台会先自动判断图标文字信息编辑模板有无空项，若有会弹出警示框，防止有遗漏项。 1.6 历史查询
点击历史查询，平台会定位到存放的历史发送气象信息资料的文件夹下，平台一天建立一个文件夹，以日期命名，每个文件夹里以记事本方式存放着气象台文本、分县预报、分县转换结果、周报和日志文件。
1.7 软件设置
点击软件设置，可设置被联系人的姓名、电话和邮箱地址，不同的被联系人对应内容用分号相隔;可设置发送邮件的服务器、用户名和密码;还可设置周报、气象台文本、分县预报和历史发送气象信息资料的文件路径，可直接输入，也可通过每项右边的浏览按钮选择输入。
2 主要技术方法
2.1 读取WORD文档内容
使用Delphi的CreateOleObject方法对WORD文档操作具有优势，与delphi所提供的那些控件方式的访问相比较，CreateOleObject方法距离WORD核心的操作更近，因为它直接使用OFFICE所提供的VBA语言对WORD文档的操作进行编程。主要代码如下：
ole1：=CreateOleObject（'word.Application'）; //创建WORD对象
ole1.documents.open（zb_Text）; //打开指定WORD文档
ole1.activedocument.SaveAs（'c：＼tmp.txt'，2）; //将WORD文档存入临时文本文件
2.2 文字处理
使用delphi的正则TPerlRegEx，替换字符串中指定的内容实现对分县文字内容的转换。主要代码如下：
reg：TPerlRegEx; //定义正则变量
reg.Subject：=p; //要处理的数据源
reg.RegEx：=s1; //被替换的正则式s1
reg.Replacement：=s2; //要替换成s2
reg.ReplaceAll; //执行替换
2.3 郵件发送
delphi 7发送个邮件用到TIdSMTP与Tid?Mes?sage这两个组件，他们分别在Indy Clients和Indy Misc两个面板组件页内。
首先配置TIdSMTP和TIdMessage的相关属性，再对TIdSMTP进行编程：
with msg do
begin
Recipients.Clear;
Recipients.Add.Address：=MailTo.Text; //配置发送地址
Subject：=MailTitle.Text; //配置主题
SetBody（MailContent.Lines）; //配置内容
From.Address：='yangshiqiang@163.com';
end;
SMTP.Connect（）; //SMTP的连接
SMTP.Authenticate; //SMTP的相关认证
SMTP.Send（msg）; //SMTP的发送邮件
SMTP.Disconnect; //SMTP断开连接
3 平台运行情况
平台实现了以下功能：一键式提取天气实况、天气预警、未来三天天气预报、24小时分区县天气预报和天气预报，并通过邮箱自动分发给电视台的编辑，保存、查询气象影视信息。
自2019年1月份试运行以来，平台性能稳定，在一年多的使用过程中，未出现影响正常业务的情况。平台主界面设计如图2所示。平台分区县转换结果界面如图3所示。
4 结束语
气象影视业务平台实现了日常气象影视信息资料的一键式提取、发送和保存，业务人员可在平台上编辑，尤其是分县转换模块实现了分县内容按照后台转换策略自动转换为电视台需要的格式内容，提高了工作效率，为高清版电视天气预报节目正常播出提供有力技术支撑。
在使用过程中也存在一些不足，主要是分县转换时碰到很复杂天气时候会转换失败，这需要修改后台策略，影响了效率，还有发送邮件一段时间后会有发送失败的情况发生，这可能是邮件服务器限制造成的。
后续还要进一步完善分县转换策略，制定备用方案，在平时出现问题时业务人员可用备用方案转换，另外要改进邮件发送机制，如减少短时间的发送频次，探索把有些内容合并发送等。
参考文献
[1] 黄宇生， 罗桂湘. 新媒体时代气象影视节目创新的思考[J]. 气象研究与应用， 2016， 37（S1）： 193-194.
[2] 周静， 李厚伟， 史成， 等. 提高市级电视天气预报节目水平的思考[J]. 广东气象， 2016， 38（4）： 49-52.
[3] 黎琮炜， 宋彬， 孔毅民. 提高气象传媒竞争力的思考[J]. 气象研究与应用， 2017， 38（2）： 106.
[4] 罗延斌. 柳州市气象影视节目集约化发展的思路及做法[J]. 气象研究与应用， 2018， 39（1）： 141-146.
[5] 容军. 发展气象影视精细化服务的思路与探讨[J]. 气象研究与应用， 2018， 39（4）： 83-85.
[6] 王帅. 气象影视节目图文信息可视化效果提升探索[J]. 气象研究与应用， 2019， 40（4）： 96-98.
[7] 丁涛. 电视天气预报节目的创新与发展[J]. 声屏世界， 2012， 2（上半月）： 64-65.
[8] 丁灏， 张哲睿. 现代传媒高效气象服务的新模式[J]. 气象研究与应用， 2014， 35（3）： 122.
[9] 王克诚. 地方电视台气象节目发展探讨[J]. 新闻界， 2008（3）： 140-141： 170.
[10] 阮水根， 李修池， 秦祥士， 等. 电视气象服务与标准化研究[M]. 北京： 气象出版社， 2005： 3-4.
关键词： 气象影视;一键式;邮件发送
中图分类号： TP391. 41 文献标识码： A DOI：10.3969/j.issn.1003-6970.2020.06.017
本文著录格式：潘旭光，黄本峰，武强，等. 气象影视业务平台设计与实现[J]. 软件，2020，41（06）：7779
【Abstract】： In order to reduce the workload of business personnel and better connect with the TV station， the developers of Yantai Meteorological Bureau developed the meteorological film and television business platform in time according to the business needs and the requirements of improving work efficiency. The platform adopts the classic Delphi 7 development， which can provide weather conditions， weather early warning， weather forecast for the next three days and 24-hour weather forecast for districts and counties with one key. Weekly weather forecast is provided on Monday and sent automatically through email. At present， the platform has been put into operation.
【Key words】： Meteorological film and television; One click; Email
0 引言
電视天气预报节目一直都是电视台收视率较高的栏目。近年来，随着新媒体技术的迅猛发展，有人开发了气象影视数字化媒体资源管理平台并思考节目的创新与发展[1-10]，烟台传统电视天气预报也收到了冲击，为了烟台电视天气预报在激烈的竞争中更好的发展和生存，借助烟台广播电视台在全省率先实现全频道高清播出的契机，自2019年开始，烟台市气象局改变服务方式，由之前的制作、录制节目，改为提供气象信息资料，以保证高清版电视天气预报节目正常播出。
为了减少业务人员工作量，更好的与电视台衔接，烟台市气象局开发人员根据业务需要和提高工作效率的要求及时研发了气象影视业务平台，该平台可以提供天气实况、天气预警、未来三天天气预报和24小时分区县天气预报，周一提供周天气预报，目前平台已投入业务运行。
1 系统设计
烟台气象影视业务平台采用经典的 Delphi 7开发。Delphi 7具有功能强大的可视化开发设计环境和编译速度快的优点。平台分模块化操作，平台主要分提取气象台文本、提取分县预报、分县转换、提取周报、一键发送、历史查询和软件设置等7个模块。
1.1 提取气象台文本
气象台文本由后台本文提供，包括预警信号、未来三天天气预报及其全市主要图标文字信息。前两项内容一键式提取到平台的编辑框中，在提取前，平台先自动判断文本是否存在，若不存在给出提示，另外，在提取时自动过滤掉预报员姓名、森林火险气象等级和一氧化碳中毒潜势预报等无关信息。最后，气象台文本下面会自动给出未来三天主要图标文字信息编辑模板，值班员手工输入主要天况和气温预报。
1.2 提取分县预报
分县预报由后台文本提供，内容包括各分区县的天况、风向、风力和气温预报。所有内容都是一键式提取到平台的编辑框中，在提取前，先进行格式转换，如把全角标点符号转换为半角格式。平台按照电视台需要的顺序提取各县市区的预报内容。
1.3 分县转换
把分县预报按照转换策略转换成电视台需要的格式内容，主要是从天况中自动挑取两个两个主要的，分县预报内容由天况、风向、风力、气温和特殊项5项组成，第5项特殊项一般是指霜冻、雾和冰雹等灾害性天气，例如分县预报内容是“多云转阴，北到西北风，5-6级转3-4级，0-5℃，有霜冻”，转换后提取的天况就是“霜冻”和“阴”，天况转换流程图如图1。点击分县转换后平台显示中间转换结果，若检查没问题可以点击转换按钮转换为电视台需要的格式内容，若有问题可以修改后台转换策略重新转换。最后转换结果如图3所示。
1.4 提取周报
周报内容每周一更新，包括全市一周天气展望和每天具体天气预报和森林火险预报等。所有内容都是一键式提取后台word文本中的内容到前台文本编辑框中。
1.5 一键发送
在提取气象信息资料后，会自动加上邮件的标题，当点击发送按键后，气象信息资料就会通过公用邮箱自动群发给电视台编辑的个人邮箱，平台会弹出提示框，显示各邮箱的发送情况，并且下发的状态栏会给出最终的发送结果并记录日志文件，日志内容主要包括连接邮件服务器及发送邮件情况。若发送的是气象台文本，平台会先自动判断图标文字信息编辑模板有无空项，若有会弹出警示框，防止有遗漏项。 1.6 历史查询
点击历史查询，平台会定位到存放的历史发送气象信息资料的文件夹下，平台一天建立一个文件夹，以日期命名，每个文件夹里以记事本方式存放着气象台文本、分县预报、分县转换结果、周报和日志文件。
1.7 软件设置
点击软件设置，可设置被联系人的姓名、电话和邮箱地址，不同的被联系人对应内容用分号相隔;可设置发送邮件的服务器、用户名和密码;还可设置周报、气象台文本、分县预报和历史发送气象信息资料的文件路径，可直接输入，也可通过每项右边的浏览按钮选择输入。
2 主要技术方法
2.1 读取WORD文档内容
使用Delphi的CreateOleObject方法对WORD文档操作具有优势，与delphi所提供的那些控件方式的访问相比较，CreateOleObject方法距离WORD核心的操作更近，因为它直接使用OFFICE所提供的VBA语言对WORD文档的操作进行编程。主要代码如下：
ole1：=CreateOleObject（'word.Application'）; //创建WORD对象
ole1.documents.open（zb_Text）; //打开指定WORD文档
ole1.activedocument.SaveAs（'c：＼tmp.txt'，2）; //将WORD文档存入临时文本文件
2.2 文字处理
使用delphi的正则TPerlRegEx，替换字符串中指定的内容实现对分县文字内容的转换。主要代码如下：
reg：TPerlRegEx; //定义正则变量
reg.Subject：=p; //要处理的数据源
reg.RegEx：=s1; //被替换的正则式s1
reg.Replacement：=s2; //要替换成s2
reg.ReplaceAll; //执行替换
2.3 郵件发送
delphi 7发送个邮件用到TIdSMTP与Tid?Mes?sage这两个组件，他们分别在Indy Clients和Indy Misc两个面板组件页内。
首先配置TIdSMTP和TIdMessage的相关属性，再对TIdSMTP进行编程：
with msg do
begin
Recipients.Clear;
Recipients.Add.Address：=MailTo.Text; //配置发送地址
Subject：=MailTitle.Text; //配置主题
SetBody（MailContent.Lines）; //配置内容
From.Address：='yangshiqiang@163.com';
end;
SMTP.Connect（）; //SMTP的连接
SMTP.Authenticate; //SMTP的相关认证
SMTP.Send（msg）; //SMTP的发送邮件
SMTP.Disconnect; //SMTP断开连接
3 平台运行情况
平台实现了以下功能：一键式提取天气实况、天气预警、未来三天天气预报、24小时分区县天气预报和天气预报，并通过邮箱自动分发给电视台的编辑，保存、查询气象影视信息。
自2019年1月份试运行以来，平台性能稳定，在一年多的使用过程中，未出现影响正常业务的情况。平台主界面设计如图2所示。平台分区县转换结果界面如图3所示。
4 结束语
气象影视业务平台实现了日常气象影视信息资料的一键式提取、发送和保存，业务人员可在平台上编辑，尤其是分县转换模块实现了分县内容按照后台转换策略自动转换为电视台需要的格式内容，提高了工作效率，为高清版电视天气预报节目正常播出提供有力技术支撑。
在使用过程中也存在一些不足，主要是分县转换时碰到很复杂天气时候会转换失败，这需要修改后台策略，影响了效率，还有发送邮件一段时间后会有发送失败的情况发生，这可能是邮件服务器限制造成的。
后续还要进一步完善分县转换策略，制定备用方案，在平时出现问题时业务人员可用备用方案转换，另外要改进邮件发送机制，如减少短时间的发送频次，探索把有些内容合并发送等。
参考文献
[1] 黄宇生， 罗桂湘. 新媒体时代气象影视节目创新的思考[J]. 气象研究与应用， 2016， 37（S1）： 193-194.
[2] 周静， 李厚伟， 史成， 等. 提高市级电视天气预报节目水平的思考[J]. 广东气象， 2016， 38（4）： 49-52.
[3] 黎琮炜， 宋彬， 孔毅民. 提高气象传媒竞争力的思考[J]. 气象研究与应用， 2017， 38（2）： 106.
[4] 罗延斌. 柳州市气象影视节目集约化发展的思路及做法[J]. 气象研究与应用， 2018， 39（1）： 141-146.
[5] 容军. 发展气象影视精细化服务的思路与探讨[J]. 气象研究与应用， 2018， 39（4）： 83-85.
[6] 王帅. 气象影视节目图文信息可视化效果提升探索[J]. 气象研究与应用， 2019， 40（4）： 96-98.
[7] 丁涛. 电视天气预报节目的创新与发展[J]. 声屏世界， 2012， 2（上半月）： 64-65.
[8] 丁灏， 张哲睿. 现代传媒高效气象服务的新模式[J]. 气象研究与应用， 2014， 35（3）： 122.
[9] 王克诚. 地方电视台气象节目发展探讨[J]. 新闻界， 2008（3）： 140-141： 170.
[10] 阮水根， 李修池， 秦祥士， 等. 电视气象服务与标准化研究[M]. 北京： 气象出版社， 2005： 3-4.