请将下面的句子用DELPHI转换一下(vb)
aa="123456"
text=asc(mid(aa,3,1))
aa="123456"
text=asc(mid(aa,3,1))
解决方案 »
- 公司计划换用C#了,如果你是技术总监你是培训公司的delphi程序员,还是开掉这些人再招C#人
- 为什么当WINDWOS发生内存不能 read的时候,DELPHI就会自动进行调试呢?
- 请问谁有infopower 4000的使用教程,不是ip4000的帮助文件
- listview怎样刷新
- 急需DBGrid的打印解决方案!
- 怎样写dll返回一个结构体给vb(delphi写动态库,vb调用,返回结构体)
- 求ZEBRA 105SE条码打印机 delphi的控制 demo,有源程序,急!!!在线等待!!!
- 想不出为什么会这样,(update语句的语法错误)~!
- 一个不懂英语的程序员
- 替换 VCL
- 请问那里有关于 indy 的资料呀!(急呀)
- 如何判断一个字符串中的第一个字符是0--9之间的数字????
text:integer;
begin
test:=ord(copy(aa,3,1));
end;
i: integer;
aa: string;
begin
aa="123456";
for i:=0 to length(aa) do
edit1.text := edit1.text +inttostr(Dword(aa[i])) +'|';
end;