关于DELPHI数组，指针，字符串转换的例子!(转)

var
   aa:   array [0..5] of Char;
   bb:Pointer;
   cc:string;
   dd:PChar;

procedure TForm1.Button1Click(Sender: TObject);
begin

dd:=‘abcdef‘;
//以下是pchar内容转数组
FillChar(aa,length(dd),#0);
Move(dd^,aa,SizeOf(aa));

//以下是数组传递到指针
bb:=GetMemory(SizeOf(aa));
Move(aa,bb^,SizeOf(aa));

//以下是指针内容传递给字符串
SetLength(cc,SizeOf(aa));
Move(bb^,cc[1],SizeOf(aa));

FreeMemory(bb);//这个是释放内存

//以下是数组转pchar
dd:=‘‘;
dd:=PChar(@aa);

MessageBox(0,PChar(‘cc: ‘+cc),PChar(‘dd: ‘+dd),0);

end;

关于DELPHI数组，指针，字符串转换的例子!(转),布布扣,bubuko.com

时间： 2024-10-10 02:09:15

关于DELPHI数组，指针，字符串转换的例子!(转)的相关文章

DELPHI数组，指针，字符串转换的例子

关于数组,指针,字符串转换的例子 var aa: array [0..5] of Char; bb:Pointer; cc:string; dd:PChar; procedure TForm1.Button1Click(Sender: TObject);begindd:='abcdef'; //以下是pchar内容转数组FillChar(aa,length(dd),#0);Move(dd^,aa,SizeOf(aa)); //以下是数组传递到指针bb:=GetMemory(S

数组-08. 字符串转换成十进制整数(15)

1 #include<iostream> 2 #include<string> 3 using namespace std; 4 int main(){ 5 string s; 6 int i,sum=0; 7 bool flag=false,f=false; 8 getline(cin,s); 9 for(i=0;s[i]!='#';++i){ 10 if(s[i]=='-'&&!flag) 11 f=true; 12 else if(s[i]<='9'&a

数组-08. 字符串转换成十进制整数

数组-08. 字符串转换成十进制整数(15) 时间限制 400 ms 内存限制 65536 kB 代码长度限制 8000 B 判题程序 Standard 作者张彤彧(浙江大学) 输入一个以#结束的字符串,本题要求滤去所有的非十六进制字符(不分大小写),组成一个新的表示十六进制数字的字符串,然后将其转换为十进制数后输出.如果过滤后字符串的首字符为“-”,代表该数是负数. 输入格式: 输入在一行中给出一个以#结束的非空字符串. 输出格式: 在一行中输出转换后的十进制数.题目保证输出在长整型范围内.

数组，字符串转换。

//字符串转换成数组. String string = "a,b,c"; String [] stringArr= string.split(","); for(int i=0;i<3;i++) System.out.println(stringArr[i]); //字符数组转换成int型数组. char chArray[]={'1','2','3'}; int []Array=new int[3]; for(int i=0;i<3;i++){ Arra

php byte数组与字符串转换类

<?php /** * byte数组与字符串转化类 * @author ZT */ class Bytes { /** * 转换一个string字符串为byte数组 * @param $str 需要转换的字符串 * @param $bytes 目标byte数组 */ public static function getbytes($str) { $len = strlen($str); $bytes = array(); for($i=0;$i<$len;$i++) { if(ord($str

数组和字符串转换

var t= []; var s = ""; $('#searchtb tr').find('td').each(function () { t.push($(this).text()); s = t.join(""); //转换为字符串 t = s.split(':'); //转换为数组 t.pop(); //删除数组最后一个元素 s = t.join(&quo

Delphi字符串、PChar与字符数组之间的转换

来自:http://my.oschina.net/kavensu/blog/193719 ----------------------------------------------------------------- var s: string; p: pchar; a: array[1..20] of char; 1.字符串 ---> PChar p := PChar(s); 2.PChar ---> 字符串 s := p; 3.PChar ---> 字符数组 StrCopy(@a

比较C/C++和Delphi中的字符串和字符数组（数组和动态分配内存的情况）

本文所讲解的只是从其中一个方面来看待进行的总结,所以有必要结合<Delphi字符串与字符数组之间的转换(初始化的重要性)>等文章进行更全面的了解,会从更多方面来理解字符串.内存.类型转换 C/C++中的字符串.字符数组.字符指针分配的内存空间我们知道在C/C++中,我们可以这样理解字符串和字符数组 1)字符串,就是一个以 '\0' 结尾的字符数组 2)字符数组,包括字符串,但是不一定要以 '\0' 结尾,如果不是以'\0' 结尾,那么就不能当做字符串使用在C/C++中,使用字符串可以通过数

vc字符串转换处理：（绝对精华，收集所有的例子）

vc字符串转换处理:(绝对精华,收集所有的例子) 1.头文件中要定义宏; #define UNICODE #define _UNICODE //////////////////// char buf[128]; memset(buf,0,128); strcpy(buf,"你好"); WCHAR pCName[128]; memset(pCName,0,128); MultiByteToWideChar(CP