原文链接:https://blog.csdn.net/Li_Ning_/article/details/82981092

/*
* 编号:Number 1
* 函数:substring
* 说明:截取AnsiString中字符串,即获取子串
*/
void __fastcall TMainForm::TestAnsiString1()
{
AnsiString str = "LINING"; //从第二位开始取,取够三位,得:"INI"
AnsiString retStr = str.SubString( , );
} /*
* 编号:Number 2
* 函数:Delete
* 说明:删除 AnsiString 中的一部分字符串
*/
void __fastcall TMainForm::TestAnsiString2()
{
AnsiString str = "LINING"; //从第二位开始,删够三位:得:"LNG"
AnsiString retStr = str.Delete( , );
} /*
* 编号:Number 3
* 函数:Insert
* 说明:在AnsiString 中插入字符串
*/
void __fastcall TMainForm::TestAnsiString3()
{
AnsiString str = "LINING";
AnsiString src = ""; //从三的位置开始插入 src 的:"LI123456NING"
AnsiString retStr = str.Insert(src, );
} /*
* 编号:Number 4
* 函数:[]
* 说明:取得 AnsiString 某一位字符
*/
void __fastcall TMainForm::TestAnsiString4()
{
AnsiString str = "LINING"; //获取第三个字符,得:"N"
AnsiString retStr = str[];
} /*
* 编号:Number 5
* 函数:Pos
* 说明:在AnsiString中寻找字符
*/
void __fastcall TMainForm::TestAnsiString5()
{
AnsiString str = "LINING"; //找到返回第一次找到的位置,找不到返回0
int result1 = str.Pos("N");
int result2 = str.Pos("NING");
} /*
* 编号:Number 6
* 函数:AnsiPos
* 说明:在 AnsiString 中找字符串:找字符 多用 Pos
*/
void __fastcall TMainForm::TestAnsiString6()
{
AnsiString str = "LINING"; //找到返回第一次找到的位置,找不到返回0
int result2 = str.AnsiPos("NING");
} /*
* 编号:Number 7
* 函数:AnsiLastChar
* 说明:取 AnsiString 里最后一个字符
*/
void __fastcall TMainForm::TestAnsiString7()
{
AnsiString str = "LINING"; //"G"
char *lstr = str.AnsiLastChar();
} /*
* 编号:Number 8
* 函数:AnsiString::StringOfChar
* 说明:相同字符重复输入
*/
void __fastcall TMainForm::TestAnsiString8()
{
//"GGGGGGGGGG"
AnsiString str = AnsiString::StringOfChar('G' , );
} /*
* 编号:Number 9
* 函数:AnsiCompare
* 说明:AnsiString 的字母比较:区分大小写
*/
void __fastcall TMainForm::TestAnsiString9()
{
AnsiString S1 = "LINING";
AnsiString S2 = "LINING"; //S1 > S2 > 0
//S1 < S2 < 0
//S1 = S2 = 0
int result = S1.AnsiCompare("LIING");
} /*
* 编号:Number 10
* 函数:AnsiCompareIC
* 说明:AnsiString 的字母比较:不区分大小写
*/
void __fastcall TMainForm::TestAnsiString10()
{
AnsiString S1 = "LINING";
AnsiString S2 = "LINING"; //S1 > S2 > 0
//S1 < S2 < 0
//S1 = S2 = 0
int result = S1.AnsiCompareIC(S2);
} /*
* 编号:Number 11
* 函数:SetLength
* 说明:取得字符串
*/
void __fastcall TMainForm::TestAnsiString11()
{
AnsiString str = "LINING"; //得: "LIN" 只要前三个
AnsiString retStr = str.SetLength();
} /*
* 编号:Number 12
* 函数:Length
* 说明:获取字符串长度
*/
void __fastcall TMainForm::TestAnsiString12()
{
AnsiString str = "LINING"; //得:6
int len = str.Length();
} /*
* 编号:Number 13
* 函数:TrimLeft、TrimRight、Trim
* 说明:去除 AnsiString 字符串中的空格
*/
void __fastcall TMainForm::TestAnsiString13()
{
AnsiString str = " LIN ING "; AnsiString str1 = str.TrimLeft(); //去左空格
AnsiString str2 = str.TrimRight(); //去右空格
AnsiString str3 = str.Trim(); //去两边空格
} /*
* 编号:Number 14
* 函数:LowerCase、UpperCase
* 说明:大小写转换
*/
void __fastcall TMainForm::TestAnsiString14()
{
//大写转小写
AnsiString test = "LINING";
AnsiString str1 = test.LowerCase(); //小写转大写
AnsiString test1 = "lining";
AnsiString str2 = test1.UpperCase();
} /*
* 编号:Number 15
* 函数:StringReplace (参数:TReplaceFlags、rfReplaceAll、rfIgnoreCase)
* 说明:字符串替换
*/
void __fastcall TMainForm::TestAnsiString15()
{
AnsiString str = "lining chi tu";
AnsiString from = "lining";
AnsiString to = "you"; //you chi tu
AnsiString result = StringReplace( str, from, to, TReplaceFlags() << rfReplaceAll << rfIgnoreCase );
} /*
* 编号:Number 16
* 函数:AnsiToUtf8
* 说明:转换为 UTF-8
*/
void __fastcall TMainForm::TestAnsiString16()
{
AnsiString strAnsi = "LINING"; //转换为utf-8
UTF8String sUtf8 = AnsiToUtf8(strAnsi);
} /*
* 编号:Number 17
* 函数:IsEmpty
* 说明:判空串
*/
void __fastcall TMainForm::TestAnsiString17()
{
AnsiString str = "LINING"; //是空返回true,非空返回 false
bool chk = str.IsEmpty();
} /*
* 编号:Number 18
* 函数:ByteType、mbSingleByte
* 说明:判断双字节
*/
void __fastcall TMainForm::TestAnsiString18()
{
AnsiString str = "李宁lining"; //从第 5 位置开始
if (ByteType(str ,) == mbSingleByte )
{
//0
//单字节字符串
}
else
{
//1
//双字节字符串
}
} /*
* 编号:Number 19
* 函数:c_str
* 说明:AnsiString 转 char*
*/
void __fastcall TMainForm::TestAnsiString19()
{
AnsiString str = "LINING"; char *chr = str.c_str(); // char* 到 AnsiString
AnsiString str2 = AnsiString(chr);
} /*
* 编号:Number 20
* 函数:bool 转 AnsiString
* 说明:BoolToStr
*/
void __fastcall TMainForm::TestAnsiString20()
{
AnsiString str = BoolToStr(true);
} /*
* 编号:Number 21
* 函数:StrToBool
* 说明:AnsiString to bool
*/
void __fastcall TMainForm::TestAnsiString21()
{
bool flag = StrToBool("");
} /*
* 编号:Number 22
* 函数:IntToStr
* 说明:int to AnsiString
*/
void __fastcall TMainForm::TestAnsiString22()
{
AnsiString str = IntToStr();
} /*
* 编号:Number 23
* 函数:StrToFloat
* 说明:AnsiString转double
*/
void __fastcall TMainForm::TestAnsiString23()
{
AnsiString str = "";
long double d = StrToFloat(str);
} /*
* 编号:Number 24
* 函数:FloatToStr
* 说明:double转AnsiString
*/
void __fastcall TMainForm::TestAnsiString24()
{
AnsiString str = FloatToStr(456.123);
} /*
* 编号:Number 25
* 函数:FloatToStrF
* 说明:double转AnsiString并四舍五入
*/
void __fastcall TMainForm::TestAnsiString25()
{
long double d = 123.456121212; //说明floattostrf里5代表从第几个数字的后一位开始四舍五入,4代表取4位小数
AnsiString str = FloatToStrF( d , ffNumber , , );
} /*
* 编号:Number 26
* 函数:FormatFloat
* 说明:格式化后转AnsiString
*/
void __fastcall TMainForm::TestAnsiString26()
{
double d = 123.456; AnsiString str = FormatFloat( "000000.00" , d ); //还有其他参数
} /*
* 编号:Number 27
* 函数:StringToColor
* 说明:字符串转颜色
*/
void __fastcall TMainForm::TestAnsiString27()
{
AnsiString test = "0x00ff8080"; tcolor col = StringToColor( test );
} /*
* 编号:Number 28
* 函数:ColorToString
* 说明:颜色转字符串
*/
void __fastcall TMainForm::TestAnsiString28()
{
tcolor col = 0x00ff8080; AnsiString str = ColorToString(col); }

AnsiString的更多相关文章

  1. PChar,PAnsiChar,String,AnsiString,Char数组,AnsiChar数组转换

    PChar,PAnsiChar,String,AnsiString,Char数组,AnsiChar数组之间的转换关系见下图 通过转换链,可以实现任意两个类型之间的互转.如PChar转PAnsiChar ...

  2. Delphi实现AnsiString与WideString的转换函数 转

    Delphi实现AnsiString与WideString的转换函数 分类: Delphi2013-01-26 16:23 460人阅读 评论(0) 收藏 举报 [delphi] view plain ...

  3. AnsiString 在 Delphi 中虽然不可用,但是,在 C++ 中可以用

    [C++] C++ Builder 中 Ansi 编码的字符串在Android/iOS程序中显示的问题 呃,这个问题说起来,其实也不麻烦,C++ Builder 本身在 TEncoding 做了处理, ...

  4. C++ builder 中AnsiString的字符串转换方法大全

    C++ builder 中AnsiString的字符串转换方法大全 //Ansistring 转 charvoid __fastcall TForm1::Button1Click(TObject *S ...

  5. AnsiString用法(转)

    源:AnsiString用法 //Ansistring 转 char void __fastcall TForm1::Button1Click(TObject *Sender) { AnsiStrin ...

  6. BCB中AnsiString类方法小结

    AnsiString类是BCB中最常见类之一,了解它对以后深入学习BCB大有帮助. 介绍AnsiString类之前,先要介绍一些背景知识.VCL(Visual Component Library 可视 ...

  7. AnsiString和String的区别、使用

    16.C/C++语言在CB中的一些特定用法 2)AnsiString是从Delphi中引进来的吗? 答:CB的核心组件VCL是用Object Pascal语言写出的,所以CB的VCL组件的属性有很多都 ...

  8. Delphi XE中String、ANSIString、TBytes之间的转换

    一.string转为ansistring1.直接赋值 (有警告)2.ansistring()类型强制转换.(无警告) 二.ansistring 转为string 1.直接赋值 (有警告)2.strin ...

  9. AnsiString和各种数据类型间相互转换 [数据转换]

    //Ansistring 转 char void __fastcall TForm1::Button1Click(TObject *Sender) { AnsiString Test = " ...

  10. String、ANSIString、PChar及TBytes之间的转换 BytesOf move stringof

    一.string转为ansistring 1.直接赋值 (有警告)2.ansistring()类型强制转换.(无警告) 二.ansistring 转为string 1.直接赋值 (有警告)2.stri ...

随机推荐

  1. go开发环境

    1.go 下载地址 https://studygolang.com/dl 根据操作系统 下载相应的安装包 2.设置环境变量 goroot gopath path 增加%goroot%\bin 3.开发 ...

  2. git 学习笔记 ---解决冲突

    人生不如意之事十之八九,合并分支往往也不是一帆风顺的. 准备新的feature1分支,继续我们的新分支开发: $ git checkout -b feature1 Switched to a new ...

  3. MySQL8.0 下载安装启动(Windows10)

    2019年6月13日20:13:21 MySQL8.0 下载安装启动(Windows10) 下载 下载地址:https://dev.mysql.com/downloads/mysql/8.0.html ...

  4. WebRTC 入门教程(二)| WebRTC信令控制与STUN/TURN服务器搭建

    WebRTC 入门教程(二)| WebRTC信令控制与STUN/TURN服务器搭建 四月 4, 2019 作者:李超,音视频技术专家.本文首发于 RTC 开发者社区,欢迎在社区留言与作者交流. htt ...

  5. ServiceStack JWT 准备

    ServiceStack JWT设置 ServcieStack 自带的验证授权模块使用 sql server存储,所以我们第一步需要配置数据库的一些选项 container.Register<I ...

  6. 基于xilinx Zynq UltraScale MPSoC平台的核心板及开发板介绍-米尔科技

    近日,米尔科技推出国内首款基于xilinx Zynq UltraScale+MPSoC 平台的核心板及开发板.其优势主要有:采用16纳米制程,相比Znyq7000系列每瓦性能提升5倍,且单芯片融合4核 ...

  7. 继续了解Java的纤程库 – Quasar

    前一篇文章Java中的纤程库 – Quasar中我做了简单的介绍,现在进一步介绍这个纤程库. Quasar还没有得到广泛的应用,搜寻整个github也就pinterest/quasar-thrift这 ...

  8. 如何使用Prometheus采集SAP ABAP Netweaver的应用日志数据

    Prometheus是一套开源的系统监控报警框架.它启发于Google的borgmon 监控系统,由工作在 SoundCloud 的 google 前员工在 2012 年创建,作为社区开源项目进行开发 ...

  9. C# EF框架 频繁连接性能损耗

    目的 测试EF框架在一次连接中多次保存和多次连接的耗时对比 测试环境 数据库SqlServer 2012 R2 EF框架6.2.0版本 数据库内容 ID UserName Password Creat ...

  10. java实现mysql数据备份

    /** * @param hostIP ip地址,可以是本机也可以是远程 * @param userName 数据库的用户名 * @param password 数据库的密码 * @param sav ...