字符串内容如下:
{Type=0~Id= 153~Name=胆囊长径~Text=胆囊长径~Unit=mm~Value=52} ,{Type=0~Id= 154~Name=胆囊前后径~Text=前后径~Unit=mm~Value=18} ,{Type=0~Id= 71~Name=胆囊壁厚~Text=胆囊壁厚~Unit=mm~Value=7}。胆囊大小、形态正常,胆囊壁不光滑,胆囊腔内可见多个强回声光团,{Type=0~Id= 566~Name=最大~Text=最大~Unit=mm~Value=6*6},后伴声影,可移动.要达到的效果是这样子:
胆囊长径52mm ,胆囊前后径18mm ,胆囊壁厚7mm。胆囊大小、形态正常,胆囊壁不光滑,胆囊腔内可见多个强回声光团,最大6*6mm,后伴声影,可移动.该如何编写代码才能达到这个效果,注意的是Id=后头的数字位数,Name=和Unit=的字符位数是不定的.急啊,高手们都来看啊
{Type=0~Id= 153~Name=胆囊长径~Text=胆囊长径~Unit=mm~Value=52} ,{Type=0~Id= 154~Name=胆囊前后径~Text=前后径~Unit=mm~Value=18} ,{Type=0~Id= 71~Name=胆囊壁厚~Text=胆囊壁厚~Unit=mm~Value=7}。胆囊大小、形态正常,胆囊壁不光滑,胆囊腔内可见多个强回声光团,{Type=0~Id= 566~Name=最大~Text=最大~Unit=mm~Value=6*6},后伴声影,可移动.要达到的效果是这样子:
胆囊长径52mm ,胆囊前后径18mm ,胆囊壁厚7mm。胆囊大小、形态正常,胆囊壁不光滑,胆囊腔内可见多个强回声光团,最大6*6mm,后伴声影,可移动.该如何编写代码才能达到这个效果,注意的是Id=后头的数字位数,Name=和Unit=的字符位数是不定的.急啊,高手们都来看啊
解决方案 »
- 如何取出clientdataset中被修改的数据
- (急)DLL封装ADO操作的超级问题!
- DSPack与IdCmdTCPClient使用的问题
- 请问哪位兄弟搞过超市那种小票打印程序,知道用FastReport宽度和高度怎么定义吗?
- 请大家多多帮忙:一个提示入口出错的问题
- 庆祝DELPHI跟VB都4个裤衩,散几个。------长头发的男生
- 我在adotable控件的Beforedelete事件中想防止用戶刪除記錄,但下面的語句不管用!
- 有沒有什麼工具可以使圖標佔用的空間最小,如壓縮成某種格式?
- Dock
- 关于dbgrid的问题,很简单的!!
- 【求助】如何生成RTF格式的文件?
- ClientDataSet1的afterpost为何没有执行
循环数组
{ A=取每个数组元素中“Text=”后的“~”前的字符
B=取每个数组元素中“Value=18”后的“}”前的字符
输出值=输出值+","+A+B
}
分段截取{}之间的字符保入数组
循环数组
{ a=取每个数组元素中“Text=”后的“~”前的字符
c=取每个数组元素中“Value=”后的“}”前的字符
b=取每个数组元素中“Unit=”后的“~”前的字符
输出值=输出值+","+a+b+c
}