Недавно задумался, почему мои пользователи удаляют программу? Следуя давней  шароварной традиции  решил написать  страничку на  сайте с текстом, почему и как. Но потом понял, что большинство пользователей будет тупо закрывать страничку, другая часть будет не понимать, что от них хотят.  Неразумно.

Обратился к опыту коллег и нашел отличный, простой и гениальный способ. Feedback встраивается в инсталлятор!

Все, что нужно пользователю, это написать пару строчек и нажать кнопку "Отправить отзыв".

 А теперь о том, как это сделать:

[Files]
Source: IssSurvey.dll; DestDir: {app}
Source: IssSurvey.ini; DestDir: {app}

  •  Прописываем основные функции в раздел [Code] Вашего проекта:

function IssSurvey(Language: PChar; ReasonsList: PChar; Server: PChar; UserName: PChar; Password: PChar): Integer;
external 'IssSurvey@{app}\IssSurvey.dll stdcall uninstallonly';
InitializeUninstall(): Boolean;
var
sReasons: String;
nCode: Integer;
begin
Result := false;
sReasons := 'I do not understand how to use this product;I like the product but do not want to pay for it;I was bothered by the sponsored links;Other reason (see below):';
nCode := IssSurvey('en',sReasons,'http://raz-soft.com/IssSurvey/IssSurvey_mail.php','demo','demo');if (nCode=0) or (nCode=2) then begin
Result := true;
end;
UnloadDLL(ExpandConstant('{app}\IssSurvey.dll'));
end;

  • Закидываем на сервер содержимое папки ServerScripts_demo. В скрипте IssSurvey_mail.php меняем ящик назначения, тему и адреса.