[ Shadowed @ 24.01.2005. 13:47 ] @
Pravim aplikaciju koja treba da ima podrsku za pluginove. Napravio sam interfejs i jednu klasu koja ga implementira i to kompajlirao. Problem je sa kodom za "ucitavanje" interfejsa: Code: Dim tmpPlugin As IInput Dim i As Integer Dim x As Object InputPlugins = PluginEngine.FindPlugins(PluginsPath, "IInput") For i = 0 To InputPlugins.Length - 1 x = PluginEngine.CreateInstance(InputPlugins(i)) tmpPlugin = DirectCast(x, IInput) lstInput.Items.Add(tmpPlugin.Name) Next Linija x = PluginEngine.CreateInstance(InputPlugins(i)) se izvrsi dobro: a kod sledece linije dobijem error iz naslova. Probao sam i CType ali je ista situacija. Trazio sam dva dana sta bi mogla da bude greska ali nisam nasao... |