delphi怎么获取字符串之间多个字符内容?
Posted
tags:
篇首语:本文由小常识网(cha138.com)小编为大家整理,主要介绍了delphi怎么获取字符串之间多个字符内容?相关的知识,希望对你有一定的参考价值。
参考技术A delphi怎么获取字符串之间多个字符内容? delphi 如何循环获取网页源码中两个字符串之间的内容,并写入数组function GetStr(Str,StrBegin,StrEnd,strxunhuan:string;Isxunhuan :Boolean = false):string;
str 全部文本
StrBegin :开始文本
StrEnd :结束文本
返回 :开始文本和结束文本之间的文本内容
isxunhuan(数组) : false(默认)的话不循环获取,true的话循环获取 (可不输入)
这类任务建议使用正则表达式来完成。
type
TForm1 = class(TForm)
Edit1: TEdit;
Edit2: TEdit;
Memo1: TMemo;
Memo2: TMemo;
Button1: TButton;
procedure Button1Click(Sender: TObject);
private
Private declarations
public
Public declarations
end;
var
Form1: TForm1;
implementation
$R *.dfm
procedure StrSplite(AStr,ASBegin,ASEnd:string;AStrings:TStrings;AIsXunHun:Boolean=True);
var
iB,iE:Integer;
s:string;
begin
iB:=Pos(ASBegin,AStr);
if iB>0 then
begin
iE:=Pos(ASEnd,AStr);
if iE>0 then
begin
iB:=iB+length(ASBegin);
s:=Copy(AStr,iB,iE-iB);
AStrings.Add(s);
if AIsXunHun then
begin
AStr:=Copy(AStr,iE+length(ASEnd),length(AStr));
StrSplite(AStr,ASBegin,ASEnd,AStrings,AIsXunHun);
end;
end;
end;
end;
procedure TForm1.Button1Click(Sender: TObject);
begin
Memo2.Clear;
StrSplite(Memo1.Text,edit1.Text,edit2.Text,Memo2.Lines,True);
end;
在一堆字符串中,获取两个字符串之间的内容呢?
比如这个么一个字符串 IndexOf——定位字符串中第一次出现某个给定字符串的位置 PadLeft和PadRight——在字符串的开始和结尾用指定的字符填充字符串 ToLower和ToUpper把字符串转换为小写或大写形式 Trim——删除首尾空白 String.Replace——用指定的字符替换字符串中的指定字符。
java怎么获取字符串中第i个字符
截取#之前的字符串
String str = "sdfs#d";
str.substring(0, str.indexOf("#"));
输出的结果为:sdfs
indexOf返回的索引也是从0开始的,所以indexOf("#") = 4。
java中的substring的第一个参数的索引是从0开始,而第二个参数是从1开始
java 怎么获取字符之间的字符串
大概的思路是:
1、使用indexOf获取两个字符串的索引位置。
2、使用subString截取两个字符之间的字符串,参数来源于上面取到的两个索引位置。
python怎么获取字符串有多少个字符
>>> str1 = "1234567990">>> len(str1)10>>> 使用内置的len()函数。
c++中获取字符串首个字符的方法
char * string1="my test string!"
char c1=string1[0];
c1就是string1的首个字符。
Java中怎么获取字符串里面的单个字符?
方法有很多种。
随便一种:
String a= "中国人";
char b=a.charAt(0);
System.out.println(b);
如何获取字符串中的一个字符c++
可以用索引的吧,string 对象 str="hello world!" str[1]='e'
VB中如何获取字符串取最前面的3个字符和最后3个字符
Private Sub Command1_Click()
a = Left(Text1.Text, 3)
b = Right(Text1.Text, 3)
End Sub
求教awk两个字符之间截取字符串的方法
假设有字符串:
str="abcdefg"
要截取c和f之间的字符串,得到de。
可以用split函数,以c和f为分隔符,将字符串分割,取分割后的第二个字段。
echo "$str" | awk 'split($0,a,"[cf]");print a[2]'
另一种方法,也可以分别计算出c和f在字符串中的位置,然后根据截取字符串的起始位置(c的位置+1)和截取长度(f的位置-c的位置-1),用substr函数来得到截取后的字符串。
echo "$str" | awk 'a=index($0,"c");b=index($0,"f");print substr($0,a+1,b-a-1)'
sed也可以做:
echo "$str" | sed -r 's/.*c(.*)f.*/\1/'
jquery 在一段字符串中匹配多个结果,怎么取得最后一个匹配的结果
比如一个文字,其中有多个email地址,现在我只想用正则获取最后一个email,请问怎么获得?
全局匹配,其实得到的结果是一个数组(捕获组),你再拿到这个数组,取到最后一个下标,就是最后一个匹配。不信你console.log试试。 参考技术A 把结果内容发出来,我看看。以上是关于delphi怎么获取字符串之间多个字符内容?的主要内容,如果未能解决你的问题,请参考以下文章