问一个简单的问题：如何把string类型转换成byte类型？

问题点数：20、回复次数：1Top

1 楼newyj（吴刚ｖｓ西西弗）回复于 2001-11-22 10:44:36 得分 20

procedure   TForm1.Button1Click(Sender:   TObject);  
  var  
      s:string;  
      byt:array   of   byte;  
      i,iLen:integer;  
   
  begin  
      s:=   '43432432ere';  
      ilen:=length(s);  
      setlength(byt,iLen);  
      move(   pchar(s)^,byt[0],iLen);  
      s:='';  
      for   i:=0   to   iLen-1   do  
      begin  
          s:=s+chr(byt[i]);  
      end;  
      caption:=s;  
  end;  
  Top

相关问题

• 类型
• ilen
• byt
• byte
• begin

• 帖主：leijinhe
• newyj

• Delphi类图书
• Delphi类源码下载
• Delphi控件下载