21 lines
1.1 KiB
Plaintext
Executable File
21 lines
1.1 KiB
Plaintext
Executable File
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;
|
|
IF (Glass.Caption <> TRUE) THEN Separator.Visible := True;
|
|
IF (Glass.Caption <> TRUE) THEN InstallAware.Visible := True;
|
|
IF (Glass.Caption = TRUE) THEN Install.Visible := True;
|
|
IF (Glass.Caption = TRUE) THEN Separator.Visible := False;
|
|
IF (Glass.Caption = TRUE) THEN InstallAware.Visible := False;
|
|
IF (Glass.Caption <> TRUE) THEN Install.Visible := False;
|