----boundary-LibPST-iamunique-1433444792_-_-
Content-type: text/plain
Dear Koen,
thats not a good idear. You move the problems to a later time.
The best way is to change the source and use the knowledge of OM.
How?
That's the way:
1. Write KERNEL32 into Log window and select that word
2. Search for KERNEL32 thru the source of BB 1.5
via Menus Info -> Search In source
2. Open the file which you found form BB 1.5
3. Open the same file from BB 1.6
4. compare both files and you see what you have to change.
That's the way I get CpcMenus running just a minute ago.
Here are the changes for CpcMenus:
PROCEDURE Exist (IN path, name: ARRAY OF CHAR): BOOLEAN;
VAR fullname: ARRAY 260 OF CHAR; ref: WinApi.HANDLE; found: BOLEAN; res: INTEGER;
BEGIN
fullname := path + '/' + name;
ref := WinApi.CreateFileW(fullname, WinApi.GENERIC_READ + WinApi.FILE_SHARE_READ,
{}, NIL, WinApi.OPEN_EXISTING, {}, 0);
found := ref # WinApi.INVALID_HANDLE_VALUE;
res := WinApi.CloseHandle(ref);
RETURN found;
END Exist;
Regards
Helmut
-----Ursprüngliche Nachricht-----
Von: blackbox{([at]})nowhere.xy
Gesendet: Freitag, 4. Mai 2007 10:21
An: BlackBox Mailing List
Betreff: [BlackBox] - Component-Pascal Collection & BlackBox 1.6
Hello Robert,
These deprecated modules are available as symbol files in the 1.5 release, so one could save theme
as text in 1.5 and transfer them to 1.6.
Brgds,
Koen.
On Fri, 4 May 2007 09:00:08 +0100, you wrote:
>
>
>Oms, all
>
>Many years ago I wrote some code using USER32 (and probably
>some other deprecated Modules). I now forget the detailed design
>thinking.
>
>To translate this to be 1.6 compatible I think it would be helpful
>to be able to read the USER32 source so that I can directly call
>the corresponding WinApi functions in the same way.
>
>Am I correct, and can these sources be made available for this purpose?
>
>
>
>Regards
>
>Robert
>
>SELEX Sensors and Airborne Systems Limited
>Registered Office: Sigma House, Christopher Martin Road, Basildon, Essex SS14 3EL
>A company registered in England & Wales. Company no. 02426132
>********************************************************************
>This email and any attachments are confidential to the intended
>recipient and may also be privileged. If you are not the intended
>recipient please delete it from your system and notify the sender.
>You should not copy it or use it for any purpose nor disclose or
>distribute its contents to any other person.
>********************************************************************
>
>--- BlackBox
>--- send subject HELP or UNSUBSCRIBE to blackbox{([at]})nowhere.xy>
--- BlackBox
--- send subject HELP or UNSUBSCRIBE to blackbox{([at]})nowhere.xy
--- BlackBox
--- send subject HELP or UNSUBSCRIBE to blackbox{([at]})nowhere.xy
----boundary-LibPST-iamunique-1433444792_-_-
Content-type: application/rtf
Content-transfer-encoding: base64
Content-Disposition: attachment; filename="rtf-body.rtf"
e1xydGYxXGFuc2lcYW5zaWNwZzEyNTJcZnJvbXRleHQgXGRlZmYwe1xmb250dGJsDQp7XGYwXGZz
d2lzc1xmY2hhcnNldDAgQXJpYWw7fQ0Ke1xmMVxmbW9kZXJuIENvdXJpZXIgTmV3O30NCntcZjJc
Zm5pbFxmY2hhcnNldDIgU3ltYm9sO30NCntcZjNcZm1vZGVyblxmY2hhcnNldDAgQ291cmllciBO
ZXc7fX0NCntcY29sb3J0YmxccmVkMFxncmVlbjBcYmx1ZTA7XHJlZDBcZ3JlZW4wXGJsdWUyNTU7
fQ0KXHVjMVxwYXJkXHBsYWluXGRlZnRhYjM2MCBcZjBcZnMyMCBEZWFyIEtvZW4sXHBhcg0KXHBh
cg0KdGhhdHMgbm90IGEgZ29vZCBpZGVhci4gWW91IG1vdmUgdGhlIHByb2JsZW1zIHRvIGEgbGF0
ZXIgdGltZS4gXHBhcg0KXHBhcg0KVGhlIGJlc3Qgd2F5IGlzIHRvIGNoYW5nZSB0aGUgc291cmNl
IGFuZCB1c2UgdGhlIGtub3dsZWRnZSBvZiBPTS4gXHBhcg0KXHBhcg0KSG93P1xwYXINClxwYXIN
ClRoYXQncyB0aGUgd2F5OlxwYXINClxwYXINCjEuIFdyaXRlIEtFUk5FTDMyIGludG8gTG9nIHdp
bmRvdyBhbmQgc2VsZWN0IHRoYXQgd29yZFxwYXINCjIuIFNlYXJjaCBmb3IgS0VSTkVMMzIgdGhy
dSB0aGUgc291cmNlIG9mIEJCIDEuNSBccGFyDQpcdGFiIHZpYSBNZW51cyBJbmZvIC0+IFNlYXJj
aCBJbiBzb3VyY2VccGFyDQoyLiBPcGVuIHRoZSBmaWxlIHdoaWNoIHlvdSBmb3VuZCBmb3JtIEJC
IDEuNVxwYXINCjMuIE9wZW4gdGhlIHNhbWUgZmlsZSBmcm9tIEJCIDEuNlxwYXINCjQuIGNvbXBh
cmUgYm90aCBmaWxlcyBhbmQgeW91IHNlZSB3aGF0IHlvdSBoYXZlIHRvIGNoYW5nZS5ccGFyDQpc
cGFyDQpUaGF0J3MgdGhlIHdheSBJIGdldCBDcGNNZW51cyBydW5uaW5nIGp1c3QgYSBtaW51dGUg
YWdvLlxwYXINClxwYXINCkhlcmUgYXJlIHRoZSBjaGFuZ2VzIGZvciBDcGNNZW51czpccGFyDQpc
cGFyDQpQUk9DRURVUkUgRXhpc3QgKElOIHBhdGgsIG5hbWU6IEFSUkFZIE9GIENIQVIpOiBCT09M
RUFOO1xwYXINClZBUiBmdWxsbmFtZTogQVJSQVkgMjYwIE9GIENIQVI7IHJlZjogV2luQXBpLkhB
TkRMRTsgZm91bmQ6IEJPTEVBTjsgcmVzOiBJTlRFR0VSO1xwYXINCkJFR0lOXHBhcg0KXHRhYiBm
dWxsbmFtZSA6PSBwYXRoICsgJy8nICsgbmFtZTtccGFyDQpcdGFiIHJlZiA6PSBXaW5BcGkuQ3Jl
YXRlRmlsZVcoZnVsbG5hbWUsIFdpbkFwaS5HRU5FUklDX1JFQUQgKyBXaW5BcGkuRklMRV9TSEFS
RV9SRUFELFxwYXINClx0YWIgXHtcfSwgTklMLCBXaW5BcGkuT1BFTl9FWElTVElORywgXHtcfSwg
MCk7XHBhcg0KXHRhYiBmb3VuZCA6PSByZWYgIyBXaW5BcGkuSU5WQUxJRF9IQU5ETEVfVkFMVUU7
XHBhcg0KXHRhYiByZXMgOj0gV2luQXBpLkNsb3NlSGFuZGxlKHJlZik7XHBhcg0KXHRhYiBSRVRV
Uk4gZm91bmQ7XHBhcg0KRU5EIEV4aXN0O1xwYXINClxwYXINClJlZ2FyZHMgXHBhcg0KXHBhcg0K
SGVsbXV0XHBhcg0KXHBhcg0KXHBhcg0KXHBhcg0KLS0tLS1VcnNwclwnZmNuZ2xpY2hlIE5hY2hy
aWNodC0tLS0tXHBhcg0KVm9uOiBibGFja2JveEBvYmVyb24uY2ggW21haWx0bzpibGFja2JveEBv
YmVyb24uY2hdIEltIEF1ZnRyYWcgdm9uIEtvZW4gRGVzYWVnZXJccGFyDQpHZXNlbmRldDogRnJl
aXRhZywgNC4gTWFpIDIwMDcgMTA6MjFccGFyDQpBbjogQmxhY2tCb3ggTWFpbGluZyBMaXN0XHBh
cg0KQmV0cmVmZjogW0JsYWNrQm94XSAtIENvbXBvbmVudC1QYXNjYWwgQ29sbGVjdGlvbiAmIEJs
YWNrQm94IDEuNlxwYXINClxwYXINCkhlbGxvIFJvYmVydCxccGFyDQpccGFyDQpUaGVzZSBkZXBy
ZWNhdGVkIG1vZHVsZXMgYXJlIGF2YWlsYWJsZSBhcyBzeW1ib2wgZmlsZXMgaW4gdGhlIDEuNSBy
ZWxlYXNlLCBzbyBvbmUgY291bGQgc2F2ZSB0aGVtZVxwYXINCmFzIHRleHQgaW4gMS41IGFuZCB0
cmFuc2ZlciB0aGVtIHRvIDEuNi5ccGFyDQpccGFyDQpCcmdkcyxccGFyDQpLb2VuLlxwYXINClxw
YXINClxwYXINCk9uIEZyaSwgNCBNYXkgMjAwNyAwOTowMDowOCArMDEwMCwgeW91IHdyb3RlOlxw
YXINClxwYXINClxwYXINCj5ccGFyDQo+XHBhcg0KPk9tcywgYWxsXHBhcg0KPlxwYXINCj5NYW55
IHllYXJzIGFnbyBJIHdyb3RlIHNvbWUgY29kZSB1c2luZyBVU0VSMzIgKGFuZCBwcm9iYWJseVxw
YXINCj5zb21lIG90aGVyIGRlcHJlY2F0ZWQgTW9kdWxlcykuIEkgbm93IGZvcmdldCB0aGUgZGV0
YWlsZWQgZGVzaWduXHBhcg0KPnRoaW5raW5nLlxwYXINCj5ccGFyDQo+VG8gdHJhbnNsYXRlIHRo
aXMgdG8gYmUgMS42IGNvbXBhdGlibGUgSSB0aGluayBpdCB3b3VsZCBiZSBoZWxwZnVsXHBhcg0K
PnRvIGJlIGFibGUgdG8gcmVhZCB0aGUgVVNFUjMyIHNvdXJjZSBzbyB0aGF0IEkgY2FuIGRpcmVj
dGx5IGNhbGxccGFyDQo+dGhlIGNvcnJlc3BvbmRpbmcgV2luQXBpIGZ1bmN0aW9ucyBpbiB0aGUg
c2FtZSB3YXkuXHBhcg0KPlxwYXINCj5BbSBJIGNvcnJlY3QsIGFuZCBjYW4gdGhlc2Ugc291cmNl
cyBiZSBtYWRlIGF2YWlsYWJsZSBmb3IgdGhpcyBwdXJwb3NlP1xwYXINCj5ccGFyDQo+XHBhcg0K
PlxwYXINCj5SZWdhcmRzXHBhcg0KPiBccGFyDQo+Um9iZXJ0XHBhcg0KPlxwYXINCj5TRUxFWCBT
ZW5zb3JzIGFuZCBBaXJib3JuZSBTeXN0ZW1zIExpbWl0ZWRccGFyDQo+UmVnaXN0ZXJlZCBPZmZp
Y2U6IFNpZ21hIEhvdXNlLCBDaHJpc3RvcGhlciBNYXJ0aW4gUm9hZCwgQmFzaWxkb24sIEVzc2V4
IFNTMTQgM0VMXHBhcg0KPkEgY29tcGFueSByZWdpc3RlcmVkIGluIEVuZ2xhbmQgJiBXYWxlcy4g
IENvbXBhbnkgbm8uIDAyNDI2MTMyXHBhcg0KPioqKioqKioqKioqKioqKioqKioqKioqKioqKioq
KioqKioqKioqKioqKioqKioqKioqKioqKioqKioqKioqKioqKioqXHBhcg0KPlRoaXMgZW1haWwg
YW5kIGFueSBhdHRhY2htZW50cyBhcmUgY29uZmlkZW50aWFsIHRvIHRoZSBpbnRlbmRlZFxwYXIN
Cj5yZWNpcGllbnQgYW5kIG1heSBhbHNvIGJlIHByaXZpbGVnZWQuIElmIHlvdSBhcmUgbm90IHRo
ZSBpbnRlbmRlZFxwYXINCj5yZWNpcGllbnQgcGxlYXNlIGRlbGV0ZSBpdCBmcm9tIHlvdXIgc3lz
dGVtIGFuZCBub3RpZnkgdGhlIHNlbmRlci5ccGFyDQo+WW91IHNob3VsZCBub3QgY29weSBpdCBv
ciB1c2UgaXQgZm9yIGFueSBwdXJwb3NlIG5vciBkaXNjbG9zZSBvclxwYXINCj5kaXN0cmlidXRl
IGl0cyBjb250ZW50cyB0byBhbnkgb3RoZXIgcGVyc29uLlxwYXINCj4qKioqKioqKioqKioqKioq
KioqKioqKioqKioqKioqKioqKioqKioqKioqKioqKioqKioqKioqKioqKioqKioqKioqKlxwYXIN
Cj5ccGFyDQo+LS0tIEJsYWNrQm94XHBhcg0KPi0tLSBzZW5kIHN1YmplY3QgSEVMUCBvciBVTlNV
QlNDUklCRSB0byBibGFja2JveEBvYmVyb24uY2hccGFyDQo+XHBhcg0KXHBhcg0KLS0tIEJsYWNr
Qm94XHBhcg0KLS0tIHNlbmQgc3ViamVjdCBIRUxQIG9yIFVOU1VCU0NSSUJFIHRvIGJsYWNrYm94
QG9iZXJvbi5jaFxwYXINClxwYXINCi0tLSBCbGFja0JveFxwYXINCi0tLSBzZW5kIHN1YmplY3Qg
SEVMUCBvciBVTlNVQlNDUklCRSB0byBibGFja2JveEBvYmVyb24uY2hccGF9fQBrYm94QG9i
----boundary-LibPST-iamunique-1433444792_-_---
Received on Fri May 04 2007 - 14:33:36 UTC