初学者的问题~~大虾们能进来看看吗?谢谢
qq102 2002-10-13 02:20:19 我们这学期学校开了delphi的课程,用的是机械工业出版社编的《 dephli程序设计教程》,书上前面部分好象比较简单,都是一些小例子,可以照着做,但我知道delphi很高深的,进来这个论坛看看,几乎是没什么能看懂的,我该怎样学?
现在我在试着用delphi做一个计算器,可遇上的问题好象比较多,查书又查不到,问又不知道该如何问(因为太多了),就先问下面几个问题吧,谢谢了。
1)显示数据的edit1,为防止其他非法符号的录入,该怎样?
下面这段不完整,而且限制了运算符号的作用??
其中代表空格的#8这类的字符,该从哪里查到?应该有个对照表的吧
procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
var
l:boolean;
begin
l:=(key<#8)or(key>#8)and (key<#45)or(key>#46)and(key<#48)or(key>#57);
if l then key:=#0;
end;
2)这个是计算器‘1/x'按钮的程序,但不能解决,用过后,再按另一个数字,他自动清空,然后再用一次的问题。?????
procedure TForm1.Button15Click(Sender: TObject);
begin
if edit1.Text='' then edit1.Text:=''
else
edit1.text:=floattostr(1/strtofloat(edit1.Text));
3)我是想仿 windows自带的计算器,试着做一个,但现在只完成的基本的加减乘除的部分,象"sqrt","%"等按钮都没做好(问题太多了,都不好意思问了)。
大家有时间,就帮帮我吧,谢谢