Topic: где почитать о Settings.ini

Добрый день.
Подскажите где найти больше информации по Settings.ini?
О добавлении сведений о ключах, владельце.

Re: где почитать о Settings.ini

Купите уже лицуху и не парьтесь )))

Визуальное программирование: блог и телеграм-канал.

Re: где почитать о Settings.ini

Ваш ответ можно расценивать как грубость?
В лицухе есть есть то чего нет в 60ти дневке?
Я не прошу сделайте что-то за меня, я прошу помощи в поиске информации (пнуть в нужную сторону). Хотелось бы самому понять, но тыкать наугад не всегда продуктивно, но у вас такие "объемные" ответы что и приходится тыкаться самому. ((((((

P.S.По вашим же курсам/урокам учусь.

Re: где почитать о Settings.ini

Мой ответ нужно расценивать как вопрос: зачем вам информация о том, как добавляются сведения о ключах и владельце?


А ответ на ваш вопрос такой: эта информация добавляется автоматически, после покупки лицензии. Но что-то мне подсказывает, что вас такой ответ не устраивает.


Я знаю людей, владеющих этой информацией в силу своего высокого профессионализма и любопытности. Но мотивы у них отличаются от ваших. Впрочем, я могу ошибаться и готов принести вам извинения, если вы объясните, зачем вам это нужно?


P.S. Мои курсы не про хакинг, а про разработку приложений.

Визуальное программирование: блог и телеграм-канал.

Re: где почитать о Settings.ini

Хаккингом и не помышлял заниматься.
В книге Визуальное программирование.PDF страница 23. RegistrationKey и сведения о владельце можно хранить в файле settings.ini......
Вот и возник вопрос: А как туда эту информацию добавлять? Поэтому и спрашиваю про доп.информацию.

Раз уж пошел разговор про уроки, то по ним тоже есть некоторые вопросы. Но о них наверное не в этой теме?

6 (edited by k245 2022-06-21 15:59:33)

Re: где почитать о Settings.ini

Ох, старый я стал, подозрительный.... простите меня, добрый человек, ошибочка вышла )))


Вот пример кода, который выполняется при старте приложения и читает данные из файла settings.ini:


procedure Init;
var
  tmpIniFile:TIniFile;
begin
  // инициализация системы лицензирования
  tmpIniFile:=TIniFile.Create(Application.SettingsFile);
  // владелец и ключ регистрации храним в файле настроек
  LicenseOwner := tmpIniFile.ReadString('License','Owner',LICENSE_OWNER);
  RegKey := tmpIniFile.ReadString('License','RegKey','');
  tmpIniFile.free;
  // после проверки лицензии устанавливается значение переменной Licenced;
  CheckLicense;
  // другие штуки
  DBFileVer := GetBaseParam(PAR_BASE_VERSION); // версия файла базы данных
  DBFileName := GetDBFileName(False); // файл базы данных
  if DBFileVer = '' then
  begin
    SetBaseParam(PAR_BASE_VERSION,DEF_BASE_VERSION);
    DBFileVer := GetBaseParam(PAR_BASE_VERSION);
  end;
  if NEED_CREATE_RMT then
  begin
    // инициализация системы прав
    CreateRight;
    CreateMenu;
    CreateToolbar;
  end;
end;

а так выглядит запись данных в этот файл:


// активация лицензии
procedure frmRegistration_btnActivate_OnClick (Sender: TObject; var Cancel: boolean);
var
  tmpIniFile:TIniFile;
begin
  RegKey := frmRegistration.edtLicenseKey.Text;
  LicenseOwner := frmRegistration.edtLicenseOwner.Text;
  CheckLicense;
  if Licensed then
  begin // записать ключ лицензии
    tmpIniFile:=TIniFile.Create( Application.SettingsFile );
    tmpIniFile.WriteString('License','RegKey',RegKey);
    tmpIniFile.WriteString('License','Owner',LicenseOwner);
    tmpIniFile.free;
    ShowMessage(S_.REGISTRATION_DONE.Caption);
    // вызвать обработчик, чтобы перерисовать заголовок основного окна
    UpdateMainFormCaption;
    // кроме того, там может быть различные штуки, которые зависят от регистрации
    frmAbout_OnShow (frmAbout,'');
    // закрыть форму
    frmRegistration.Close;
  end
  else
  begin
    ShowMessage(S_.REGISTRATION_FAIL.Caption);
  end;
end;

Вы в следующий раз уточняйте, о чем речь, чтобы людей не смущать и меня в грех не вводить. Лучше спрашивать такое   в ветке про курсы или в группе VK   

Визуальное программирование: блог и телеграм-канал.