registrationwithserial.dfm.miaf

来自「source code for Marco Cantu s book Delph」· MIAF 代码 · 共 15 行

IF (Name.Text <> )  THEN  Next.Enabled := True;
IF (Company.Text <> )  THEN  Next.Enabled := True;
IF (Serial1.Text <> )  THEN  Next.Enabled := True;
IF (Serial2.Text <> )  THEN  Next.Enabled := True;
IF (Serial3.Text <> )  THEN  Next.Enabled := True;
IF (Serial4.Text <> )  THEN  Next.Enabled := True;
IF (Serial5.Text <> )  THEN  Next.Enabled := True;
IF (Name.Text = )  THEN  Next.Enabled := False;
IF (Company.Text = )  THEN  Next.Enabled := False;
IF (Serial1.Text = )  THEN  Next.Enabled := False;
IF (Serial2.Text = )  THEN  Next.Enabled := False;
IF (Serial3.Text = )  THEN  Next.Enabled := False;
IF (Serial4.Text = )  THEN  Next.Enabled := False;
IF (Serial5.Text = )  THEN  Next.Enabled := False;