1.Delphi如何将TEdit中的股票股票字符串赋给字节型数组

Delphi如何将TEdit中的字符串赋给字节型数组

       比较欣赏“股票2进制”的答复，但有错误和缺陷。源码源代

       1、软件将Edit.Text强制类型转换为Pointer，股票股票835内核源码恐怕不行，源码源代需要中引入一个string变量来干这个转换

       2、软件domain源码在哪看对于Delphi 以上，股票股票Length返回字符数，源码源代不是软件字节数，需要考虑兼容性

       3、股票股票CopyMemory是源码源代windows API函数，调用代价较高，软件为优化起见，股票股票画江湖问道源码应用delphi内置的源码源代Move

       4、SL命名不佳，软件像是飞机红包雷源码StringList，用abData得了

       总结，改写如下：

       var

        L : Integer;

        s : string;

        abData : array of Byte;

       begin

        s := Edit1.Text;

        // Delphi可用ByteLength，但其内部ByteLength就是海外任务平台源码Length*SizeOf(Char)，为保证多版本兼容性，自行将其展开书写了

        L := Length( s ) * SizeOf( Char );

        SetLength( abData, L );

        // 注意，Move的参数是先源后目标，与CopyMemory相反

        Move( s[1], abData[0], L );

        ......

        // 应该继续做点儿什么，否则end之际，动态数组自动销毁

       end;