我也不知道Delphi里有没有这种函数不过我刚刚写了一个函数,可以修改指定位置的字符或者字符串
function modiString(SourceString,modiString:String;StartIndex,endIndex:integer):String;
{SourceString 是原字符串,modiString指定位置修改后的字符或者字符串。StartIndex是修改的起始位置,EndIndex 是修改的结束位置,函数返回修改后的字符串}
begin
Delete(SourceString,StartIndex,(endIndex-StartIndex));
Insert(modiString,SourceString,StartIndex);
result:=SourceString;
end;调用举例:
begin Edit1.Text:='asdfghjkl';
Edit1.Text:=modiString(Edit1.Text,'q',3,4);end;
或者
begin Edit1.Text:='asdfghjkl';
Edit1.Text:=modiString(Edit1.Text,'qwe',3,6);end;
function modiString(SourceString,modiString:String;StartIndex,endIndex:integer):String;
{SourceString 是原字符串,modiString指定位置修改后的字符或者字符串。StartIndex是修改的起始位置,EndIndex 是修改的结束位置,函数返回修改后的字符串}
begin
Delete(SourceString,StartIndex,(endIndex-StartIndex));
Insert(modiString,SourceString,StartIndex);
result:=SourceString;
end;调用举例:
begin Edit1.Text:='asdfghjkl';
Edit1.Text:=modiString(Edit1.Text,'q',3,4);end;
或者
begin Edit1.Text:='asdfghjkl';
Edit1.Text:=modiString(Edit1.Text,'qwe',3,6);end;
解决方案 »
- 难道是系统问题(debugger kernel BORDBK.DLL is missing or not registered)
- 关于如何在程序里实现将SQL SERVE数据导出,然后还能够导入
- 关于sql触发器
- 请教各位delphi做报表,用什么控件比较好一点啊!
- 求多国语言控件,要支持字体。最好能自动提取资源。不要TsiLang,太大。
- 在我的Form有很多TEdit.我如果些他们的OnChange事件的话,要写很多。。。。。。
- 大家帮我看看这几本delphi的书哪本比较好?
- 救命啊!!局域网通信高手请进!高分求一方案的解决办法!
- 请问在 Database Desktop中,BLOB Binary类型的字段怎么修改?
- 使用Hook出了问题
- ***关于动态创建控件***
- MDIFORM問題,我的ChildForm顯示不出來?
可以!
thank you.