----boundary-LibPST-iamunique-1766726419_-_-
Content-type: text/plain
Thanks Juan & Chris
I have merged your suggestions into the
composite below. It works for me, but I
can't guarantee it for anyone else;
my understanding of Windows is very
limited!
As a general comment I notice that
many Windows procedures (for example
ShellExecute) come in versions with and
without a final 'A', or 'W' or 'Ex'.
Is there a simple explanation of the
significance of the suffix?
Thanks again
Robert.
MODULE WandsAcrobat;
IMPORT WinApi;
PROCEDURE Display*(IN path, file: ARRAY OF CHAR);
VAR
doc : POINTER TO ARRAY OF SHORTCHAR;
BEGIN
NEW (doc, LEN (path$) + LEN (file$) + 1);
doc^ := SHORT (path + file);
IF WinApi.ShellExecute(0, 'Open', doc^, NIL, NIL, WinApi.SW_SHOW) = 0 THEN END
END Display;
END WandsAcrobat.
<Q> "WandsAcrobat.Display('\\Abb\c\', 'xyz.pdf')"
--- BlackBox
--- send subject HELP or UNSUBSCRIBE to blackbox{([at]})nowhere.xy
----boundary-LibPST-iamunique-1766726419_-_-
Content-type: application/rtf
Content-transfer-encoding: base64
Content-Disposition: attachment; filename="rtf-body.rtf"
e1xydGYxXGFuc2lcYW5zaWNwZzEyNTJcZnJvbXRleHQgXGRlZmYwe1xmb250dGJsDQp7XGYwXGZz
d2lzcyBBcmlhbDt9DQp7XGYxXGZtb2Rlcm4gQ291cmllciBOZXc7fQ0Ke1xmMlxmbmlsXGZjaGFy
c2V0MiBTeW1ib2w7fQ0Ke1xmM1xmbW9kZXJuXGZjaGFyc2V0MCBDb3VyaWVyIE5ldzt9fQ0Ke1xj
b2xvcnRibFxyZWQwXGdyZWVuMFxibHVlMDtccmVkMFxncmVlbjBcYmx1ZTI1NTt9DQpcdWMxXHBh
cmRccGxhaW5cZGVmdGFiMzYwIFxmMFxmczIwIFRoYW5rcyBKdWFuICYgQ2hyaXNccGFyDQpccGFy
DQpJIGhhdmUgbWVyZ2VkIHlvdXIgc3VnZ2VzdGlvbnMgaW50byB0aGVccGFyDQpjb21wb3NpdGUg
YmVsb3cuIEl0IHdvcmtzIGZvciBtZSwgYnV0IElccGFyDQpjYW4ndCBndWFyYW50ZWUgaXQgZm9y
IGFueW9uZSBlbHNlO1xwYXINCm15IHVuZGVyc3RhbmRpbmcgb2YgV2luZG93cyBpcyB2ZXJ5XHBh
cg0KbGltaXRlZCFccGFyDQpccGFyDQpccGFyDQpBcyBhIGdlbmVyYWwgY29tbWVudCBJIG5vdGlj
ZSB0aGF0XHBhcg0KbWFueSBXaW5kb3dzIHByb2NlZHVyZXMgKGZvciBleGFtcGxlXHBhcg0KU2hl
bGxFeGVjdXRlKSBjb21lIGluIHZlcnNpb25zIHdpdGggYW5kXHBhcg0Kd2l0aG91dCBhIGZpbmFs
ICdBJywgb3IgJ1cnIG9yICdFeCcuXHBhcg0KXHBhcg0KSXMgdGhlcmUgYSBzaW1wbGUgZXhwbGFu
YXRpb24gb2YgdGhlXHBhcg0Kc2lnbmlmaWNhbmNlIG9mIHRoZSBzdWZmaXg/XHBhcg0KXHBhcg0K
XHBhcg0KVGhhbmtzIGFnYWluXHBhcg0KXHBhcg0KUm9iZXJ0LlxwYXINClxwYXINClxwYXINCk1P
RFVMRSAgV2FuZHNBY3JvYmF0O1xwYXINClxwYXINCklNUE9SVCAgV2luQXBpO1xwYXINClxwYXIN
ClBST0NFRFVSRSAgRGlzcGxheSooSU4gcGF0aCwgZmlsZTogQVJSQVkgT0YgQ0hBUik7XHBhcg0K
ICBWQVJccGFyDQogICAgZG9jIDogUE9JTlRFUiBUTyBBUlJBWSBPRiBTSE9SVENIQVI7XHBhcg0K
ICBCRUdJTlxwYXINCiAgICBORVcgKGRvYywgTEVOIChwYXRoJCkgKyBMRU4gKGZpbGUkKSArIDEp
O1xwYXINCiAgICBkb2NeIDo9IFNIT1JUIChwYXRoICArICBmaWxlKTtccGFyDQogICAgSUYgIFdp
bkFwaS5TaGVsbEV4ZWN1dGUoMCwgJ09wZW4nLCBkb2NeLCBOSUwsIE5JTCwgV2luQXBpLlNXX1NI
T1cpID0gMCAgVEhFTiAgRU5EXHBhcg0KICBFTkQgIERpc3BsYXk7XHBhcg0KXHBhcg0KRU5EICBX
YW5kc0Fjcm9iYXQuXHBhcg0KXHBhcg0KXHBhcg0KXHBhcg0KIDxRPiAgIldhbmRzQWNyb2JhdC5E
aXNwbGF5KCdcXFxcQWJiXFxjXFwnLCAneHl6LnBkZicpIlxwYXINClxwYXINCi0tLSBCbGFja0Jv
eFxwYXINCi0tLSBzZW5kIHN1YmplY3QgSEVMUCBvciBVTlNVQlNDUklCRSB0byBibGFja2JveEBv
YmVyb24uY2h9fQBaR1VnTnpZdUlG
----boundary-LibPST-iamunique-1766726419_-_---
Received on Mon Feb 07 2005 - 14:58:15 UTC