procedure TMainForm.TBSearchMouseMove(Sender: TObject; Shift: TShiftState;
X, Y: Integer);
begin
TBSearch.Hint:='搜索';*****
StatusBar1.Panels[0].Text:='搜索';
end;
[Error] tablet.pas(666): Illegal character in input file: ' ' ($A1A1)打星号的行。
第一我看不出任何错误,第二当我把TBSearch.Hint:='搜索';语句删除时,也就是一条空语句,还是出现上面的错误!??????????????
X, Y: Integer);
begin
TBSearch.Hint:='搜索';*****
StatusBar1.Panels[0].Text:='搜索';
end;
[Error] tablet.pas(666): Illegal character in input file: ' ' ($A1A1)打星号的行。
第一我看不出任何错误,第二当我把TBSearch.Hint:='搜索';语句删除时,也就是一条空语句,还是出现上面的错误!??????????????
解决方案 »
- 变量名的问题
- 求教!!!!Delphi中通过ExcelWorkSheet怎样实现拷贝一行?
- 如何禁止和启用dbgrid的鼠标双击事件?
- 怎么知道动态分配的数组里的元素个数,有没有bound之类的函数.
- 是Bitbtn的属性设置问题吗??在线等待!!!
- 怎么Jpeg1 : TJPEGIMAGE;变量定义通不过
- 帮我一下~!在线等.急~!
- 大家都來討論一下權根設置問題,有什么好的設計方案都貢獻出來
- 用TDbChart画折线图的坐标问题?
- 我想重载TEDIT类的onChange等消息处理函数,如何做?
- 谁能给我一个窗体闪现的例子
- 请问,如何解决接收到的电子邮件header部分subject是乱码的问题?
这是这些代码中含有一些隐藏delphi不支持的字符,这些代码可能是你从别的地方贴过来的;或者含有中文标点符号一类的delphi不支持的字符。
--------------------------------------------------------------------
看尽悲伤,庸人自扰不平事。叹尽荒凉,海阔天空谁人知。狂风劲兮,百花飘
扬乱舞香。捏花一笑,海不扬波断肠心!
beginTBSearch.Hint:='搜索';StatusBar1.Panels[0].Text:='搜索';end;
再修改:
begin
TBSearch.Hint:='搜索';*****
StatusBar1.Panels[0].Text:='搜索';
end;
應該沒問題!!!
你可以把这个过程删除掉,再重新手工输入一遍