|
Examples |
|
|
Some examples:
// Obtain the required password asking it to the final user. procedure MyPasswordRequest(EurekaExceptionRecord: TEurekaExceptionRecord; var Password: String); begin InputQuery('Request', 'Insert the BUG report password', Password); end;
// Obtain the required password by configuration INI file. procedure MyPasswordRequest(EurekaExceptionRecord: TEurekaExceptionRecord; var Password: String); var INI: TIniFile; begin INI := TiniFile.Create('Config.ini'); try Password := INI.ReadString('Main', 'Password', ''); finally INI.Free; end; end; |