delphi7
procedure TForm1.Button4Click(Sender: TObject);
var
s3:string;
begin
s3 := s3 + Char(181);
s3 := s3 + Char(231);
memo1.Text := s3;
end;
结果S3=‘电'delphi2010
结果S3=‘μ?'
不知道什么问题,哪位以前遇到过请说一下
procedure TForm1.Button4Click(Sender: TObject);
var
s3:string;
begin
s3 := s3 + Char(181);
s3 := s3 + Char(231);
memo1.Text := s3;
end;
结果S3=‘电'delphi2010
结果S3=‘μ?'
不知道什么问题,哪位以前遇到过请说一下
解决方案 »
- Class Tmyedit is not applicable to module 是什麼問題?
- 关于*.dbf文件的一个问题.....
- :如何利用Combobox显示多个字段内容?
- 用format取得2003-06-17 09:58:29.00的后面的时间!
- 树的遍历
- 如何在MEMO1中读取STRINGGRID被选择的数据?(或者提供一个类似 Tstringgrid 但又比它好的控件)
- 请问在delphi中如何用SQL查询符合此日期时间型字段(12/01/2002 04:00:00 AM)的记录?
- faltbutton的问题!为什么总会触发一个mouseleave的事件噢!?
- 大哥们,为什么我捕获不到按下的方向键?
- 怎样才能控制TDBGrid中字段列的宽度?
- 征求开发ERP建议
- 三层向导问题?
2010 是WideString可能有这个有关
改成以下
procedure TForm1.Button1Click(Sender: TObject);
var
s3:AnsiString;
begins3 := s3 + Ansichar(181);
s3 := s3 + Ansichar(231);
memo1.Text := s3;
end;