Inno Setup: Edit1.OnChange und Custom_nextbuttonClick

[MathiasSimmack]

Eine Kleinigkeit:

Zitat von thklingler:

Delphi-Quellcode:

procedure CurPageChanged(CurPageID: Integer);
begin
if CurPageID=100 Then
 Wizardform.NextButton.enabled:=false;
end;

Zum einen würde ich nicht den Wert "100" nehmen sondern "UserPage.ID". Der Wert mag zwar 100 sein, aber warum sich so was angewöhnen? Die andere Sache ist die, dass in deinem Fall der Weiter-Button immer deaktiviert wird. Auch, wenn man was ins Eingabefeld geschrieben hat, zum nächsten Fenster ging (Weiter >) und von da aus wieder zurückkam (< Zurück). Besser wäre also ein schlichtes:

Delphi-Quellcode:

if CurPageID = UserPage.ID then
  Pchange(nil);

Und wenn wir schon dabei sind:

Delphi-Quellcode:

procedure Pchange (Sender: TObject);
begin
  WizardForm.NextButton.Enabled := UserPage.Values[0] <> '';
end;