From 8154246f48ec43d39e08972ab612c071b3212014 Mon Sep 17 00:00:00 2001 From: Mike Brashler Date: Wed, 30 Nov 2022 18:07:37 -0800 Subject: [PATCH 1/2] display station info for CWOPS CWT and ARRL DX Contests (Coded by W7SST) - fixes #150 --- Main.pas | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/Main.pas b/Main.pas index 9f2754a..005623d 100644 --- a/Main.pas +++ b/Main.pas @@ -809,8 +809,10 @@ procedure TMainForm.ProcessEnter; Exit; end; + // Adding a contest: update status bar w/ station info. + // remember not to give a hint if exchange entry is affected by this info. // for certain contests (e.g. ARRL Field Day), update update status bar - if SimContest in [scFieldDay] then + if SimContest in [scCwt, scFieldDay, scArrlDx] then UpdateSbar(Edit1.Text); //no QSO in progress, send CQ From 7bf7f6e3ced9040b0f2784bd5010f7b36be3c103 Mon Sep 17 00:00:00 2001 From: Mike Brashler Date: Thu, 1 Dec 2022 00:03:09 -0800 Subject: [PATCH 2/2] CQWW now updates station info in status bar --- Main.pas | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/Main.pas b/Main.pas index 005623d..cc15142 100644 --- a/Main.pas +++ b/Main.pas @@ -812,7 +812,7 @@ procedure TMainForm.ProcessEnter; // Adding a contest: update status bar w/ station info. // remember not to give a hint if exchange entry is affected by this info. // for certain contests (e.g. ARRL Field Day), update update status bar - if SimContest in [scCwt, scFieldDay, scArrlDx] then + if SimContest in [scCwt, scFieldDay, scCQWW, scArrlDx] then UpdateSbar(Edit1.Text); //no QSO in progress, send CQ