I found a code and modified it you say it looks like it?
Quote:
; Elamigos example username page ini file section
[INI]
Filename: {app}\uplay_r1_loader.ini; Section: Settings; Key: UserName; String: {code:GetUserName}
; Elamigos example username page code sections
[code]
var
UserNamePage : TInputQueryWizardPage;
procedure InitializeWizard;
begin
UserNamePage := CreateInputQueryPage(wpWelcome,
'Modificare il nome del giocatore', 'Nome del giocatore',
'Cambia il nome utente nel gioco');
UserNamePage.Add(' Username:', False);
end;
function UserNameForm_NextButtonClick(Page: TWizardPage): Boolean;
begin
Result := True;
end;
function GetUserName(Param: String): string;
begin
result := UserNamePage.Values[0];
end;
|