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

Merge pull request #524 from OH1KH/squash_last_qso

Browse Source 
Fix for QSO list
This commit is contained in:
Petr Hlozek 2022-07-24 13:04:00 +02:00 committed by GitHub
commit a9de0c3756
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
2 changed files with 10 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
src/fNewQSO.pas
View File

@ -3158,6 +3158,7 @@ var
ShowMain : Boolean = False;
date : TDate;
RxFreq : Double = 0;
key : word = $24; //Home-key
begin
ShowMain := (fEditQSO or fViewQSO) and (not fromNewQSO);
if not cbOffline.Checked then
@ -3398,7 +3399,7 @@ begin
if not AnyRemoteOn then
UnsetEditLabel;
dmData.qQSOBefore.Close;
fEditQSO := False;
was_call := edtCall.Text;
edtCall.Text := ''; //calls ClearAll
old_ccall := '';
@ -3409,7 +3410,14 @@ begin
frmTRXControl.ClearRIT;
if (cqrini.ReadBool('NewQSO','RefreshAfterSave', True) and frmMain.Showing) then
begin
frmMain.acRefresh.Execute;
if not fEditQso then
frmMain.dbgrdMainKeyUp(nil,key,[ssCtrl]); //shows last logged qso
end;
fEditQSO := False;
UploadAllQSOOnline;
if frmWorkedGrids.Showing then frmWorkedGrids.UpdateMap;

2
src/uVersion.pas
View File

@ -21,7 +21,7 @@ const
cRELEAS = 0;
cBUILD = 1;
cBUILD_DATE = '2022-06-30';
cBUILD_DATE = '2022-07-04';
implementation