meno1:5F,22,95,81,95,56,23,9B,7D,08,13,FB,A9,08,F1,98,58,CB,07,46,61,FA,CD,1F,C7,C8,AC,FE,B7,B6,0B,7E,CA,86,C3,91,12,91,E0,D4,09,16,74,A4,DF,0C,D7,D3,31,29,32,20,62,5B,4E,21,28,E2,0F,87,ED,A9,46,C3,2B,78,34,C5,B6,73,EF,28,76,42,E7,36,46,76,30,85,CD,4A,1D,C9,7C,66,3A,E5,69,43,27,C4,A9,1B,F9,7B,BC,50,E5,BD,2F,F0,58,AA,5B,CF,17,08,4A,5D,63,44,61,75,72,4C,2B,4D,CA,79,AB,82,87,13,A4,FD,D9,4D,0C,B9,A8,85,99,3D,00,80,00,1B,F2,BE,7B,84,96,7F,19,76,9D,C1,F0,84,A6,23,4B,4B,D5,D3,6E,E9,E1,8E,86,23,86,D9,6A,D8,D2,9F,85,1F,B5,73,6C,F9,45,01,57,AD,00,82,35,13,F8,F8,B3,22,D9,60,6F,AA,40,AD,98,CC,4F,04,54,FC,C5,83,AB,89,72,EF,92,F7,64,72,1B,96,6C,71,2E,6C,8B,F6,64,AA,52,67,9A,7E,50,B9,D3,2B,25,D5,81,A3,F8,18,2B,AE,C8,E7,8B,49,EF,F0,DF,A9,F4,D0,14,47,40,0D,5C,95,79,7D,48,0A,FD,43,25,D2,06,0D,0A,22,83,76,C5,CA,2E,DA,98,2E,B1,82,F1,B1,E1,DF,4D,8B,63,5B,B8,C5,51,A3,59,44,47,ED,B4,10,18,B3,1C,3B,FD,5E,15,D6,AB,32,04,6D,27,80,65,2E,50,44,98,CC,3C,17,96,FF,54,4A,DA,5A,24,9F,45,70,E4,ED,EF,A9,E2,A3,B1,41,1C,5B,53,0F,61,F7,6A,A4,25,EE,FC,46,71,E0,D8,AB,94,C3,B3,32,22,BB,A2,96,F2,6F,6E,B6,4E,D0,27,69,29,C1,2C,98,33,8C,3F,B4,FE,2B,E9,C3,25,EB,9E,92,8A,F5,8E,64,A8,08,57,1D,C2,6B,A8,0F,96,20,DE,0C,E6,E7,F9,D7,E2,F7,6B,DA,9F,39,15,53,10,B3,9A,1D,C3,47,BC,8E,51,0F,BC,76,5C,63,63,1F,0B,1F,6C,25,B4,41,40,A6,7D,B7,2E,85,B6,47,2D,EE,84,8D,2C,9E,FB,FF,04,8A,FA,EF,1C,BD,78,C5,E7,A6,00,9D,2D,22,54,BC,8A,5C,65,9C,32,06,70,11,E5,51,71,DF,95,04,A9,F1,F0,3A,EF,33,02,C6,10,45,31,C8,B6,01,6C,28,E8,43,33,6B,49meno2:
'5F,22,95,81,95,56,23,9B,7D,08,13,FB,A9,08,F1,98,58,CB,07,46,61,FA,CD,1F,C7,'+
'C8,AC,FE,B7,B6,0B,7E,CA,86,C3,91,12,91,E0,D4,09,16,74,A4,DF,0C,D7,D3,31,29,'+
'32,20,62,5B,4E,21,28,E2,0F,87,ED,A9,46,C3,2B,78,34,C5,B6,73,EF,28,76,42,E7,'+
'36,46,76,30,85,CD,4A,1D,C9,7C,66,3A,E5,69,43,27,C4,A9,1B,F9,7B,BC,50,E5,BD,'+
'2F,F0,58,AA,5B,CF,17,08,4A,5D,63,44,61,75,72,4C,2B,4D,CA,79,AB,82,87,13,A4,'+
'FD,D9,4D,0C,B9,A8,85,99,3D,00,80,00,1B,F2,BE,7B,84,96,7F,19,76,9D,C1,F0,84,'+
'A6,23,4B,4B,D5,D3,6E,E9,E1,8E,86,23,86,D9,6A,D8,D2,9F,85,1F,B5,73,6C,F9,45,'+
'01,57,AD,00,82,35,13,F8,F8,B3,22,D9,60,6F,AA,40,AD,98,CC,4F,04,54,FC,C5,83,'+
'AB,89,72,EF,92,F7,64,72,1B,96,6C,71,2E,6C,8B,F6,64,AA,52,67,9A,7E,50,B9,D3,'+
'2B,25,D5,81,A3,F8,18,2B,AE,C8,E7,8B,49,EF,F0,DF,A9,F4,D0,14,47,40,0D,5C,95,'+
'79,7D,48,0A,FD,43,25,D2,06,0D,0A,22,83,76,C5,CA,2E,DA,98,2E,B1,82,F1,B1,E1,'+
'DF,4D,8B,63,5B,B8,C5,51,A3,59,44,47,ED,B4,10,18,B3,1C,3B,FD,5E,15,D6,AB,32,'+
'04,6D,27,80,65,2E,50,44,98,CC,3C,17,96,FF,54,4A,DA,5A,24,9F,45,70,E4,ED,EF,'+
'A9,E2,A3,B1,41,1C,5B,53,0F,61,F7,6A,A4,25,EE,FC,46,71,E0,D8,AB,94,C3,B3,32,'+
'22,BB,A2,96,F2,6F,6E,B6,4E,D0,27,69,29,C1,2C,98,33,8C,3F,B4,FE,2B,E9,C3,25,'+
'EB,9E,92,8A,F5,8E,64,A8,08,57,1D,C2,6B,A8,0F,96,20,DE,0C,E6,E7,F9,D7,E2,F7,'+
'6B,DA,9F,39,15,53,10,B3,9A,1D,C3,47,BC,8E,51,0F,BC,76,5C,63,63,1F,0B,1F,6C,'+
'25,B4,41,40,A6,7D,B7,2E,85,B6,47,2D,EE,84,8D,2C,9E,FB,FF,04,8A,FA,EF,1C,BD,'+
'78,C5,E7,A6,00,9D,2D,22,54,BC,8A,5C,65,9C,32,06,70,11,E5,51,71,DF,95,04,A9,'+
'F1,F0,3A,EF,33,02,C6,10,45,31,C8,B6,01,6C,28,E8,43,33,6B,49';                
                                                                              

解决方案 »

  1.   

    你的意思是要把字符串当语句来执行是吧?
    delphi是不支持VF的宏命令一样的语句。你必须分析memo2的字符串,重新编排成语句来执行。
      

  2.   

    不是。是排列meno1,是不分行。一路过去我想按meno2那样排列出来
      

  3.   

    memo的最后一个属性wordwrap:=false;
      

  4.   

    这个设置要做,再就是字符中定长载取,并加上引号和加号及换行符了。
    用while  大于定长 do 配合copy delete就可以完成了。