Re: OK, This newbie is stumped...

Charles Turner <vze26m98@[EMAIL PROTECTED]
> wrote:

> nil MyComponentDescription _FindNextComponent
> 
> \ DUP the component address because _GetComponentInfo will consume it
> DUP
> 
> \ Get info. We use nil to remove the influence of the handle defined
> above.
> \ DROP the return code...
> MyComponentDescription nil nil nil _GetComponentInfo DROP
> 
> \ Find next component. Why does it return )?
> MyComponentDescription _FindNextComponent
> 
> \ MyComponentDescription is trashed...
> MyComponentDescription 32 CHARS DUMP

nil MyComponentDescription _FindNextComponent .s
    ( 1 ) \ 65558 

MyComponentDescription 20 CHARS DUMP
          0  1  2  3  4  5  6  7  8  9  A  B  C  D  E  F
2017CA8: 61 75 6F 75 00 00 00 00 00 00 00 00 00 00 00 00
2017CB8: 00 00 00 00 00 2F FA 4C 00 2F FA 58 00 2F FA 5C

so far, so good.

dup MyComponentDescription nil nil nil _GetComponentInfo .
0    \ no error
MyComponentDescription 20 CHARS DUMP
          0  1  2  3  4  5  6  7  8  9  A  B  C  D  E  F
2017CA8: 61 75 6F 75 61 68 61 6C 61 70 70 6C 10 00 00 00  
2017CB8: 00 01 00 16 

GetComponentInfo has done what you asked and filled in the fields of
MyComponentDescription

Now, when you use FindNextComponent to look for the next companent of
componentType = 'auou'
componentSubType = 'ahal'
componentManufacturer = 'appl'
componentFlags = 0

It tells you that there is no other component that meets these criteria

Iterate the compnents first, then do GetComponentInfo on each
or reset the fields in MyComponentDescription after doing
GetComponentInfo if you want to get info on each as you go.

 -- w