Posted by Caramia on April 05, 2005
In Reply to: Re: Help on using this USB component posted by webmaster Guido on April 05, 2005
First of all thanks for your 'immediatly' replay !!
Something is wrong ...
...... private FWindowHandle: HWND; ........ function USBRegister: Boolean; procedure Register; protected procedure WMDeviceChange(var Msg: TMessage); .........
2° I added in the implementation section (the last procedure):
....... if Assigned(r) then Result := True; end; procedure Register; begin RegisterComponents('Samples', [TComponentUSB]); end; end.
3° I tried to install the component but an error occurred near the line in implementation section where i added 'procedure register'.
Unsatisfied forward or external declaration: 'TComponentUSB.Register'
Related Articles and Replies