Wird individuell von einem ScriptControl ausgelöst wenn über die normalen Ereignisse hinaus Meldungen an das Script übergeben werden sollen.
Es wird der Name des Elementes, der Name der Wizard Seite, der Name einer Information und ein Wert übergeben. Der Wert kann je nach Kontext auch verändert zurückgegeben werden.
Signatur #
procedure ControlValidate(const ptPageName:String;const ptControlName:String);
Beispiel #
procedure ControlAdditional(const ptPageName:String;const ptControlName:String;const ptName:String;Var pvValue:Variant);
Var lcPage:TPage;
lcCtrl:TWizardControl;
begin
lcPage:=Wizard.Pages[psPageName];
lcCtrl:=lcPage.Controls[psControlName];
if (lcPage.Name = 'tsSelect') then
begin
if (lcCtrl.Name = 'edDispo') then
begin
if (ptName = 'LoadRows') then
begin
//Laden der Fahrzeuge
end;
end;
Finally
Wizard.EndUpdate;
end;
end;
