COPY(原字符串,开始的位置,取几个字符)=字符子串
解决方案 »
- DBGridEh的ftLookUp列的相关问题。
- 一个Edit的color是125,怎么把这个值分解成R,G,B,然后给R,G,B分别加上10,再把这R,G,B三个值组合起来给Edit赋值
- delphi7.0和delphi5.0相比有哪些不同,有什么优点呢?
- ClientDataSet中的数据怎么导出为db,或dbf,或ACESS,速度快就可以了
- D版的兄弟给指个路
- 如何使程序执行第二次时给出提示?
- 关于一个多线程的问题
- Quick Report中寫sql語句的問題????大家都過來看看,急盼回貼,我一定給分!!!
- 如何获得联在局域网上所以计算机的IP地址!
- 关于Delphi中调用Api函数修改系统时间
- 很简单的问题:如何打印?
- 请问一个简单的问题
pos
substr
看帮助
function RightStr(const AText: string; ACount: Integer): string;
function LeftStr(const AText: string; ACount: Integer): string;
procedure Delete(var S: string; Index, Count:Integer);
function RightStr(const AText: string; ACount: Integer): string;
function LeftStr(const AText: string; ACount: Integer): string;
procedure Delete(var S: string; Index, Count:Integer);
function RightStr(const AText: string; ACount: Integer): string;
function LeftStr(const AText: string; ACount: Integer): string;
结果是"Source"
例如
var a,b;string;
a;=‘sdfsdf’;
b:=copy(a,0,5)
b就是'sdfsd'了copy(a,0,5)中
0代表开始字符,
5代表所要取得字符