//Delphi接触的不多，用C#大概写一下，看个思路就好，这里正则不太合适
string[] label={"公司","集团"};
string str=Console.ReadLine("请输入：");
bool IsMatch=false;
foreach (string i in label)
{
if (str.Contain(i))
{
IsMatch=true;
break;
}
}
if (IsMatch) Console.WriteLine(string.Format("{0}是公司名称！"),str);
else Console.WriteLine(string.Format("{0}不是公司名称！"),str);
这个看上去可以用正则做，但是实际上不可行，因为公司名字本身和其它东西，在文字格式本身上没有什么区别，所谓的区别是语义上的。需要一个语义词库去匹配。
正则并不是万能的。
这个看上去可以用正则做，但是实际上不可行，因为公司名字本身和其它东西，在文字格式本身上没有什么区别，所谓的区别是语义上的。需要一个语义词库去匹配。
正则并不是万能的
- 其他相关推荐
- delphi 正则表达式验证手机号与固话？
- 函数返回，判断一个字符串是手机号还是固话号，用正则匹配，是手机号返回，否则返回空，会正则的老师帮个忙/
- DELPHI下正则表达式问题请教各位大侠
- 我想写一个提取短信验证码的正则表达式。一般是特定字符加4到8位数字。 比如文字有可能是 abc或def或hij中的一个，4到8位数字，有可能数字在字符之前，也有可能是在字符之后.即：有可能是 def asdklfoiaweioeawoi 4567 也有可能是 4567 def asdklfoiaweioeawoi 。匹配成功后取出指定的数字作为验证码。但是 我自己写过 (?=abc|def|hij)(\D(\d{4,8})\D)或(?<=abc|def|hij)(\D(\d{4,8})\D)均匹配不到。 请各位高手指教。
- C++中的类静态变量在delphi7中怎么实现。
- 请教一下，类TCat，TDog都是继承类TAnimal,我想自改TAnimal中myKind属性然后TCat和TDog实例中的MyKind都改了，怎么弄？？ myKind是工程全局变量，cat:TCat;dog:TDog; 都能访问，现在想做个封装，封装到父类TAnimal中，
- delphi 7和delphi xe，你选哪一个？
- 过去开发项目一直用delphi 7，为了避免版权问题，现在想买套正版软件，纠结于买delphi 7还是delphi xe，大家来说说它们的优缺点吧
- delphi 字符串查找或者匹配的问题？
- 我想在一个字符串中找到一个国家的名字，怎么做呢？ 比如：这个国家的风景很美丽，它是中国。找到中国； 再比如：这次比赛乌拉圭国家队表现的很棒！。找到乌拉圭； 国家名称的位置不确定，理论支持地球上所有国家，谢谢老师！
- Delphi设计一个登录界面
- Delphi中form1是：用户名和密码，用户名输入"test1","test2","test3","test4","test5", 密码都是"123456"，都正确，则进入form2，若用户名错误，弹出消息框"用户名不存在" ，若密码错误，则弹出消息框"密码输入错误"。如何用数组编写form1的代码？ var name:array[1..5] of string;
- delphi dbgrideh的导出功能，导出某几列？
- delphi dbgrideh的导出功能，导出某几列？ 使用自带的函数SaveDBGridEhToExportFile导出全部的数据OK的， 现在我只想导出第2列 至 第5列 其他列的不要，怎么实现啊。 有知道的老师吗？
- delphi 可以通过FDQuery来执行导入数据库操作吗？
- delphi 可以通过FDQuery来执行导入数据库操作吗？ 如题： 在delphi里怎么操作可以导入SQL文件到MYSQL数据库里呢，麻烦老是指点。
- delphi线程问题 delphi 程序里我写了一个方法
- delphi 程序里我写了一个方法，方法里面的算法比较复杂，计算起来时间比较长，我想把这个方法单独放到一个线程里去执行，请问是怎么写？一点头绪没有啊，谢谢
- Delphi PicklList 显示问题，详细见图。
-  Procedure TfrmsAA.dbgrdCellClick(Column: TColumnEh); Begin Inherited; If (UPPERCASE(Column.FieldName) = 'ColNM') And (qry.FieldByName('ColPcode').AsString <> '') Then Begin TRY IF Not (qry.State In [dsEdit, dsInsert]) Then BEGIN qry.Edit; qry.Post; END; qry.DisableControls; Column.PickList.clear; Column.KeyList.clear; With Sys.QryTemp Do Begin close; sql.Clear; sql.add('SELECT Pcode FROM Table1 WHERE code=' + qry.fieldbyname('colpcode').asstring); open; While Not eof Do Begin dbgrd.FieldColumns['colnm'].PickList.Add(fieldByName('pcode').AsString); dbgrd.FieldColumns['colnm'].KeyList.Add(fieldByName('pcode').AsString); Next; End; End; Finally qry.EnableControls; End; End; End; 已确认是每次点击的时候，清除picklist导致，但是这种情况如何处理？是否有其他代替的方法？
- delphi 7中怎么给图书管理系统加上一个简单的登录界面，只要用户名密码的输入，怎么写？
- delphi 7中怎么给图书管理系统加上一个简单的登录界面，只要用户名密码的输入，怎么写？
- 求助 C语言(结构体 函数) 查找书籍
- # 题目描述 给定n本书的名称和定价，本题要求编写程序，查找并输出其中定价**最高**的书的名称和定价。 ## 输入 输入第一行给出正整数n（<10），随后给出n本书的信息。每本书在一行中给出书名，即长度不超过30的字符串，随后一行中给出正实数价格。题目保证没有同样价格的书。 ## 输出 在一行中按照“价格, 书名”的格式先后输出价格最高的书。价格保留1位小数。 ## 样例输入 3 Programming in C 21.5 Programming in VB 18.5 Programming in Delphi 25.0 ## 样例输出 25.0, Programming in Delphi ## 代码 ``` #include"stdio.h" struct book{ char name[50]; float price; }; struct book getmax(struct book books[],int n); int main() { struct book books[20]; @@1 嵌入代码 @@1 } struct book getmax(struct book books[],int n) @@2 嵌入代码 @@2 ```
- delphi7 如何把一个表数据读出来再写到另一个表中
- 现有一个SQL数据库文件 请问怎么用DELPHI7把里面数据读取出来再写入另外一个表中。 数据库结构为： 学校名 学号 姓名 考号 ...... 一中 1 啊啊 1 二中 2 问问 2 ........ 以此类推 请问该怎么把数据读取再导入另一个表里面。
- 请问VC里面的类型在delphi里面如何表达定义？
- 在C里面： typedef BOOL kint1u; typedef UCHAR kint8u; typedef USHORT kint16u; typedef UINT kint32u; typedef struct { kint32u id; kint8u dynip[4]; kint32u login_time; kint32u last_time; }kdev_info; 请问在Delphi里如何定义？（下面是我的表达方式，但是运行时提示内存写错误！） type Tkdev_info=^kdev_info; kdev_info=record id:LongWord; dynip:array[0..4] of UCHAR; login_time:LongWord; last_time:LongWord; end;
- delphi FileListBox 排序
- delphi FileListBox 显示的内容如何按照文件的名称进行排序
- delphi idftp上传，如何判断指定目录下的有这个文件？
- if idftp1.Connected then begin if dlgOpen_File.Execute then begin idftp1.TransferType := ftBinary; //这里怎么判断FTP服务器上有这个文件（目录已经存在了， 只要判断这个目录下面是否有这个文件）， 如果有我就不传，如果没有再执行下面的上传代码 idftp1.Put(dlgOpen_File.FileName, AnsiToUtf8(ExtractFileName(dlgOpen_File.FileName))); ChageDir(Utf8ToAnsi(idftp1.RetrieveCurrentDir)); end; end; ``` 小弟刚接触delphi ，希望大神帮助一下，感谢了！ ```
- delphi dbgrid的双击问题
- delphi 怎么在一个Form中点击一个按钮弹出一个查询窗口，在查询窗口有个DBgrid，怎么样双击dbgrid 将dbgrid里面各列的值返回给Form中的Edit并且关闭查询窗口，手动点X关闭查询窗口是则 不执行该操作
- 如何在Delphi打开Excel文档时使用修复功能？
- 问题：在使用Delphi7操作Excel文档时，当文件直接用excle打开时提示“发现不可读取的内容，是否恢复此工作簿的内容？如果信任此工作簿的来源，请单价是”。此时点击“是”，可以打开，再保存后打开就正常，不再提示上述错了，但用Delphi的Application.Workbooks.open方法打开时就会提示类的Open方法无效错误。在MSDN中找到可以用修复方法打开，用VBA 的XlCorruptLoad=xlRepairFile 参数可以正常打开文件。请问？ 在Delphi中有没有方法可以使用类似VBA XlCorruptLoad的参数？ 以下是我的代码,但没有作用！ FileOv:=CreateOleObject('Excel.Application'); FileOv.Application.DisplayAlerts:=false; FileOv.Application.Workbooks.open(wjm,EmptyParam, EmptyParam, EmptyParam, EmptyParam, EmptyParam, EmptyParam, EmptyParam, EmptyParam, EmptyParam, EmptyParam, EmptyParam, EmptyParam,xlRepairFile);
- Delphi7 中如何实现 TStringBuilder
- Delphi7 中如何实现 TStringBuilder Delphi7 中如何实现 TStringBuilder
- 爬虫福利二 之 妹子图网MM批量下载
- 爬虫福利一：27报网MM批量下载 点击 看了本文，相信大家对爬虫一定会产生强烈的兴趣，激励自己去学习爬虫，在这里提前祝：大家学有所成！ 目标网站：妹子图网 环境：Python3.x 相关第三方模块：requests、beautifulsoup4 Re：各位在测试时只需要将代码里的变量 path 指定为你当前系统要保存的路径，使用 python xxx.py 或IDE运行即可。
- Java学习的正确打开方式
- 在博主认为，对于入门级学习java的最佳学习方法莫过于视频+博客+书籍+总结，前三者博主将淋漓尽致地挥毫于这篇博客文章中，至于总结在于个人，实际上越到后面你会发现学习的最好方式就是阅读参考官方文档其次就是国内的书籍，博客次之，这又是一个层次了，这里暂时不提后面再谈。博主将为各位入门java保驾护航，各位只管冲鸭！！！上天是公平的，只要不辜负时间，时间自然不会辜负你。 何谓学习？博主所理解的学习，它
- 大学四年自学走来，这些私藏的实用工具/学习网站我贡献出来了
- 大学四年，看课本是不可能一直看课本的了，对于学习，特别是自学，善于搜索网上的一些资源来辅助，还是非常有必要的，下面我就把这几年私藏的各种资源，网站贡献出来给你们。主要有：电子书搜索、实用工具、在线视频学习网站、非视频学习网站、软件下载、面试/求职必备网站。 注意：文中提到的所有资源，文末我都给你整理好了，你们只管拿去，如果觉得不错，转发、分享就是最大的支持了。 一、PDF搜索网站推荐 对于大部
- linux系列之常用运维命令整理笔录
- 本博客记录工作中需要的linux运维命令，大学时候开始接触linux，会一些基本操作，可是都没有整理起来，加上是做开发，不做运维，有些命令忘记了，所以现在整理成博客，当然vi，文件操作等就不介绍了，慢慢积累一些其它拓展的命令，博客不定时更新 顺便拉下票，我在参加csdn博客之星竞选，欢迎投票支持，每个QQ或者微信每天都可以投5票，扫二维码即可，http://m234140.nofollow.ax.
- 比特币原理详解
- 一、什么是比特币 比特币是一种电子货币，是一种基于密码学的货币，在2008年11月1日由中本聪发表比特币白皮书，文中提出了一种去中心化的电子记账系统，我们平时的电子现金是银行来记账，因为银行的背后是国家信用。去中心化电子记账系统是参与者共同记账。比特币可以防止主权危机、信用风险。其好处不多做赘述，这一层面介绍的文章很多，本文主要从更深层的技术原理角度进行介绍。 二、问题引入 假设现有4个人
- 程序员接私活怎样防止做完了不给钱？
- 首先跟大家说明一点，我们做 IT 类的外包开发，是非标品开发，所以很有可能在开发过程中会有这样那样的需求修改，而这种需求修改很容易造成扯皮，进而影响到费用支付，甚至出现做完了项目收不到钱的情况。 那么，怎么保证自己的薪酬安全呢？ 我们在开工前，一定要做好一些证据方面的准备（也就是“讨薪”的理论依据），这其中最重要的就是需求文档和验收标准。一定要让需求方提供这两个文档资料作为开发的基础。之后开发
- 网页实现一个简单的音乐播放器（大佬别看。(⊙﹏⊙)）
- 今天闲着无事，就想写点东西。然后听了下歌，就打算写个播放器。 于是乎用h5 audio的加上js简单的播放器完工了。 欢迎 改进 留言。 演示地点跳到演示地点 html代码如下`<!DOCTYPE html> <html> <head> <title>music</title> <meta charset="utf-8">
- Python十大装B语法
- Python 是一种代表简单思想的语言，其语法相对简单，很容易上手。不过，如果就此小视 Python 语法的精妙和深邃，那就大错特错了。本文精心筛选了最能展现 Python 语法之精妙的十个知识点，并附上详细的实例代码。如能在实战中融会贯通、灵活使用，必将使代码更为精炼、高效，同时也会极大提升代码B格，使之看上去更老练，读起来更优雅。 1. for - else 什么？不是 if 和 else 才
- 数据库优化 - SQL优化
- 前面一篇文章从实例的角度进行数据库优化，通过配置一些参数让数据库性能达到最优。但是一些“不好”的SQL也会导致数据库查询变慢，影响业务流程。本文从SQL角度进行数据库优化，提升SQL运行效率。 判断问题SQL 判断SQL是否有问题时可以通过两个表象进行判断： 系统级别表象 CPU消耗严重 IO等待严重 页面响应时间过长
- 2019年11月中国大陆编程语言排行榜
- 2019年11月2日，我统计了某招聘网站，获得有效程序员招聘数据9万条。针对招聘信息，提取编程语言关键字，并统计如下： 编程语言比例 rank pl_ percentage 1 java 33.62% 2 c/c++ 16.42% 3 c_sharp 12.82% 4 javascript 12.31% 5 python 7.93% 6 go 7.25% 7
- 通俗易懂地给女朋友讲：线程池的内部原理
- 餐厅的约会 餐盘在灯光的照耀下格外晶莹洁白，女朋友拿起红酒杯轻轻地抿了一小口，对我说：“经常听你说线程池，到底线程池到底是个什么原理？”我楞了一下，心里想女朋友今天是怎么了，怎么突然问出这么专业的问题，但做为一个专业人士在女朋友面前也不能露怯啊，想了一下便说：“我先给你讲讲我前同事老王的故事吧！” 大龄程序员老王 老王是一个已经北漂十多年的程序员，岁数大了，加班加不动了，升迁也无望，于是拿着手里
- 经典算法（5）杨辉三角
- 写在前面： 我是 扬帆向海，这个昵称来源于我的名字以及女朋友的名字。我热爱技术、热爱开源、热爱编程。技术是开源的、知识是共享的。 这博客是对自己学习的一点点总结及记录，如果您对 Java、算法 感兴趣，可以关注我的动态，我们一起学习。 用知识改变命运，让我们的家人过上更好的生活。 目录一、杨辉三角的介绍二、杨辉三角的算法思想三、代码实现1.第一种写法2.第二种写法 一、杨辉三角的介绍 百度
- 腾讯算法面试题：64匹马8个跑道需要多少轮才能选出最快的四匹？
- 昨天，有网友私信我，说去阿里面试，彻底的被打击到了。问了为什么网上大量使用ThreadLocal的源码都会加上private static？他被难住了，因为他从来都没有考虑过这个问题。无独有偶，今天笔者又发现有网友吐槽了一道腾讯的面试题，我们一起来看看。 腾讯算法面试题：64匹马8个跑道需要多少轮才能选出最快的四匹？ 在互联网职场论坛，一名程序员发帖求助到。二面腾讯，其中一个算法题：64匹
- 面试官：你连RESTful都不知道我怎么敢要你？
- 面试官：了解RESTful吗？ 我：听说过。 面试官：那什么是RESTful？ 我：就是用起来很规范，挺好的 面试官：是RESTful挺好的，还是自我感觉挺好的 我：都挺好的。 面试官：… 把门关上。 我：… 要干嘛？先关上再说。 面试官：我说出去把门关上。 我：what ？，夺门而去 文章目录01 前言02 RESTful的来源03 RESTful6大原则1. C-S架构2. 无状态3.统一的接
- JDK12 Collectors.teeing 你真的需要了解一下
- 前言在 Java 12 里面有个非常好用但在官方 JEP 没有公布的功能，因为它只是 Collector 中的一个小改动，它的作用是 merge 两个 collector 的结果，这句话
- 为啥国人偏爱Mybatis，而老外喜欢Hibernate/JPA呢？
- 关于SQL和ORM的争论，永远都不会终止，我也一直在思考这个问题。昨天又跟群里的小伙伴进行了一番讨论，感触还是有一些，于是就有了今天这篇文。 声明：本文不会下关于Mybatis和JPA两个持久层框架哪个更好这样的结论。只是摆事实，讲道理，所以，请各位看官勿喷。 一、事件起因 关于Mybatis和JPA孰优孰劣的问题，争论已经很多年了。一直也没有结论，毕竟每个人的喜好和习惯是大不相同的。我也看
- SQL-小白最佳入门sql查询一
- 一 说明 如果是初学者，建议去网上寻找安装Mysql的文章安装，以及使用navicat连接数据库，以后的示例基本是使用mysql数据库管理系统； 二 准备前提 需要建立一张学生表，列分别是id，名称，年龄，学生信息；本示例中文章篇幅原因SQL注释略； 建表语句： CREATE TABLE `student` ( `id` int(11) NOT NULL AUTO_INCREMENT, `
- 项目中的if else太多了，该怎么重构？
- 介绍 最近跟着公司的大佬开发了一款IM系统，类似QQ和微信哈，就是聊天软件。我们有一部分业务逻辑是这样的 if (msgType = "文本") { // dosomething } else if(msgType = "图片") { // doshomething } else if(msgType = "视频") { // doshomething } else { // dosho
- 【图解经典算法题】如何用一行代码解决约瑟夫环问题
- 约瑟夫环问题算是很经典的题了，估计大家都听说过，然后我就在一次笔试中遇到了，下面我就用 3 种方法来详细讲解一下这道题，最后一种方法学了之后保证让你可以让你装逼。 问题描述：编号为 1-N 的 N 个士兵围坐在一起形成一个圆圈，从编号为 1 的士兵开始依次报数（1，2，3…这样依次报），数到 m 的 士兵会被杀死出列，之后的士兵再从 1 开始报数。直到最后剩下一士兵，求这个士兵的编号。 1、方
- 致 Python 初学者
- 文章目录1. 前言2. 明确学习目标，不急于求成，不好高骛远3. 在开始学习 Python 之前，你需要做一些准备2.1 Python 的各种发行版2.2 安装 Python2.3 选择一款趁手的开发工具3. 习惯使用IDLE，这是学习python最好的方式4. 严格遵从编码规范5. 代码的运行、调试5. 模块管理5.1 同时安装了py2/py35.2 使用Anaconda，或者通过IDE来安装模
- “狗屁不通文章生成器”登顶GitHub热榜，分分钟写出万字形式主义大作
- 一、垃圾文字生成器介绍 最近在浏览GitHub的时候，发现了这样一个骨骼清奇的雷人项目，而且热度还特别高。 项目中文名：狗屁不通文章生成器 项目英文名：BullshitGenerator 根据作者的介绍，他是偶尔需要一些中文文字用于GUI开发时测试文本渲染，因此开发了这个废话生成器。但由于生成的废话实在是太过富于哲理，所以最近已经被小伙伴们给玩坏了。 他的文风可能是这样的： 你发现，
- 程序员：我终于知道post和get的区别
- IT界知名的程序员曾说：对于那些月薪三万以下，自称IT工程师的码农们，其实我们从来没有把他们归为我们IT工程师的队伍。他们虽然总是以IT工程师自居，但只是他们一厢情愿罢了。 此话一出，不知激起了多少(码农)程序员的愤怒，却又无可奈何，于是码农问程序员。 码农：你知道get和post请求到底有什么区别？ 程序员：你看这篇就知道了。 码农：你月薪三万了？ 程序员：嗯。 码农：你是怎么做到的? 程序员：
- GitHub标星近1万：只需5秒音源，这个网络就能实时“克隆”你的声音
- 作者 | Google团队译者 | 凯隐编辑 | Jane出品 | AI科技大本营（ID：rgznai100）本文中，Google 团队提出了一种文本语音合成（text to speech）神经系统，能通过少量样本学习到多个不同说话者（speaker）的语音特征，并合成他们的讲话音频。此外，对于训练时网络没有接触过的说话者，也能在不重新训练的情况下，仅通过未知说话者数秒的音频来合成其讲话音频，即网
- 《程序人生》系列-这个程序员只用了20行代码就拿了冠军
- 你知道的越多，你不知道的越多 点赞再看，养成习惯GitHub上已经开源https://github.com/JavaFamily，有一线大厂面试点脑图，欢迎Star和完善 前言 这一期不算《吊打面试官》系列的，所有没前言我直接开始。 絮叨 本来应该是没有这期的，看过我上期的小伙伴应该是知道的嘛，双十一比较忙嘛，要值班又要去帮忙拍摄年会的视频素材，还得搞个程序员一天的Vlog，还要写BU
- 加快推动区块链技术和产业创新发展，2019可信区块链峰会在京召开
- 11月8日，由中国信息通信研究院、中国通信标准化协会、中国互联网协会、可信区块链推进计划联合主办，科技行者协办的2019可信区块链峰会将在北京悠唐皇冠假日酒店开幕。 区块链技术被认为是继蒸汽机、电力、互联网之后，下一代颠覆性的核心技术。如果说蒸汽机释放了人类的生产力，电力解决了人类基本的生活需求，互联网彻底改变了信息传递的方式，区块链作为构造信任的技术有重要的价值。 1
- 程序员把地府后台管理系统做出来了，还有3.0版本！12月7号最新消息：已在开发中有github地址
- 第一幕：缘起 听说阎王爷要做个生死簿后台管理系统，我们派去了一个程序员…… 996程序员做的梦： 第一场：团队招募 为了应对地府管理危机，阎王打算找“人”开发一套地府后台管理系统，于是就在地府总经办群中发了项目需求。 话说还是中国电信的信号好，地府都是满格，哈哈！！！ 经常会有外行朋友问：看某网站做的不错，功能也简单，你帮忙做一下？ 而这次，面对这样的需求，这个程序员
- 网易云6亿用户音乐推荐算法
- 网易云音乐是音乐爱好者的集聚地，云音乐推荐系统致力于通过 AI 算法的落地，实现用户千人千面的个性化推荐，为用户带来不一样的听歌体验。 本次分享重点介绍 AI 算法在音乐推荐中的应用实践，以及在算法落地过程中遇到的挑战和解决方案。 将从如下两个部分展开： AI 算法在音乐推荐中的应用 音乐场景下的 AI 思考 从 2013 年 4 月正式上线至今，网易云音乐平台持续提供着：乐屏社区、UGC
- 【技巧总结】位运算装逼指南
- 位算法的效率有多快我就不说，不信你可以去用 10 亿个数据模拟一下，今天给大家讲一讲位运算的一些经典例子。不过，最重要的不是看懂了这些例子就好，而是要在以后多去运用位运算这些技巧，当然，采用位运算，也是可以装逼的，不信，你往下看。我会从最简单的讲起，一道比一道难度递增，不过居然是讲技巧，那么也不会太难，相信你分分钟看懂。 判断奇偶数 判断一个数是基于还是偶数，相信很多人都做过，一般的做法的代码如下
- 【管理系统课程设计】美少女手把手教你后台管理
- 【后台管理系统】URL设计与建模分析+项目源码+运行界面 栏目管理、文章列表、用户管理、角色管理、权限管理模块（文章最后附有源码） 一、这是一个什么系统? 1.1 学习后台管理系统的原因 随着时代的变迁，现如今各大云服务平台横空出世，市面上有许多如学生信息系统、图书阅读系统、停车场管理系统等的管理系统，而本人家里就有人在用烟草销售系统，直接在网上完成挑选、购买与提交收货点，方便又快捷。 试想，
- 4G EPS 第四代移动通信系统
- 目录 文章目录目录4G EPSEPS 的架构EPS 的参考模型E-UTRANUEeNodeBEPCMME（移动性控制处理单元）S-GW（E-RAB 无线访问承载接入点）P-GW（PDN 接入点）HSS（用户认证中心）PCRF（计费规则与策略）SPR（用户档案）OCS（在线计费）OFCS（离线计费）接口类型Uu 接口（空中接口，UE 和 AN 之间）S1 接口（AN 和 CN 之间）S1-U 接口和
