Skip to content
Snippets Groups Projects
Commit 599b83c6 authored by Rob Swindell's avatar Rob Swindell :speech_balloon:
Browse files

Add missing ("newer") QWK settings

... and rearranged them to match SCFG->System->New User Values->QWK Message
Packet Settings more closely.

uedit (the program) should be updated too.
parent 47f34aae
No related branches found
No related tags found
No related merge requests found
Pipeline #5426 passed
...@@ -201,18 +201,24 @@ void __fastcall TMainForm::GetUserData(int number) ...@@ -201,18 +201,24 @@ void __fastcall TMainForm::GetUserData(int number)
LogonCheckListBox->Tag = false; LogonCheckListBox->Tag = false;
// Appy 'QWK' bit-field // Appy 'QWK' bit-field
QWKCheckListBox->Checked[0] = user.qwk & QWK_FILES; int i = 0;
QWKCheckListBox->Checked[1] = user.qwk & QWK_EMAIL; QWKCheckListBox->Checked[i++] = user.qwk & QWK_EXT;
QWKCheckListBox->Checked[2] = user.qwk & QWK_ALLMAIL; QWKCheckListBox->Checked[i++] = !(user.qwk & QWK_RETCTLA);
QWKCheckListBox->Checked[3] = user.qwk & QWK_DELMAIL; QWKCheckListBox->Checked[i++] = user.qwk & QWK_EXPCTLA;
QWKCheckListBox->Checked[4] = user.qwk & QWK_BYSELF; QWKCheckListBox->Checked[i++] = user.qwk & QWK_UTF8;
QWKCheckListBox->Checked[5] = user.qwk & QWK_EXPCTLA; QWKCheckListBox->Checked[i++] = user.qwk & QWK_FILES;
QWKCheckListBox->Checked[6] = !(user.qwk & QWK_RETCTLA); QWKCheckListBox->Checked[i++] = user.qwk & QWK_ATTACH;
QWKCheckListBox->Checked[7] = user.qwk & QWK_ATTACH; QWKCheckListBox->Checked[i++] = user.qwk & QWK_BYSELF;
QWKCheckListBox->Checked[8] = user.qwk & QWK_NOINDEX; QWKCheckListBox->Checked[i++] = user.qwk & QWK_EMAIL;
QWKCheckListBox->Checked[9] = user.qwk & QWK_TZ; QWKCheckListBox->Checked[i++] = user.qwk & QWK_ALLMAIL;
QWKCheckListBox->Checked[10] = user.qwk & QWK_VIA; QWKCheckListBox->Checked[i++] = user.qwk & QWK_DELMAIL;
QWKCheckListBox->Checked[11] = !(user.qwk & QWK_NOCTRL); QWKCheckListBox->Checked[i++] = user.qwk & QWK_NOINDEX;
QWKCheckListBox->Checked[i++] = !(user.qwk & QWK_NOCTRL);
QWKCheckListBox->Checked[i++] = user.qwk & QWK_TZ;
QWKCheckListBox->Checked[i++] = user.qwk & QWK_VIA;
QWKCheckListBox->Checked[i++] = user.qwk & QWK_MSGID;
QWKCheckListBox->Checked[i++] = user.qwk & QWK_HEADERS;
QWKCheckListBox->Checked[i++] = user.qwk & QWK_VOTING;
QWKCheckListBox->Tag = false; QWKCheckListBox->Tag = false;
// Apply 'chat' bit-field // Apply 'chat' bit-field
...@@ -377,18 +383,24 @@ void __fastcall TMainForm::PutUserData(int number) ...@@ -377,18 +383,24 @@ void __fastcall TMainForm::PutUserData(int number)
} }
if(QWKCheckListBox->Tag) { if(QWKCheckListBox->Tag) {
SetBit( QWKCheckListBox->Checked[0], user.qwk, QWK_FILES); int i = 0;
SetBit( QWKCheckListBox->Checked[1], user.qwk, QWK_EMAIL); SetBit( QWKCheckListBox->Checked[i++], user.qwk, QWK_EXT);
SetBit( QWKCheckListBox->Checked[2], user.qwk, QWK_ALLMAIL); SetBit(!QWKCheckListBox->Checked[i++], user.qwk, QWK_RETCTLA);
SetBit( QWKCheckListBox->Checked[3], user.qwk, QWK_DELMAIL); SetBit( QWKCheckListBox->Checked[i++], user.qwk, QWK_EXPCTLA);
SetBit( QWKCheckListBox->Checked[4], user.qwk, QWK_BYSELF); SetBit( QWKCheckListBox->Checked[i++], user.qwk, QWK_UTF8);
SetBit( QWKCheckListBox->Checked[5], user.qwk, QWK_EXPCTLA); SetBit( QWKCheckListBox->Checked[i++], user.qwk, QWK_FILES);
SetBit(!QWKCheckListBox->Checked[6], user.qwk, QWK_RETCTLA); SetBit( QWKCheckListBox->Checked[i++], user.qwk, QWK_ATTACH);
SetBit( QWKCheckListBox->Checked[7], user.qwk, QWK_ATTACH); SetBit( QWKCheckListBox->Checked[i++], user.qwk, QWK_BYSELF);
SetBit( QWKCheckListBox->Checked[8], user.qwk, QWK_NOINDEX); SetBit( QWKCheckListBox->Checked[i++], user.qwk, QWK_EMAIL);
SetBit( QWKCheckListBox->Checked[9], user.qwk, QWK_TZ); SetBit( QWKCheckListBox->Checked[i++], user.qwk, QWK_ALLMAIL);
SetBit( QWKCheckListBox->Checked[10], user.qwk, QWK_VIA); SetBit( QWKCheckListBox->Checked[i++], user.qwk, QWK_DELMAIL);
SetBit(!QWKCheckListBox->Checked[11], user.qwk, QWK_NOCTRL); SetBit( QWKCheckListBox->Checked[i++], user.qwk, QWK_NOINDEX);
SetBit(!QWKCheckListBox->Checked[i++], user.qwk, QWK_NOCTRL);
SetBit( QWKCheckListBox->Checked[i++], user.qwk, QWK_TZ);
SetBit( QWKCheckListBox->Checked[i++], user.qwk, QWK_VIA);
SetBit( QWKCheckListBox->Checked[i++], user.qwk, QWK_MSGID);
SetBit( QWKCheckListBox->Checked[i++], user.qwk, QWK_HEADERS);
SetBit( QWKCheckListBox->Checked[i++], user.qwk, QWK_VOTING);
putuserqwk(&cfg, user.number, user.qwk); putuserqwk(&cfg, user.number, user.qwk);
} }
......
...@@ -1110,18 +1110,23 @@ object MainForm: TMainForm ...@@ -1110,18 +1110,23 @@ object MainForm: TMainForm
Anchors = [akLeft, akTop, akRight] Anchors = [akLeft, akTop, akRight]
ItemHeight = 13 ItemHeight = 13
Items.Strings = ( Items.Strings = (
'Include QWKE Extensions'
'Strip Ctrl-A codes'
'Expand Ctrl-A Codes to ANSI'
'Include UTF-8 Characters'
'Include New Files List' 'Include New Files List'
'Include File Attachments'
'Include Messages From Self'
'Include Unread Email' 'Include Unread Email'
'Include ALL Email' 'Include ALL Email'
'Delete Email After Download' 'Delete Downloaded E-mail'
'Include Messages From Self'
'Expand Ctrl-A Codes to ANSI'
'Strip Ctrl-A codes'
'Include File Attachments'
'Include Index Files' 'Include Index Files'
'Include Time Zone (@TZ)' 'Include Control Files'
'Include Seen-Bys (@VIA)' 'Include Time Zone Kludges'
'Extraneous Control Files') 'Include Via/Routing Kludges'
'Include Message-ID Kludges'
'Include HEADERS.DAT File'
'Include VOTING.DAT File')
TabOrder = 0 TabOrder = 0
end end
end end
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Please register or to comment