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

changed color definition in dxcluster

Browse Source
This commit is contained in:
Johannes Loose 2022-05-18 02:40:33 +02:00
parent 17a8505fb7
commit 2200fad53a
3 changed files with 9 additions and 9 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
src/fBandMap.lfm
View File

@ -112,7 +112,7 @@ object frmBandMap: TfrmBandMap
Width = 259
Align = alClient
BevelOuter = bvNone
Color = clWhite
Color = clDefault
Font.Height = -11
Font.Name = 'Monospace'
ParentColor = False

6
src/fDXCluster.lfm
View File

@ -204,7 +204,7 @@ object frmDXCluster: TfrmDXCluster
Alignment = taLeftJustify
BevelInner = bvLowered
BevelOuter = bvLowered
Color = clWhite
Color = clDefault
Font.CharSet = ANSI_CHARSET
Font.Height = 12
Font.Name = 'DejaVu Sans Mono 12'
@ -343,7 +343,7 @@ object frmDXCluster: TfrmDXCluster
BevelOuter = bvNone
ClientHeight = 331
ClientWidth = 699
Color = clWhite
Color = clDefault
ParentColor = False
TabOrder = 2
object pnlChat: TPanel
@ -353,7 +353,7 @@ object frmDXCluster: TfrmDXCluster
Width = 699
Align = alTop
BevelOuter = bvNone
Color = 13890552
Color = clDefault
ParentColor = False
TabOrder = 0
end

10
src/fDXCluster.pas
View File

@ -428,7 +428,7 @@ begin
TelSpots.Align := alClient;
TelSpots.setLanguage(1);
ChBckColor := $00D3F3F8;
ChBckColor := clWindow;
pnlChat.Color := ChBckColor;
ChatSpots := TColorMemo.Create(pnlChat);
ChatSpots.parent := pnlChat;
@ -1051,7 +1051,7 @@ var
cfgAN : Boolean;
cfgOC : Boolean;
begin
sColor := 0; //cerna
sColor := clWindowText; //cerna
EnterCriticalSection(csDXCPref);
try
@ -1119,9 +1119,9 @@ begin
isLoTW := dmData.UsesLotw(call);
isEQSL := dmDXCluster.UseseQSL(call);
//DXCluster - default Backgroundcolor white
//DXCluster - default Backgroundcolor
//case lotw and eqsl is given, lotw will win
ThBckColor := clWhite;
ThBckColor := clWindow;
if cfgeUseBackColor and isEQSL then
ThBckColor := cfgeBckColor;
if cfgUseBackColor and isLoTW then
@ -1281,7 +1281,7 @@ begin
end
end;
if index = 0 then
sColor := 0;
sColor := clWindowText;
if index = 1 then
sColor := cfgNewCountryColor;
if index = 2 then