procedure TForm1.Button1Click(Sender: TObject);
var
? I:Integer;
const
? arr: array[0..1] of string = ('edit1為空', 'edit2為空');
begin

? for I := 0 to grp1.ControlCount - 1 do??? begin //grp1即為groupbox1
????? if grp1.Controls[i] is TEdit then
????? begin
??????? if (grp1.Controls[i] as TEdit).Text = '' then
??????? begin showmessage(arr[i]); end;
????? end;
? end; // for


end;

對于groupbox1中的edit1,2,3等等，賦值可用form1.edit.text這種方法

轉載于:https://www.cnblogs.com/Bubalus/archive/2011/03/03/2013699.html

創作挑戰賽新人創作獎勵來咯，堅持創作打卡瓜分現金大獎

總結

以上是生活随笔為你收集整理的判断groupbox中所有的edit是否为空，并给出空的哪个edit为空的全部內容，希望文章能夠幫你解決所遇到的問題。

如果覺得生活随笔網站內容還不錯，歡迎將生活随笔推薦給好友。