Sicher gehen tut (fast)alles
Dann nimm das:
[code=delphi]
Code:
var
UserPage: TInputQueryWizardPage;
procedure Pchange (Sender: TObject);
begin
if (UserPage.Values[0]<>'')
then Wizardform.NextButton.enabled:=true
else Wizardform.NextButton.enabled:=false;
end;
procedure InitializeWizard;
begin
UserPage := CreateInputQueryPage(wpWelcome,
ExpandConstant('{cm:CustomFormCaption}'), ExpandConstant('{cm:CustomFormDescription}'),'');
UserPage.Add('Geben Sie einen Accountnamen ein:', False);
Userpage.edits[0].OnChange:=@Pchange;
end;
procedure CurPageChanged(CurPageID: Integer);
begin
if CurPageID=100 Then
Wizardform.NextButton.enabled:=false;
end;
Ich hoffe jetzt gefällte es dir