hamradio/cqrlog
1
0
Fork 0
mirror of https://github.com/ok2cqr/cqrlog.git synced 2024-09-21 10:27:17 +00:00
Code Issues Packages Projects Releases Wiki Activity

Merge pull request #504 from OH1KH/export_file_type_fix

Browse Source 
Fix for adif headers
This commit is contained in:
Petr Hlozek 2022-05-14 16:27:48 +02:00 committed by GitHub
commit 0ebb35a280
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
4 changed files with 4 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
src/fAdifImport.pas
View File

@ -1034,6 +1034,7 @@ begin
else begin
AssignFile(f,dmData.UsrHomeDir + ERR_FILE);
Rewrite(f);
Writeln(f);
Writeln(f,'ADIF export from CQRLOG for Linux version ' + dmData.VersionString);
Writeln(f,'Copyright (C) ',YearOf(now),' by Petr, OK2CQR and Martin, OK1RR');
Writeln(f,'Internet: http://www.cqrlog.com');

1
src/fExportProgress.pas
View File

@ -441,6 +441,7 @@ begin //TfrmExportProgress
AssignFile(f, FileName);
Rewrite(f);
Writeln(f);
Writeln(f, 'ADIF export from CQRLOG for Linux version '+dmData.VersionString);
Writeln(f, 'Copyright (C) ',YearOf(now),' by Petr, OK2CQR and Martin, OK1RR');
Writeln(f);

1
src/fLoTWExport.pas
View File

@ -387,6 +387,7 @@ begin
end;
date := FormatDateTime('yyyy-mm-dd',now);
Writeln(f);
Writeln(f, '<ADIF_VER:5>3.1.0');
Writeln(f, '<CREATED_TIMESTAMP:15>',FormatDateTime('YYYYMMDD hhmmss',dmUtils.GetDateTime(0)));
Writeln(f, 'ADIF export from CQRLOG for Linux version '+dmData.VersionString);

1
src/feQSLUpload.pas
View File

@ -107,6 +107,7 @@ begin
AssignFile(f,FileName);
try try
Rewrite(f);
Writeln(f);
Writeln(f, 'ADIF export from CQRLOG for Linux version '+dmData.VersionString);
Writeln(f, 'Copyright (C) ',YearOf(now),' by Petr, OK2CQR and Martin, OK1RR');
Writeln(f);