Re: Building a Modular System - Visual Basic Discussion Boards

i wrote a program which draws lines on a picturebox when user clickes on it.
theres no picture iniside the picture box and i intend to know the color of these pixels programitically.

A.E.K

So what's the question? What part of this are you having a problem with?

Dave Kreskowiak
Microsoft MVP
Visual Developer - Visual Basic
2006, 2007

getpixel needs a bitmap.
but my picture box has no bitmap.i draw on it from paint event of the picture box.
how can i make a bitmap from such picture box?

A.E.K

You don't. Draw on a bitmap, then show it using the picturebox. You can use the picturebox to give you the mouse events, then do all your drawing on the bitmap.

Dave Kreskowiak
Microsoft MVP
Visual Developer - Visual Basic
2006, 2007

thanks a lot.

A.E.K

Hi I am writing a service which needs to monitor multiple programs/files etc on a system. The Service is being designed so that it will call standard methods against a range of Standardised dll's.

Application1.GetLastEvent 'Where Application1 is an dll written purely to talk to Application1
Application2.GetlastEvent 'Where Application2 is another dll written purely to talk to Application2

Each dll is being written to get the relevent details from a particular application. Now I could compile the application with all the dll's and just have a setting to only make the request if the application is installed but this would mean rebuilding and and redeploying the service if we wanted to add and check application 3. Im sure this must be possible at runtime.

What I want to achieve is have a runtime list of dll's for the installed applications and make the standard calls against each in turn. The Application should not need to know anything about these apart from the methods which are standard across all of the them.

Thanks in advance, I dont really need a full code listing on this one just a nudge in the right direction as cant seem to find the correct terms to find anything on the WWW.

Confused | :confused:

James

First learn how to speak ~ Then you figure out what Language to speak

TheFarsider wrote:
The Service is being designed so that it will call standard methods against a range of Standardised dll's.

Are these .DLL's being written so that each one is programmed to interact with a specific application??

I think you're talking about "plugin" support for your service app. Your service app would look for these plugins in a specific folder and load them one by one. Each .DLL would have to implement an interface that the service expects them to have so the service can communicate with each plugin.

Dave Kreskowiak
Microsoft MVP
Visual Developer - Visual Basic
2006, 2007

Dave Thanks for the reply.

The Plugin Method is one I did look at but I have managed to find the solution and once I got to the route of it, was really quite simple although admitadly I dont fully understand the solution myself yet.

Thanks to Peter Huang and Terry for hitting a similar problem and providing me the vital clues

Below is my proof of concept code

'#### Application Code ###
Dim ModulePath As String = ".\Modules\"

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim di As New IO.DirectoryInfo(ModulePath)
Dim aryFi As IO.FileInfo() = di.GetFiles("*.dll")
Dim fi As IO.FileInfo

For Each fi In aryFi
dllName = "James"
GetCopyrights(fi.FullName, dllName)
Next
End Sub

Sub GetCopyrights(ByVal dllPath As String, ByVal dllName as String)

Dim oRMS As Object = Nothing
Try
oRMS = Activator.CreateInstanceFrom(dllPath, dllName & ".RMS.Controller").Unwrap()
Catch ex As Exception
Console.WriteLine(ex.ToString())
End Try
If oRMS IsNot Nothing Then
Console.WriteLine (oRMS.Copyright())
End If
oRMS = Nothing
End Sub

'### Sample DLL Code ###

Namespace RMS
Public Interface iController
Function Copyright() As String
End Interface

Public Class Controller
Implements iController
Function Copyright() As String Implements iController.Copyright
Return "James Tutton 2007"
End Function
End Class
End Namespace

The only thing id still like to do is make sure the interfaces are common for both the dll and oRMS . The Overall purpose is building a service that uses a common interface for performing common activities. Sorry for the vagueness of my explanations but I am working under some strict NDA's on the specifics of the project.

--How do you quote on this site??? anyhow
Are these .DLL's being written so that each one is programmed to interact with a specific application??

Yes, the idea is that we build a dll to interact with each third party application we need to intereact with but all the calls and return values are normalised across them by the dlls.

Hi i am using frameset in my page...,
In that frame set,one side i'm showing links,
if i click that links, in another html page my aspx page will be display...,
In that aspx page want to be adjust based on user property...,
It means,now i am using in that aspx page scroll tab...,
But with out scroll tab if i try to show some of the information on that page will be hide..,
But i want to show all information with out using scroll tab...,
How its possible plz help me...,

Magi

This question belongs in the ASP.NET Forum, which I see you've already post it there too. Please don't cross post in multiple forums. It makes it very difficult for multiple people to collaborate on an answer for you.

Dave Kreskowiak
Microsoft MVP
Visual Developer - Visual Basic
2006, 2007

hello all,

am a begginer in vb. am creating one small project using vb6.0 and msacess 2003. my problem is i have set one field as a Primary key in that if the no entered is alredy there in databse it was return some error msg, but in my project instead of that error msg i want to create some msgbox that told the no u typed is already there pease choose another. please give me any syntax for that coding? below code is return by me in the insert click. Please give me suggesstion it is very urgent.

<br />
Private Sub cmdverify_Click()<br />
If (Text1.Text = "") Then<br />
MsgBox ("Please Scan Properly")<br />
Else<br />
rs.Open "select * from barcode", con, adOpenDynamic, adLockOptimistic<br />
rs.AddNew<br />
rs!barcode = Text1.Text<br />
rs.Update<br />
Text1.Text = ""<br />
Text1.SetFocus<br />
rs.Close<br />
End If<br />
End Sub<br />

try this:

rs.Open "Select * from barcode Where barcodeid='" & txtbarcodeid.Text & "',con,1,3

if rs.eof then
rs.addnew
rs.fields("barcode")=text1.text
rs.Update

else // if existed
msgbox "Record Existed"
endif

NOTE: make sure you have a "WHERE" to your SELECT so that you have a unique record to search.

Don't block the drive way of all the newbies in programming. Smile | :)

thank u ya. it was working fine. thanks a lot

Does anyone know of any trickery to get the NodeCheck event to fire?

Is it possible to convert the text file to an image like jpg,bitmap? because i have created a program that can save my text file into .tiff file. any idea about text file to jpeg file?

Don't block the drive way to all the newbies in programming. Smile | :)

)

klaydze wrote:
because i have created a program that can save my text file into .tiff file. any idea about text file to jpeg file?

If you're creating a bitmap already, just save it as a jpeg instead of a tiff.

Christian Graus - Microsoft MVP - C++
Metal Musings - Rex and my new metal blog
"I am working on a project that will convert a FORTRAN code to corresponding C++ code.I am not aware of FORTRAN syntax" ( spotted in the C++/CLI forum )

Hi What is difference between declaration of variable using Dim and Var?

Spread wat u Know!

the most basic difference is of VB and Jscript. dim is used in VB while var in JavaScript and as far as I know dim requires datatype at the time of declaration var doesn't

With Thanks & Regards
Amit Sk Sharma

I want to put a picture as a background in the sstabheader and also i want to write some text over there...
(image over Text)
is there any options in SSTAB in VB6.0

plz tell me...

Thanks & Regards
Kumaran

No, there's no built-in option to do this. You'd have to ownerdraw the control yourself, supplying the code to render the background image and supply the properties to set the the image you want. But since this is VB6, I've long since forgotten how to do this.

Dave Kreskowiak
Microsoft MVP
Visual Developer - Visual Basic
2006, 2007

Dear all
Although working in DOT NET but don't know how to use debug for watching/tracing the program line by line. Plz let me know the way I can have an effective debug. Doubts are-
1. how to put a break point?
2. application directly goes to browsers without stopping on break points,how to chk variable status and effect of code?
3. I m familier with program tracing in C . is there some way to implement such a line by line debug/tracing of code we have written.

Plz do tell me

With Thanks & Regards
Amit Sk Sharma

1 - F9
2 - Make sure you're running a debug build and pressed F5 to start debugging. Then, you can check anything you like ( it will stop )
3 - yes, if you must.

Christian Graus - Microsoft MVP - C++
Metal Musings - Rex and my new metal blog
"I am working on a project that will convert a FORTRAN code to corresponding C++ code.I am not aware of FORTRAN syntax" ( spotted in the C++/CLI forum )

Thnx dear

it helped me

With Thanks & Regards
Amit Sk Sharma

How can I refresh inet control in VB6.

Virendra

That depends on what you mean by "refresh". What are you doing that requires you to do this?

Dave Kreskowiak
Microsoft MVP
Visual Developer - Visual Basic
2006, 2007