文档章节

统计字数

涂孟超
 涂孟超
发布于 2014/09/26 15:35
字数 87
阅读 3
收藏 0
点赞 0
评论 0
//添加 Memo1、Label1、Label2、还有Button1
procedure TForm1.Button1Click(Sender: TObject);
var
  s: string;
  i,sum,e,c,t: Integer;
begin
  s := Memo1.Text;
  e := 0;
  c := 0;
  sum := Length(s);

  for i := 0 to sum do
  begin
    if (Ord(s[i]) >= 33) and (Ord(s[i]) <= 126) then
    begin
      Inc(e);
      Label1.Caption := '字母数: ' + IntToStr(e);
    end;

    if Ord(s[i]) >= 127 then
    begin
      Inc(c);
      Label2.Caption := '汉字数: ' + IntToStr(c div 2);
    end;
  end;
end;

本文转载自:http://www.cnblogs.com/del/archive/2007/12/08/987894.html

共有 人打赏支持
涂孟超
粉丝 12
博文 2011
码字总数 14107
作品 0
深圳
程序员
Asian Word Count

Asian Word Count是一款Wordpress中文字数插件。目前绝大部分字数统计插件均不支持中文(确切来说,我还没有找到支持中文的插件),所以我基于WP Word Count修改制作了这款支持中文、韩文、日...

匿名
2012/04/23
552
0
31.每日一个Linux命令----wc

描述:Word Count命令的功能为统计指定文件中的字节数、字数、行数,并将统计结果显示输出 用法: wc [option] 文件 选项: -c 统计字节数。 -l 统计行数。 -m 统计字符数。这个标志不能与 ...

詹玉香
2016/07/02
12
0
Hexo-文章字数统计与阅读时长

使用在Hexo中增加文章字数统计与阅读时长。 起因 昨晚写俩小时的总结,想知道自己一共写了多少字,然后进行了、、、…… 给自己博客增加一个字数统计的功能。以主题语法为例,其他语法可以看...

莫显辉
05/09
0
0
限制UITextView中的字数

很多时候我们想限制textView中的输入字数,我们可以利用函数- (void)textViewDidChange:(UITextView )textView中统计textView实现此功能。通过在此函数中统计你输入的字符的个数,当字数超过...

meilidashijie
2013/01/08
0
1
每天一个linux命令(40):wc命令

Linux系统中的wc(Word Count)命令的功能为统计指定文件中的字节数、字数、行数,并将统计结果显示输出。 1.命令格式: wc [选项]文件... 2.命令功能: 统计指定文件中的字节数、字数、行数...

长平狐
2013/06/17
30
0
每天一个linux命令(46):wc命令

Linux系统中的wc(Word Count)命令的功能为统计指定文件中的字节数、字数、行数,并将统计结果显示输出。 实例1:查看文件的字节数、字数、行数 wc test.txt #行数 单词数 字节数 文件名 实例...

姬风
2014/04/09
0
0
hadoop2.3 eclipse提交任务到集群上 找不到input

问题描述:想在window环境下通过eclipse将统计字数job提交给虚拟机上的集群,但是异常,请各位指点迷津 问题截图:集群是正常的,如图: (这是在管理节点上的进程,datanode在另外两台机器上...

battier
2016/01/10
246
2
IOS开发技巧之──字数统计函数

微博对每条信息有 140 字的上限限制,下面微博字数统计函数,做微博客户端应用的开发者可以以此加入字数统计功能以方便用户 - (int)countWord:(NSString*)s { int i,n=[s length],l=0,a=0,b...

Megan_zhou
2013/11/29
0
0
HTML写字板--gwrite

gwrite 是一个 HTML 格式的写字板, 有以下特性: HTML5 文档格式 标 准字处理器界面 以结构和样式为主导 支持以标题样式制作目录 类似 Word 的导航栏/文档结构图 可以在导航栏内双击或右键选...

匿名
2009/12/30
2.4K
0
Linux wc命令详解

通常利用Linux的wc命令和其他命令结合来计算行和其他信息。 在Linux下用wc进行计数。返回文件的行数、字数、字节数等。 看个例子: wc wc1.txt 3 5 16 wc1.txt 输出信息依次是:行数 字数 字...

晨曦之光
2012/03/09
197
0

没有更多内容

加载失败,请刷新页面

加载更多

下一页

用Python绘制红楼梦词云图,竟然发现了这个!

Python在数据分析中越来越受欢迎,已经达到了统计学家对R的喜爱程度,Python的拥护者们当然不会落后于R,开发了一个个好玩的数据分析工具,下面我们来看看如何使用Python,来读红楼梦,绘制小...

猫咪编程
11分钟前
0
0
Java中 发出请求获取别人的数据(阿里云 查询IP归属地)

1.效果 调用阿里云的接口 去定位IP地址 2. 代码 /** * 1. Java中远程调用方法 * http://localhost:8080/mavenssm20180519/invokingUrl.action * @Title: invokingUrl * @Description: * @ret......

Lucky_Me
34分钟前
1
0
protobuf学习笔记

相关文档 Protocol buffers(protobuf)入门简介及性能分析 Protobuf学习 - 入门

OSC_fly
昨天
0
0
Mybaties入门介绍

Mybaties和Hibernate是我们在Java开发中应用的比较多的两个ORM框架。当然,目前Mybaties正在慢慢取代Hibernate,这是因为相比较Hibernate而言Mybaties性能更好,响应更快,更加灵活。我们在开...

王子城
昨天
2
0
编程学习笔记之python深入之装饰器案例及说明文档[图]

编程学习笔记之python深入之装饰器案例及说明文档[图] 装饰器即在不对一个函数体进行任何修改,以及不改变整体的原本意思的情况下,增加函数功能的新函数,因为这个新函数对旧函数进行了装饰...

原创小博客
昨天
0
0
流利阅读笔记33-20180722待学习

黑暗中的生物:利用奇技淫巧快活生存 Daniel 2018-07-22 1.今日导读 如果让你在伸手不见五指的黑暗当中生存,你能熬过几天呢?而大千世界,无奇不有。在很多你不知道的角落,有些生物在完全黑...

aibinxiao
昨天
6
0
Hystrix降级逻辑中如何获取触发的异常

通过之前Spring Cloud系列教程中的《Spring Cloud构建微服务架构:服务容错保护(Hystrix服务降级)》一文,我们已经知道如何通过Hystrix来保护自己的服务不被外部依赖方拖垮的情况。但是实际...

程序猿DD
昨天
1
0
gin endless 热重启

r := gin.New()r.GET("/", func(c *gin.Context) {c.String(200, config.Config.Server.AppId)})s := endless.NewServer(":8080", r)s.BeforeBegin = func(add string) ......

李琼涛
昨天
1
0
JAVA模式之代理模式

平时一直在用spring,spring中最大的特效IOC和AOP,其中AOP使用的就是代理模式.闲着无聊,随手写了一个代理模式,也记录下代理模式的实现Demo. 比如现在有一个场景是:客户想要增加一个新的功能,...

勤奋的蚂蚁
昨天
0
0
ES15-JAVA API 索引管理

1.创建连接 创建连接demo package com.sean.esapi.client;import java.net.InetSocketAddress;import org.elasticsearch.action.get.GetResponse;import org.elasticsearch.clien......

贾峰uk
昨天
0
0

没有更多内容

加载失败,请刷新页面

加载更多

下一页

返回顶部
顶部