Wird ausgelöst, wenn in einem ScriptControl eine Wertänderung durchgeführt wird.
Es wird der Name des Elementes und der Name der Wizard Seite auf der sich das Element befindet übergeben.

Signatur #

procedure ControlValidate(const ptPageName:String;const ptControlName:String);

Beispiel #

procedure ControlValidate(const ptPageName:String;const ptControlName:String);
Var lcCtrl:TWizardControl;
    lcPage:TPage;    
begin
  lcPage:=Wizard.Pages[ptPageName];
  lcCtrl:=lcPage.Controls[ptControlName];

  Wizard.BeginUpdate;
  Try
    if (lcPage.Name = 'tsSelect') then
    begin
      if (lcCtrl.Name = 'edFlightCode') then
      begin
        lcPage.Controls['edConsignee']['Filter']:='Type = 1';
        lcPage.Controls['edMasterAWB']['Visible']:=(Pos('CV',lcCtrl['Value']) = 1) ;
      end;
    end;
  Finally
    Wizard.EndUpdate;
  end;
end;