如题:
for i:=0 to length(str1) do
begin
s:=copy(str1,i,1); //取字符串中每一个字符
//将s转化为char怎样写?
end;
for i:=0 to length(str1) do
begin
s:=copy(str1,i,1); //取字符串中每一个字符
//将s转化为char怎样写?
end;
解决方案 »
- 请问怎么实现从粘贴板粘贴图片(JPEG格式)到Image 中
- 请问如何在程序中关闭用showmessage打开的对话框
- 如何知道程序是否处理运行状态
- 请教关于接口的理解
- 我用这个函数 PlaySound 提示 “Undeclared identifier: 'PlaySound'” 是不是还要加载某个文件
- BDE连sqlserver发布的问题,高手指点
- 救命呀,重金悬赏,有关delphi取地址的问题。-------载线等待
- 请问哪里可以下载installshield专业版5.5?
- 关于StringGrid的显示,高分相求
- 大家帮我!怎样编写数据库驱动程序(那种都行),能读取原有驱动程序信息的也行!
- 怎样对文本文件进行读写操作?
- 不难的问题
c:char;
s:string;
begin
s:='abcdefg';c:=s[1]; //c:='a'
c:=s[2]; //c:='b'
c:=s[3]; //c:='c'end;