When I CreateNetworkServer and a Client connect to Server,How can I get the Client's IP(Client couldn't send anything)
2) Gadget
I try to Show a BalloonTip on SysTrayIcon when comes an event.
I use under codes
Code: Select all
AddSysTrayIcon(#SysTrayIcon, WindowID(), ImageID)
BalloonTip(WindowID(), #SysTrayIcon, "This is a test", "This is a test", #TOOLTIP_WARNING_ICON)
3) Shellcommand
codes:
Code: Select all
Procedure.s cmdreturn(command$,timeout.l)
Protected Result$
RunProgram("cmd"," /c " + command$ + " >"+GetTempPath()+"cmd.tmp","",2)
Delay(timeout)
If OpenFile(0, GetTempPath()+"cmd.tmp")
While Eof(0) = 0
Result$ +ReadString()+#EOF
Wend
CloseFile(0)
EndIf
ProcedureReturn Result$
EndProcedure


4) Image
Fuction:
Code: Select all
Procedure MakeDesktopScreenshot(ImageNr,x,y,Width,Height)
hImage = CreateImage(ImageNr,Width,Height)
hDC = StartDrawing(ImageOutput())
DeskDC = GetDC_(GetDesktopWindow_())
BitBlt_(hDC,0,0,Width,Height,DeskDC,x,y,#SRCCOPY)
StopDrawing()
ReleaseDC_(GetDesktopWindow_(),DeskDC)
ResizeImage(ImageNr,640,480)
ProcedureReturn hImage
EndProcedure
I use fuction CatchImage(),But It's the opposition
---------------------
Waiting for Help:P