社区
Delphi
帖子详情
如何清除一个窗体上所有的Edit.Text的内容
Linux2001
2002-01-15 03:12:34
...全文
163
12
打赏
收藏
如何清除一个窗体上所有的Edit.Text的内容
复制链接
扫一扫
分享
转发到动态
举报
AI
作业
写回复
配置赞助广告
用AI写文章
12 条
回复
切换为时间正序
请发表友善的回复…
发表回复
打赏红包
yxjjx
2002-01-17
打赏
举报
回复
老兄这样对不对?
yxjjx
2002-01-17
打赏
举报
回复
tedit(groupbox.controls[i]).text:=''
不好意思这里少了一个括号
yxjjx
2002-01-17
打赏
举报
回复
var i:integer
begin
for i:=0 to groupbox.controlcount-1 do
if groupbox.controls[i] is tedit then
tedit(groupbox.controls[i].text:='';
end;
这样试试吧
hellion
2002-01-17
打赏
举报
回复
看看第一个回复,需要递归
Linux2001
2002-01-17
打赏
举报
回复
我的EDit控件是在GroupBox控件中的,我用了以上的方法,没有清空任何一个Edit啊
alec_ma
2002-01-15
打赏
举报
回复
对了
武稀松
2002-01-15
打赏
举报
回复
for i:=0 to (Self.ControlCount-1) do
begin
if Self.Controls[i] is TEdit then
(Self.Controls[i] as TEdit).Text:='';
或
TEdit(Self.Controls[i]).Text:='';
end;
genedna
2002-01-15
打赏
举报
回复
var
I : Integer;
begin
for I := 0 to Form1.ComponentCount-1 do
if (Component[I] is TEdit) then
(Component[I] as TEdit).Text := '';
end;
stiwin
2002-01-15
打赏
举报
回复
find as tedit
fshrq
2002-01-15
打赏
举报
回复
for i:=1 to n do
form1.findcomponent('edit'+inttostr(i)) as tedit).text:='';
iBear
2002-01-15
打赏
举报
回复
用窗体的Components属性遍历,如果是edit就clear
hellion
2002-01-15
打赏
举报
回复
利用Components属性,若Form中有其它容器,需要递归
delphi xe3 子
窗体
给父
窗体
的label 控件设置值
**步骤1:** 创建子
窗体
ChildForm,并添加
一个
按钮(Button1)和
一个
Edit
框(
Edit
1)。
Edit
1用于输入要传递的数据,Button1用于触发事件。 **步骤2:** 在ChildForm的Button1的`OnClick`事件处理程序中编写代码,...
edit
输入的使用方法
上面的代码示例展示了如何在
窗体
加载时初始化 `
Edit
` 控件的文本
内容
为空字符串,并将焦点设置到 `
Edit
1` 上,同时禁用 `Button2`。 ##### 2.2 密码输入与验证 为了实现密码输入功能,我们需要使用 `OnKeyPress` ...
delphi
窗体
与组件的使用的代码实例
-
窗体
是Delphi应用程序的主要工作区,它代表了程序中的
一个
屏幕视图。 - 在Delphi中,
窗体
是由` TForm `类或其派生类定义的。开发者可以添加属性、方法和事件来定制
窗体
的行为。 - 可以通过`DFM`(Delphi Form)...
delphi_悬浮窗口
function SetLayeredWindowAttributes... if
Edit
1.
Text
= '' then begin ShowMessage('透明度不能为空!');
Edit
1.SetFocus;
edit
1.SelectAll; Exit; end; //设置透明度 SetTMD(StrToInt(
Edit
1.
Text
)); end;
简单登录小
窗体
(delph)
在Delphi编程环境中,创建
一个
简单的登录
窗体
是学习Delphi基础的好方法。这个"简单登录小
窗体
"示例将帮助你理解如何利用Delphi的可视化组件来设计用户界面,以及如何处理用户输入和验证登录信息。让我们深入探讨这个...
Delphi
5,928
社区成员
262,931
社区内容
发帖
与我相关
我的任务
Delphi
Delphi 开发及应用
复制链接
扫一扫
分享
社区描述
Delphi 开发及应用
社区管理员
加入社区
获取链接或二维码
近7日
近30日
至今
加载中
查看更多榜单
社区公告
暂无公告
试试用AI创作助手写篇文章吧
+ 用AI写文章