(unknown charset) - How better to call a WinApi procedure if do not we need a result?

From: (unknown charset) Oleg N. Cher <"Oleg>
Date: Tue, 14 Aug 2007 16:49:20 +0300

----boundary-LibPST-iamunique-1782213562_-_-
Content-type: text/plain

Hello all,

I write Win32 console support in BlackBox to generate
compact independent console applications.
Help me to understand, please. There is a procedure:

PROCEDURE SetCodePage* (cp: INTEGER);
VAR
    dummy: WinApi.BOOL;
BEGIN
    dummy := WinApi.SetConsoleCP(cp);
    dummy := WinApi.SetConsoleOutputCP(cp)
END SetCodePage;

Is a good method to do it without variable dummy?
For example,

        NIL := WinApi.SetConsoleOutputCP(cp)

(It does not work :-) )
Thanks.

Oleg N. Cher,
Colossoft Research.
allot{([at]})nowhere.xy
2007-08-14

--- BlackBox
--- send subject HELP or UNSUBSCRIBE to blackbox{([at]})nowhere.xy

----boundary-LibPST-iamunique-1782213562_-_-
Content-type: application/rtf
Content-transfer-encoding: base64
Content-Disposition: attachment; filename="rtf-body.rtf"

e1xydGYxXGFuc2lcYW5zaWNwZzEyNTFcZnJvbXRleHQgXGRlZmYwe1xmb250dGJsDQp7XGYwXGZz
d2lzcyBBcmlhbDt9DQp7XGYxXGZtb2Rlcm4gQ291cmllciBOZXc7fQ0Ke1xmMlxmbmlsXGZjaGFy
c2V0MiBTeW1ib2w7fQ0Ke1xmM1xmbW9kZXJuXGZjaGFyc2V0MCBDb3VyaWVyIE5ldzt9fQ0Ke1xj
b2xvcnRibFxyZWQwXGdyZWVuMFxibHVlMDtccmVkMFxncmVlbjBcYmx1ZTI1NTt9DQpcdWMxXHBh
cmRccGxhaW5cZGVmdGFiMzYwIFxmMFxmczIwIEhlbGxvIGFsbCxccGFyDQpccGFyDQpJIHdyaXRl
IFdpbjMyIGNvbnNvbGUgc3VwcG9ydCBpbiBCbGFja0JveCB0byBnZW5lcmF0ZVxwYXINCmNvbXBh
Y3QgaW5kZXBlbmRlbnQgY29uc29sZSBhcHBsaWNhdGlvbnMuXHBhcg0KSGVscCBtZSB0byB1bmRl
cnN0YW5kLCBwbGVhc2UuIFRoZXJlIGlzIGEgcHJvY2VkdXJlOlxwYXINClxwYXINClBST0NFRFVS
RSBTZXRDb2RlUGFnZSogKGNwOiBJTlRFR0VSKTtccGFyDQpWQVJccGFyDQogICAgZHVtbXk6IFdp
bkFwaS5CT09MO1xwYXINCkJFR0lOXHBhcg0KICAgIGR1bW15IDo9IFdpbkFwaS5TZXRDb25zb2xl
Q1AoY3ApO1xwYXINCiAgICBkdW1teSA6PSBXaW5BcGkuU2V0Q29uc29sZU91dHB1dENQKGNwKVxw
YXINCkVORCBTZXRDb2RlUGFnZTtccGFyDQpccGFyDQpJcyBhIGdvb2QgbWV0aG9kIHRvIGRvIGl0
IHdpdGhvdXQgdmFyaWFibGUgZHVtbXk/XHBhcg0KRm9yIGV4YW1wbGUsXHBhcg0KXHBhcg0KXHRh
YiBOSUwgOj0gV2luQXBpLlNldENvbnNvbGVPdXRwdXRDUChjcClccGFyDQpccGFyDQooSXQgZG9l
cyBub3Qgd29yayA6LSkgKVxwYXINClRoYW5rcy5ccGFyDQpccGFyDQpPbGVnIE4uIENoZXIsXHBh
cg0KQ29sb3Nzb2Z0IFJlc2VhcmNoLlxwYXINCmFsbG90QHVrci5uZXRccGFyDQoyMDA3LTA4LTE0
XHBhcg0KXHBhcg0KLS0tIEJsYWNrQm94XHBhcg0KLS0tIHNlbmQgc3ViamVjdCBIRUxQIG9yIFVO
U1VCU0NSSUJFIHRvIGJsYWNrYm94QG9iZXJvbi5jaFxwYXINCn0=


----boundary-LibPST-iamunique-1782213562_-_---
Received on Tue Aug 14 2007 - 15:49:20 UTC