单击“转发”按钮,将第一个文本框内的数据以前后两位数的互换形式在第二个文本框内显示出来。
解决方案 »
- 卷土再来: Delphi中间件QuickBurro III发布在即
- Borland不行了!
- datagrid可以实现分页功能吗?
- 关于TClientDataSet排序问题!
- 如何实现用MODEM送歌曲
- 如何检测用户在输入框中输入的是不是数字
- 用什么组件能读取rtsp和mms文件上的文件?
- 赋值问题!
- 哪个大哥做过GHC715读写卡(磁卡)器的程序,给个源码看看.厂家给的是GHC715.DLL,说明如下
- 用delphi6做过web services的,进来看看,好吗?
- delphi中如何获得局域网指定计算机网卡的MAC地址(包括不是一个网段内的)?
- delphi5 中可以用什么算法代替Delphi2009中的for in 循环啊?
var
i:integer;
s:string;
begin
s := Edit1.Text;
i := length(s);
if i>1 then
Edit2.Text := copy(s,i-1,1) + copy(s,2,i-2) + copy(s,1,1);
////
end;