level 3
要么告诉我怎么取文本框中的数字，然后让这个数加1也行，求高手
2016年07月07日 13点07分
吧务
level 14
看书
2016年07月07日 13点07分
3
吧主大人你好 那请问你有没有什么电子资料钟对我的问题，string类型我百度了可能我的问题很低级但是我就是没找到解决办法，我也没有实体书，我只想弄明白这个我完全没学过编程，网上找资料再学习好困难，可能对你们来说很简单，就帮帮我这个新手，怎么写的也告诉我吧谢谢。
2016年07月07日 23点07分
@富庶不失荆州1 看本吧精品贴
2016年07月08日 02点07分
吧主大人，想和你请教一个问题，ｄｅｌｐｈｉ里面泛类是可以继承的吗？
2016年07月23日 05点07分
我刚刚接触ｄｅｌｐｈｉ没多久，不太了解，我看ｄｅｌｐｈｉ好像是１５年才用的泛型 是吗？我没有找到有关怎继承方面的代码。可以指导一下吗![[哈哈]](/static/emoticons/u54c8u54c8.png)
？
2016年07月23日 05点07分
？
level 14
用Strtoint 和inttostr 这两个函数
2016年07月08日 03点07分
4
前面的0可能就没了
2016年07月09日 03点07分
层主正解，前面的0可以用rightstr('0'+s, 2)解决
2016年07月22日 13点07分
@leeoky188 虽然已解决,但是感谢你的回复 之前因为语法什么都没弄清怎么写的![[汗]](/static/emoticons/u6c57.png)
2016年07月23日 01点07分
level 3
level 10
function StrAdd(s1:String; s2:string) :String;
var
n1,n2: Integer;
begin
n1:= StrToInt(s1);
n2:= StrToInt(s2);
if (n1+n2) > 10 then
Result:= '0'+IntToStr(n1+n2)
else
Result:= IntToStr(n1+n2);
end;
2016年07月23日 04点07分
9
var
n1,n2: Integer;
begin
n1:= StrToInt(s1);
n2:= StrToInt(s2);
if (n1+n2) > 10 then
Result:= '0'+IntToStr(n1+n2)
else
Result:= IntToStr(n1+n2);
end;
是不是(n1+n2)<10的时候才要加0
2016年09月30日 23点09分
level 1