Edit1.text as Button1

dixiao4 2003-07-26 01:03:19
Edit1.text;
Button1.caption:='sdfsdf';
如何用,Edit1.text的值代劳Button1使其效果一样。
...全文
40 8 打赏 收藏 转发到动态 举报
写回复
用AI写文章
8 条回复
切换为时间正序
请发表友善的回复…
发表回复
  • 打赏
  • 举报
回复
TButton(FindComponent(Edit1.Text)).Caption := 'gfdgfhj';
lw549 2003-07-28
  • 打赏
  • 举报
回复
我也不明白楼主说的什么意思,“Edit1.text的值代劳Button1”怎么可能,一个是button,一个是字符串。
FrameSniper 2003-07-26
  • 打赏
  • 举报
回复
查找控件?楼主是这个意思吗?
李_军 2003-07-26
  • 打赏
  • 举报
回复
TButton(FindComponent(Edit1.Text)).Caption := 'gfdgfhj';
Eastunfail 2003-07-26
  • 打赏
  • 举报
回复
TEdit就是TEdit,TButton只是TButton.就好像狗长的再像人,他还是一条狗.没有人会因为它会说话而认为它是人.

智商无下限 2003-07-26
  • 打赏
  • 举报
回复
呵呵....
楼主的意思不是没表达清楚吧????
这么简单吗?
FrameSniper 2003-07-26
  • 打赏
  • 举报
回复
楼上的真笨,哈哈....JOKE!
简单死了!
Button1.Caption:=Trim(Edit1.Text);

其中Trim函数的作用就是去掉Edit1.Text两边可能出现的空格!
星星 2003-07-26
  • 打赏
  • 举报
回复
什么意思?

1,184

社区成员

发帖
与我相关
我的任务
社区描述
Delphi Windows SDK/API
社区管理员
  • Windows SDK/API社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧