怎样等到一个字符的ASCII码
解决方案 »
- StringGrid显示问题
- For循环怎么变量不增加?
- delphi中一条语句看不懂,希望有人能解释一下.
- DLL相关:无法定位程序输入点bbb于动态链接库aaa.dll上?
- IdTCPClient 接收数据问题 Delphi 2010
- @@@请问在ACCESS2000如何实现这个SQL的JOIN连接查询?似乎比较难!…@@@
- 在adocommand里创建存储过程为什么不行?路过帮我看一看。
- 为什么会出现这种错误,不知道也来看看啊(up有分)
- 十万火急!!高手帮忙!!关于CHART控件
- 如何得知当前的月份呢?
- 散分,application.terminate的使用问题?
- ClientDataSet不能保存数据?
begin
showmessage(inttostr(ord('A')));
end;
uses Dialogs;
type Colors = (RED,BLUE,GREEN);var S: string;
begin
S := 'BLUE has an ordinal value of ' + IntToStr(Ord(BLUE)) + #10;
S := S + 'The ASCII code for "c" is ' + IntToStr(Ord('c')) + ' decimal';
MessageDlg(S, mtInformation, [mbOk], 0, mbOK);
end;
begin
showmessage(inttostr(ord('A')));
end;