`
pascal4123
  • 浏览: 110487 次
  • 性别: Icon_minigender_1
  • 来自: 上海
社区版块
存档分类
最新评论

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

    博客分类:
  • GP
阅读更多
Delphi字符串、PChar与字符数组之间的转换

设有以下三个变量:
var
s:string;
p:pchar;
a:array[1..20] of char;
那么三者之间的转换如下:
1、字符串到PChar
    p:=PChar(s);
2、PChar到字符串
    s:=p;
3、PChar到字符数组
    StrCopy(@a,p);
4、字符数组到PChar
    PChar(@a);
5、字符串与字符数组之间的转换就只有通过PChar来中转了。例如下面这个例子:
procedure TForm1.btn1Click(Sender: TObject);
var
str:array[1..10] of char;
begin
StrCopy(@str,PChar(mmo1.Text));
mmo2.Text:=PChar(@str);
end
分享到:
评论

相关推荐

    在memo中查找字符串

    Buffer, P: PChar; Size: Word; begin Result := False; if Length(SearchString) = 0 then Exit; Size := Memo.GetTextLen; if (Size = 0) then Exit; Buffer := SysUtils.StrAlloc(Size + 1...

    Delphi中的字符与字符串.rar

    介绍了delphi中的Char、AnsiChar、WideChar、PChar和PWideChar,并且给出了测试工程代码。

    delphi 开发经验技巧宝典源码

    第5章 字符与字符串处理技术 99 5.1 ASCII码与编码转换 100 0150 如何获得汉字的区位码 100 0151 通过区位码获取汉字 100 0152 根据ASCII码获得字母 101 0153 获得字母的ASCII码 101 5.2 字符中的转换...

    delphi 开发经验技巧宝典源码06

    第5章 字符与字符串处理技术 99 5.1 ASCII码与编码转换 100 0150 如何获得汉字的区位码 100 0151 通过区位码获取汉字 100 0152 根据ASCII码获得字母 101 0153 获得字母的ASCII码 101 5.2 字符中的转换...

    自动匹配输入字符串

    P: PChar; begin Result := 0; if FData <> '' then begin P := PChar(FData); while P^ <> #0 do begin while P^ in ComplexSeperators do Inc(P); if P^ in ComplexCharacters then Inc(Result); ...

    delphi资源-MessageDLG

    MessageBox对话框是比较常用的一个信息对话框,其不仅能够... Text:欲显示的信息字符串。  Caption:对话框标题字符串。  Type:对话框类型常量。  该函数的返回值为整数,用于对话框按钮的识别。  2、类型常量

    Delphi 网络远程唤醒

    //Delete 是删除一个 字符串中的 某部分字符 //Delete(str, index, count) // str, //被删除的字符串 // index, //从第几个字符开始删除 // count //删除几个 //Delete(S, 2, 2); 就是从S中的第二个开始删除,...

    spcomm 3.0 for delphi2009 delphi2010

    spcomm 3.0 for delphi2009,delphi2010编译成功,安装成功. //接收字符串 var s:ansistring; begin SetLength(S, BufferLength); Move(Buffer^, PChar(S)^, BufferLength); //s中为接收到的字符串

    delphi Crc32 校验文件和字串

    delphi crc 校验 文件完整性 crc32 字串完整性 Crc32.pas 拿着就用 procedure TUpdate_Form.Button16Click(Sender: TObject); var CRC32 : DWORD ; begin ...//这里取指定字符串的CRC32校验值; end;

    delphi编程控制INI文件

    从.INI文件中获取字符串 var strResult:pchar; begin GetPrivateProfileString( 'windows', // []中标题的名字 'NullPort', // =号前的名字 'NIL', // 如果没有找到字符串时,返回的默认值 ...

    支付宝支付RSA签名,delphi7实现DLL及源码

    1、包含delphi7实现 rsa... // ftemp 待加密字符串,,fkeyfile 密钥文件路径, ftype 加密类型 1 rsa1 ,2 rsa256 function GetRSA(Ftemp:PChar;FkeyFile:PChar;Ftype:PChar):pchar; stdcall; 2 其他delphi 版本通用

    Delphi5开发人员指南

    5.9 消息与事件之间的关系 128 5.10 总结 129 第6章 代码标准文档 130 6.1 一般的源代码格式规则 130 6.1.1 缩进 130 6.1.2 边距 130 6.1.3 begin...end 130 6.2 Object Pascal 131 6.2.1 括号 131 6.2.2 保留字和...

    Delphi7中的消息框

    MessageBox方法的定义为: Function MessageBox(const Text,caption:PChar;...Text:在信息窗口中显示的文本字符串;Caption:在信息窗口的标题栏现实的文本字符串;Flags:在对话框窗体上显示的按钮。

    delphi调用tuxedo服务编写为dll详解

    如何编写dll,示例两个,一个是double参数的,一个是字符串pchar的传入传出的; 2。如何把调用tuxedo服务写成dll函数; 3。环境如何搭建的,如何进行调用的,例子很简单实用,细节描述也非常详细 绝对原创,7是我的...

    delphi调用外部EXE文件

    delphi怎样调用外部EXE文件 第一个参数为父窗口句柄; 第二个参数为打开方式(OPEN,PRINT两种); 第三个参数为执行文件全路径;...另外,如果为字符串参数,其中包含变量或运算的必需用PCHAR()函数。

    黄历日期DLL 组件 支持Delphi VC VB 完全免费

    返回类型:PChar字符串,以"/"分割 返回错误说明: invalid date:日期错误,有效范围1901-1-1至2099-12-31 License Key Error:授权密钥错误,请输入 zystudios.cn 本组件对于个人使用完全免费,请在使用过程中...

    Delphi网络公用函数

    //取以Delimiters分隔的字符串 bTrail如果为True则把第index个后的也取出来 function StrGetToken(const S: string; index: Integer; bTrail: Boolean = False; Delimiters: TSysCharSet = DEFAULT_DELIMITERS):...

    TRichView 15.1 FS

    从13.2版本开始,项目标签是字符串(Unicode for Delphi 2009或更高,ANSI老版本的Delphi),从整数到PChar无需类型转换! 64-bit 32-bit 和 64-bit编译器均支持RAD Studio XE2+。 注意: TRVOfficeConverter 可以...

    SPCOMM控件for Delphi

    dwSizeofDataToWrite:Word ): boolean 用于发送一个字符串到写线程,发送成功返回true,发送失败返回false, 执行此函数将立即得到返回值,发送操作随后执行。函数有两个参数,其中 pdatatowrite是要发送的字符串,...

Global site tag (gtag.js) - Google Analytics