Einzelnen Beitrag anzeigen

thklingler

Registriert seit: 1. Jan 2003
Ort: Bad Wurzach
47 Beiträge
 
Delphi 2006 Enterprise
 
#4

Re: Inno Setup: Edit1.OnChange und Custom_nextbuttonClick

  Alt 24. Jan 2006, 11:48
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
Thomas Klingler
www.setupprofis.de
  Mit Zitat antworten Zitat