It is currently Sun May 31, 2020 5:30 pm

All times are UTC + 1 hour




Post new topic Reply to topic  [ 182 posts ]  Go to page 1, 2, 3, 4, 5 ... 13  Next
Author Message
 Post subject: DroopyLib
PostPosted: Wed Apr 13, 2011 1:04 pm 
Offline
Enthusiast
Enthusiast
User avatar

Joined: Thu Sep 16, 2004 9:50 pm
Posts: 658
Location: France
Hi,

This new library is created using PBFastLib.

Dowload it @ my signature

Regards

_________________
DroopyLib/PBFastLib/HMod


Top
 Profile  
Reply with quote  
 Post subject: Re: DroopyLib
PostPosted: Wed Apr 13, 2011 9:14 pm 
Offline
Enthusiast
Enthusiast
User avatar

Joined: Thu Sep 16, 2004 9:50 pm
Posts: 658
Location: France
Installer changed : PureBasic path can be set

The help file include the source code :wink:
Here's a list of the functions of this first version
Quote:
StringToOem(StringAddress) ; Translates a string into the OEM-defined character set.
OemToString(StringAddress) ; Translates a string from the OEM-defined character set into either an ANSI or a wide-character string
Hex2Dec(hex.s) ; Converts a Hex value ( as String ) to a Decimal value ( as Long )
Bin2Dec(BinaryStringNumber.s) ; Converts a Binary value ( as String ) to a Decimal value ( as Long )
ForegroundWindowGet() ; Returns The handle of The foreground window
ForegroundWindowSet(WindowsHandle) ; Sets the Foreground Window
NNot(Bool) ; Same as Not
Ansi2Unicode(string.s) ; Converts normal (Ansi) string To Unicode (L)
Unicode2Ansi(Pointer) ; Converts Unicode to normal (Ansi) string (M)
DroopyVersion() ; Return the library version
MakeSureDirectoryPathExists(Directory.s) ; Creates all directories in the specified path
GetSpecialFolderLocation(fid.l) ; Get Name / Folder of Windows Special Folders
GetFilePartWE(File.s) ; Return only file part without extension
GetProgramResultExitCode() ; Return the error code of the program lauched by GetProgramResult
GetProgramResult(File.s,Parameters.s) ; Retrieve the result of a command line
CiscoFormat(MacAddress.s) ; Return mac address as 'Cisco' format
GetMacAddress(Subnet.s) ; Return mac address of a specific subnet
WMI(WMICommand.s) ; Interrogate WMI Database
String2Hex(string.s) ; Convert string to hex
Hex2String(string.s) ; Convert hex to string
DocumentAndSettings() ; Return Document and Settings Folder
MonitorPower(State.b) ; Turn off / On / Standyby the monitor
Beep(Frequency,Duration) ; Generates simple tones on the speaker
MessageBeep(Sound) ; Play a windows sound
BlockInput(State.l) ; Inhibit keyboard & Mouse
GuidAPI() ; Return a GUID
ComputerSerialNumber() ; Retrieve the Computer Serial Number
NTCore() ; Returns 1 if OS has an NT Core ( NT/2K/XP/... ) / 0 if W95/98/ME
ReturnKeyToButtonClick(Window) ; Simulate a left click when you press ENTER over an activated Button
PureBasicPath() ; Return PureBasic Path
PureBasicVersion() ; Return Purebasic version
ScreenSaver() ; Runs the Screen-Saver immediately
GetLastError() ; Return the last Win32 API error as a string
GetLastErrorAsText(LastError.l) ; Used to get Last Win32 API Error
SelfEncryption(text.s,en.l) ; Encrypt a String (text) if en=#True / Decrypt if en=#False
RC4Api(string.s, Password.s) ; Encode / Decode a String with a key using Windows API ( RC4 algorithm )
LogInit(LogFile.s,DateFormat.s="%dd/%mm/%yy %hh:%ii:%ss ") ; Creates a LogFile
LogWrite(text.s) ; Appends Date & Time + Text to the log file
LogInitAuto() ; Init log file to ProgramFiles\Disc\ExeName.log
MeasureIntervalStart() ; Defines the point where you want to start measuring your code
MeasureIntervalStop() ; Defines the point where you want to stop measuring your code
MeasureHiResIntervalStart() ; Defines the point where you want to start measuring your code
MeasureHiResIntervalStop() ; Defines the point where you want to stop measuring your code
SaveResourceAs(Name.s,File.s) ; Save the resource as a file ( Name is the first field of the RC file )
GetResourcePointer(Name.s) ; Returns a pointer of a resource ( Name is the first field of the RC file )
GetResourceSize(Name.s) ; Returns the size of a resource ( Name is the first field of the RC file )
RegSetValue(Key.s, ValueName.s, Value.s, Type, ComputerName.s) ; Sets a Value
RegGetValue(Key.s, ValueName.s, ComputerName.s) ; Gets a Value
RegGetType(Key.s, ValueName.s, ComputerName.s) ; Returns Key Type
RegListSubKey(Key.s, index, ComputerName.s) ; Lists all SubKeys
RegDeleteValue(Key.s, ValueName.s, ComputerName.s) ; Deletes a Value
RegCreateKey(Key.s, ComputerName.s) ; Creates a Key
RegDeleteKey(Key.s, ComputerName.s) ; Deletes a Key
RegListSubValue(Key.s, index, ComputerName.s) ; Lists all SubValues
RegKeyExists(Key.s, ComputerName.s) ; Tests if a Key exists
RegDeleteKeyWithAllSub(Key.s,ComputerName.s); Deletes a Key and all its SubKeys / Values
RegCreateKeyValue(Key.s,ValueName.s,Value.s,Type,ComputerName.s) ; Creates a Key and a Value in a Single Command
RegValueExists(Key.s, ValueName.s, ComputerName.s) ; Tests if a Value Name exists
UserLoggedOn() ; Return Logged on user (XP only)
UserGuid(Username.s) ; Return the GUID of the user
UserShellFolder(GUID.s,ShellFolder.s) ; Return shell folder of a user (XP only)
Bargraph(x,y,width,height,Direction,medium.f,hight.f,full.f,color1,color2,color3,BackgroundColor) ; Creates a bar graph gadget .
BargraphSet(Id,Value.f) ; Sets the value of the bar graph
BargraphGet(Id) ; Get the value of the bar graph
BargraphEvent(Id) ; Returns 1 if you click on a bar graph gadget
Graph(x,y,width,height,Segment,medium.f,hight.f,full.f,color1,color2,color3,LineColor) ; Creates a Graph gadget .
GraphSet(Id,Value.f) ; Sets the value of the Graph
GraphGet(Id) ; Get the value of the Graph
GraphEvent(Id) ; Returns 1 if you click on a Graph gadget
SignedBinaryToUnsigned(byte.b) ; Purebasic shows a Byte as signed, this function shows a Byte as unsigned
SignedWordToUnsigned(Word.w) ; Purebasic show Word as signed, this function show a Word as unsigned
Odd(Number.l) ; Returns 1 if the number is odd ( pair in french )
Even(Number.l) ; Returns 1 if the number is even ( impair in french )
FlagSet(Flag.s,Value.s) ; Set a Flag value
FlagGet(Flag.s) ; Get a Flag Value
FlagDelete(Flag.s) ; Deletes a Flag
FlagCreate(Flag.s) ; Creates a Flag ( value = OK )
FlagInit(Key.s) ; Initialize the Library
FlagExist(Flag.s) ; Returns 1 if Flag exists / 0 instead
FlagDontExist(Flag.s) ; Returns 1 if Flag doesn't exist / 0 Instead
FlagRAZ() ; Delete All Flags and the Key Specified in FlagInit
GetPowerStatus() ; Return 0 Offline / 1 Online / 255 unknown
GetBatteryChargeStatus() ; Return 1 High / 2 Low / 4 Critical / 8 Charging / 128 No system battery / 255 Unknown
GetBatteryLifePercent() ; Return Percentage of full battery charge remaining
GetBatteryLifeTime() ; Return Number of seconds of battery life remaining : -1 Unknown
GetBatteryFullLifeTime() ; Number of seconds of battery life when at full charge : -1 Unknown
Logoff() ; Forced Logoff
Reboot() ; Forced Reboot
ShutDownAndPowerOff() ; Forced ShutDown and Power Off
LockWorkStation() ; Lock the Workstation
RunProgramAtStartup(WichUser.l,RunOrRunOnce.l,Name.s,CommandLine.s) ; Add an entry to the Run or RunOnce Key
DelProgramAtStartup(WichUser.l,RunOrRunOnce.l,Name.s) ; Delete an Entry in the Run or RunOnce Key
IsProgramRunAtStartup(WichUser.l,RunOrRunOnce.l,Name.s) ; Tests if an entry is present and valid .
EnumProcessInit() ; Initialize the function for enumerating processes
EnumProcess() ; Each time this function is called a process is returned as a string, until an empty string ( All process is listed )
GetPidProcess(Name.s) ; Returns Pid of Process if it exists / 0 if it doesn't exist
KillProcess(Pid) ; Kill a process by specifying it's Pid
Runas(Username.s,Domain.s,Password.s,CommandLine.s,Argument.s) ; Runas function with Parameters / Password
SuperRunas(Username.s,Password.s,CommandLine.s,Parametre.s) ; Runas function with Parameters / Password
SearchProcess(Name.s) ; Search if a Process is Running ( Scans processes without Window(s) as well )
RunOnlyOneInstance() ; End the Program if another instance is found !!
HandleToFileName(hWnd.l) ; Returns the file Path and Name of the exe that owns the specified Window Handle
PidToFileName(Pid.l) ; Returns the file Path and Name to the exe that has specified Process Pid
WaitProgramInitialisation(Handle) ; Waits until the specified Process is waiting for user input with no input pending, or until the time-out interval has elapsed
AddRecentDocuments(File.s) ; Adds a file to the recent documents
ClearRecentDocuments() ; Clears the recent documents folder
PathGet() ; Returns the Path
PathSet(Path.s) ; Set the Path
PathAdd(StringToAdd.s) ; Add this string to the Path ( the ; is added automatically )
PathRefresh() ; Force Windows to refresh the Path value for new processes
GetSystemDirectory() ; This Function retrieves the path of the system directory
GetWindowsDirectory() ; This Function retrieves the path of the Windows directory
SetComputerName(NetbiosName.s) ; Sets the NetbiosName for the local computer
SetComputerNameEx(Name.s) ; Sets the NetbiosName & HostName for the local computer
OSVersionText() ; Returns OsVersion in Text Format
GetComputerName() ; Retrieves the NetBIOS name of the local computer
BootState() ; Return the system Boot state
CheckInternetConnection() ; Retrieves the connected state of the local system
CommandLineShell() ; Returns the Command Line Shell ( Cmd.exe or Command.com & it's path )
ShowTaskBar(State) ; Show (#True) or Hide (#False) the taskbar
XPFirewall(State.l) ; Enable if #True or Disable if #False the Windows FireWall
WNetAddConnection(ShareName.s,Password.s,DriveLetter.s) ; Map a Network Drive using a Password
WNetAddConnectionNT(Username.s,Password.s,ShareName.s,DriveLetter.s,Persistant.l) ; Map Network Drive with a UserName / Password
WNetCancelConnection(DriveLetter.s,force.l) ; Disconnect Network Map Drive
IsNetDrive(Drive.s) ; Tests if a Drive is a Network Drive
NovellClientVersion() ; Return the Novell Client Version ( + Revision ) like 491SP5
GlobalMemoryStatusMemoryLoad() ; Specifies a number between 0 And 100 that gives a general idea of current Memory utilization, in which 0 indicates no memory use And 100 indicates full Memory use.
GlobalMemoryStatusTotalPhys() ; Indicates the total number of Mbytes of physical Memory.
GlobalMemoryStatusAvailPhys() ; Indicates the number of Mbytes of physical Memory available.
GlobalMemoryStatusTotalPageFile() ; Indicates the total number of Mbytes that can be stored in the paging file. Note that this number does not represent the actual physical size of the paging file on disk.
GlobalMemoryStatusAvailPageFile() ; Indicates the number of Mbytes available in the paging file.
GlobalMemoryStatusTotalVirtual() ; Indicates the total number of Mbytes that can be described in the user mode portion of the virtual address space of the calling process.
GlobalMemoryStatusAvailVirtual() ; Indicates the number of Mbytes of unreserved And uncommitted Memory in the user mode portion of the virtual address space of the calling process.
ImpersonateUser(Username.s,Domain.s,Password.s) ; Impersonate the process as the specified user
ImpersonateUserDisable() ; Stop the Impersonation
IniWrite(INIFile.s,Section.s,Key.s,string.s) ; Writes a key to an Ini File
IniRead(INIFile.s,Section.s,Key.s) ; Returns the contents of a key from an Ini File
GetUserName() ; Returns the Name of the User logged onto the Workstation
IsUserAnAdmin() ; Returns 1 if current user is administrator / 0 instead
NetLocalGroupEnum() ; Retrieves LocalGroup names
NetLocalGroupAdd(GroupName.s) ; Adds(creates) the local group named "GroupName"
NetLocalGroupDel(GroupName.s) ; Deletes the local group named "GroupName"
NetLocalGroupAddMembers(GroupName.s,AccountName.s) ; Adds a member to the local group named "GroupName"
NetLocalGroupDelMembers(GroupName.s,AccountName.s) ; Deletes a member to the local group named "GroupName"
NetLocalGroupGetMembers(groupe.s) ; Retrieves the Members of a LocalGroup
NetUserAdd(Username.s,Password.s) ; Creates a local User
NetUserChangePassword(Username.s,Domain.s,OldPassword.s,NewPassword.s) ; Change the user's password
NetUserEnum() ; Retrieves all UserNames
UserExist(Username.s,Password.s) ; Returns 1 if User & Password correct (User exist)
NetUserDel(Name.s) ; Deletes a local User
SearchFilesInit(Path.s,Mask.s,Recurse.l) ; Searches Path for files that match the Mask
SearchFilesGet() ; Each time you call SearchFilesGet() it returns a FileName.
DeleteFileToRecycleBin(File.s) ; Deletes the file to the Recycle Bin without confirmation / ProgressBar
EmptyRecycleBin() ; Deletes all files in the RecycleBin on all drives without Sound / Progress Bar / Confirmation
FileGetTime(File.s,Which); Get the time of a File
FileSetTime(File.s,Date,Which); Set the time of a File
CheckForMedium(Drive.s) ; Checks if medium is a drive, without getting the requester "Please insert...."
GetDriveVolumeName(Drive.s) ; Returns the Volume name of the drive / Empty String if drive isn't available
GetDriveFileSystem(Drive.s) ; Returns the FileSystem of the drive : FAT / FAT32 / NTFS
GetDiskFreeSpaceEx(Drive.s) ; Returns available free Disk space ( in Mb ) or 0 if Drive is not available or full
RealDriveType(Drive.s) ; Returns the Real Drive Type
AssociateFileEx(ext$,ext_description$,programm$,Icon$,prgkey$,cmd_description$,cmd_key$) ; AssociateFileEx(Extension,Extension Description,FullProgramPath&Name,Icon,just programname,command Description,command)
AssociateFile(ext$,ext_description$,programm$,Icon$) ; AssociateFile(Extension,Extension Description,FullProgramPath&Name,Icon)
RemoveAssociateFile(ext$,prgkey$) ; Remove association
CreateShortcut(Path.s,Link.s,Argument.s,Description.s,WorkingDir.s,ShowCommand.l,HotKey.l,IconFile.s="|",IconIndex.l=0) ; Create shell links/shortcuts
CreateSizedFile(File.s,Block) ; Create a file with size you want
GetFileType(File.s) ; Returns as a string the type of the file
GetFileVersion(FileName.s,Which,FieldName) ; Gets exe/dll file information as a string
RenameDrive(drive$,name$) ; Renames the Drive to Name$
CountRemovableDrive() ; Returns the number of Removable Media drives with media present
FormatDisk(Drive.s,quick) ; Only invokes the format prompt (doesn't format automatically).
Timer(TimerId,Delay,ProcedureAdress) ; Create a Timer which calls a Procedure
TimerKill(TimerId) ; Kill the Timer specified by Timerid
GetUserLanguage() ; Retrieves the Language of the user
GetUserSubLanguage() ; Retrieves the Sub-Language of the user
GetLanguage(wich) ; Returns the default primary language identifier ( 0 system / 1 User )
EnableWindow(Handle,State) ; Set if the window is enabled For mouse And keyboard input
IsWindowEnabled(Handle) ; Determines whether The specified window is enabled For mouse And keyboard input
IconExtract(File.s,Icon.l) ; File specifies the File to extract the icon from
IconExtractEx(File.s,Size.l,Selected.l) ; Returns ImageId of an Icon embedded in a file (Exe Or Dll )
SetWindowIcon(Handle,IconHandle)
GetExtensionIcon(Extension.s, Size.l) ; Returns the imageid of the icon associated by the extension
ShellAboutWindow(ParentWindow.l,Title.s,FirstText.s,DialogText.s,Icon.l) ; Shows a Microsoft 'About Windows' window
GetHandle(WindowsName.s) ; Returns the Handle of the Windows specified by name
SetWindowsTransparency(Handle.l, Transparency_Level.l) ; Sets Window Transparency between 1 ( invisible ) and 255 ( visible )
WindowsEnum() ; List all open Windows by Title
CloseWindows(WindowsName.s) ; Close Windows specified by WindowsName
ShowDesktop() ; Hide all Windows, and Show the Desktop
InputPasswordRequester(Title.s) ; Same as InputRequester but for Passwords
GetPixelColor(x,y) ; Returns the RGB color of the pixel at the specified coordinates or #CLR_INVALID (-1) if coordinate is outside of the screen
WindowFx(Id,ms,fx) ; Cool window FX for your apps (fade in/out, slide,wipe) / For creating LaunchBar
ChangeDisplaySettings(width,height,Depth,Freq,Permanent) ; Changes the display resolution / Depth / frequency
EnumDisplay(display.s) ; Determines all the screen modes.
GetDesktopHandle() ; Returns the Desktop Window Handle, Useful for creating Systray Icon without opening a window or creating an invisible window
WindowsExit(WindowID,State) ; Enable the user to close the window if #True
WindowsMove(WindowID,State) ; You can move window if #True / with #False you can't
ShowWindow(Handle,State) ; Sets the specified window's show state
FlashWindow(hWnd,Delay,Time) ; Flash the Window specified by hwnd
GetWindowTitleEx(hWnd) ; Uses getwindowtext_() to get the title of the specified hwnd
ToolTipAdd(Type,MaxWidth,WindowID,Gadget,Text$,Title$,Icon,TextColor,BKColor,Font.s,FontSize) ; Type : 0 = Balloon Tip / 1 Square Tip
ToolTipRemove(Gadget.l,WindowID=0) ;Remove a ToolTip
ToolTipChange(Gadget.l, Text$,WindowID=0) ; Change the text of the ToolTip
ToolTipShow(Gadget.l,x,y,WindowID=0) ; Force Showing a ToolTip
ToolTipHide(Gadget.l,WindowID=0) ; Hide a ToolTip previously Show with ToolTipShow
Between(string.s, LString.s, RString.s) ; Returns the string between the two strings
GetMouseX() ; Get the X coordinate of the mouse pointer
GetMouseY() ; Get the Y coordinate of the mouse pointer
SetMouseXY(x,y) ; Set the Location of the mouse pointer
SetMouseClick(MouseEvent) ; Simulate a mouse click @ Mouse pointer location
SetMouseWheel(Direction) ; Simulate the Mouse Wheel
PushMousePosition() ; Store the Location of the mouse cursor
PopMousePosition() ; Place the Location of the mouse cursor @ the location stored by PushMousePosition
SetMouseCursor(Type,WindowID=0) ; Set(change) the Mouse cursor with these constants :
SimulateKeyPress(vk, Delay, control, alt, shift) ; This function simulates a keypress with optional control, alt, and shift
LocaleDate(Mask.s,Date.l,lang.l,sublang.l=0) ; Return Date as String
Week(Date.l) ; Return the week number of the year
CaptureScreenPart(Left.l,Top.l,width.l,height.l) ; CaptureScreenPart : Returns pointer to BMP SnapShot
CaptureFullScreen() ; ; CaptureFullScreen : Returns pointer to BMP SnapShot
CaptureWindow(Handle.l) ; CaptureWindow : Returns pointer to BMP SnapShot
SaveCapture(File.s, ImagePlugin , JpegCompression) ; Saves previous capture to file
UnMountVolume(Drive.s) ; Unmount a VolumeName
MountVol(Drive.s,MountPoint.s) ; Mount a drive letter with specified MountPoint ( \\?\{xxxx )
MountListInit() ; This function gets VolumeNames ( from memory )
MountList() ; Each time this function is called, a VolumeName ( \\?\{xxxx ) is returned, when there are no more volumes to return, it returns an empty string
GetMountVolName(MountPoint.s) ; Returns a Drive Letter when specifiyng a MountPoint ( \\?\{xxxx )
DDebug(text.s) ; Adds Text to the Debugger buffer
DDebugShow() ; Shows the Debugger Text
DDebugClear() ; Clears the Debugger Text
DDebugGet() ; Returns the Debugger Text
DDebugLine() ; Adds a line to the Debugger Buffer
LocalTextInit(LocalLanguageIdentifier) ; Initialise the LocalText function with a Primary language identifier
LocalText(Local.s,International.s) ; Returns the correct text for the user's language
PrinterDelete(PrinterName.s) ; Deletes the printer
PrinterClearJobQueue(PrinterName.s) ; Clears the job queue of the printer
PrinterEnum() ; Each time this function is called, it returns a name of a printer( "" = you are @ the end of the list )
PrinterEnumGetPort() ; Retrieves the port of the printer currently listed with PrinterEnum()
HotKeysInit() ; Hotkeysinit() - initializes the hotkeys lib
HotKeyAdd(Window,vk,function,Name.s,shiftstate,altstate,controlstate); hotkeycheck() - checks to see if a hotkey event has been fired, if so, runs the function attached to the hotkey
HotkeyCheck(message, wparam) ; checks if a hotkey message is waiting, and if it is, runs the function attached to the hotkey
HotkeyWaitWindowEvent() ; hotkeywaitwindowevent() - uses the waitwindowevent() function to check if a hotkeymsg is there - if it is, runs the associated function
HotkeyWindowEvent() ; hotkeywindowevent() - uses the windowevent() function to check if a hotkey message is there - if it is, it runs the associated function
HotKeyRemove(Name.s) ; hotkeyremove() - this function removes the hotkey specified by name
HotKeyChangeFunction(Name.s, newfunc) ; Changes the function associated with the hotkey to the one specified by newfunc

_________________
DroopyLib/PBFastLib/HMod


Top
 Profile  
Reply with quote  
 Post subject: Re: DroopyLib
PostPosted: Thu Apr 14, 2011 12:51 am 
Offline
Enthusiast
Enthusiast
User avatar

Joined: Mon Dec 15, 2008 11:15 pm
Posts: 142
Location: Nashville, TN
Sweet library Droopy. Thanks a TON for sharing this. I already see a few things I wanna use in an app I'm working on now.


Top
 Profile  
Reply with quote  
 Post subject: Re: DroopyLib
PostPosted: Fri Apr 15, 2011 1:51 am 
Offline
Addict
Addict
User avatar

Joined: Tue Dec 23, 2003 3:54 am
Posts: 1805
A legend returns... this looks great, I will try it soon.

Thanks for sharing! :)

_________________
On GitHub: PB Includes - IDE Tools - Color Themes - IDE Branches


Top
 Profile  
Reply with quote  
 Post subject: Re: DroopyLib
PostPosted: Fri Apr 15, 2011 1:55 am 
Offline
User
User

Joined: Mon Sep 15, 2008 1:43 am
Posts: 21
Thanks mate, excellent update. Would you please be able to add the option for registry operations to be able to accept flags? I need to be able to interrogate and write 64bit registry keys from a 32bit app as defined here: http://msdn.microsoft.com/en-us/library ... 85%29.aspx

Cheers! 8)


Top
 Profile  
Reply with quote  
 Post subject: Re: DroopyLib
PostPosted: Mon Apr 18, 2011 3:53 am 
Offline
Addict
Addict
User avatar

Joined: Mon May 14, 2007 2:13 am
Posts: 979
Location: Darling River
Great update Droopy, tested the lib and no problems so far. Your help file is good too. :D
Any chance you will include commands for RTF in the future :?:

_________________
PureBasic Rocks! Even More! And More!
PureBasic 5, Now We're Really Rockin!


Top
 Profile  
Reply with quote  
 Post subject: Re: DroopyLib
PostPosted: Sat Apr 30, 2011 12:17 am 
Offline
Addict
Addict
User avatar

Joined: Fri Feb 13, 2004 12:45 am
Posts: 2789
Location: Bergen, Norway
Excellent Droopy :)
Thanks for your hard work :)

_________________
I Stepped On A Cornflake!!! Now I'm A Cereal Killer!


Top
 Profile  
Reply with quote  
 Post subject: Re: DroopyLib
PostPosted: Sat Apr 30, 2011 4:30 am 
Offline
Addict
Addict
User avatar

Joined: Fri Sep 21, 2007 5:52 am
Posts: 3522
Location: New Zealand
Thanks


Top
 Profile  
Reply with quote  
 Post subject: Re: errror
PostPosted: Tue May 10, 2011 8:06 pm 
Offline
User
User

Joined: Tue Dec 08, 2009 7:42 am
Posts: 38
with Purebasic 4.51 and last version of droopy
this instruction

Temp.s="Italian : "+LocaleDate("dddd d MMMM yyyy gg",Date(),#LANG_ITALIAN)+#CRLF$
Acces mémoire invalide erreur de lecture à l'adresse 4294967295
and the debugger say variable introuvable 'yyyy'


Top
 Profile  
Reply with quote  
 Post subject: Re: DroopyLib
PostPosted: Tue May 10, 2011 9:12 pm 
Offline
Enthusiast
Enthusiast
User avatar

Joined: Thu Sep 16, 2004 9:50 pm
Posts: 658
Location: France
ctg wrote:
Thanks mate, excellent update. Would you please be able to add the option for registry operations to be able to accept flags? I need to be able to interrogate and write 64bit registry keys from a 32bit app as defined here: http://msdn.microsoft.com/en-us/library ... 85%29.aspx

Cheers! 8)


I look @ 64bits registry key and think it's a big job to implement.

_________________
DroopyLib/PBFastLib/HMod


Top
 Profile  
Reply with quote  
 Post subject: Re: DroopyLib
PostPosted: Tue May 10, 2011 9:13 pm 
Offline
Enthusiast
Enthusiast
User avatar

Joined: Thu Sep 16, 2004 9:50 pm
Posts: 658
Location: France
electrochrisso wrote:
Great update Droopy, tested the lib and no problems so far. Your help file is good too. :D
Any chance you will include commands for RTF in the future :?:


I will try to put rtf functions in future version

_________________
DroopyLib/PBFastLib/HMod


Top
 Profile  
Reply with quote  
 Post subject: Re: errror
PostPosted: Tue May 10, 2011 9:23 pm 
Offline
Enthusiast
Enthusiast
User avatar

Joined: Thu Sep 16, 2004 9:50 pm
Posts: 658
Location: France
loulou wrote:
with Purebasic 4.51 and last version of droopy
this instruction

Temp.s="Italian : "+LocaleDate("dddd d MMMM yyyy gg",Date(),#LANG_ITALIAN)+#CRLF$
Acces mémoire invalide erreur de lecture à l'adresse 4294967295
and the debugger say variable introuvable 'yyyy'


Here's the source code compiled by TB
Code:
Declare.s LocaleDate2(Mask.s,Date.l,lang.l,sublang.l)

ProcedureDLL.s LocaleDate(Mask.s,Date.l,lang.l) ; Return Date as String
  ProcedureReturn LocaleDate2(Mask.s,Date.l,lang.l,0)
EndProcedure

ProcedureDLL.s LocaleDate2(Mask.s,Date.l,lang.l,sublang.l) ; Return Date as String
  ;/ <b>Mask Format</b>
   
  st.SYSTEMTIME
 
  st\wYear   = Year(Date)
  st\wMonth  = Month(Date)
  st\wDay    = Day(Date)
  st\wHour   = Hour(Date)
  st\wMinute = Minute(Date)
  st\wSecond = Second(Date)
 
  sRes.s = Space(255)
  GetDateFormat_(lang,sublang,st,Mask,sRes,255)
 
  ProcedureReturn sRes
 
EndProcedure


Try setting last arg
Code:
temp.s="Italian : "+LocaleDate("dddd d MMMM yyyy gg",Date(),#LANG_ITALIAN,0)
MessageRequester("Locale Date",temp)

_________________
DroopyLib/PBFastLib/HMod


Top
 Profile  
Reply with quote  
 Post subject: DroopyLib 4.51.004
PostPosted: Wed Jun 29, 2011 10:32 pm 
Offline
Enthusiast
Enthusiast
User avatar

Joined: Thu Sep 16, 2004 9:50 pm
Posts: 658
Location: France
29/06/11 : Library 4.51.004

String2Hex() Deleted, you should use UrlEncoder()
Hex2String() Deleted, you should use UrlDecoder()
Hex2Dec() Deleted, you should use Val($hh)
Bin2Dec() Deleted, you should use Val(%bbbbbbbb)
SuperRunas() Parameter 'Domain' added
AccountDisabled Added
DisableAccount Added
IsCapsLock() Added
IsNumLock() Added
IsScrollLock() Added
GetCurrentDnsServer() Added
GetInternetTime() Added
SetGadgetCursor Tips added
GetUserSid Added
UserGuid Removed (replaced by GetUserSid)
UacEnabled() Added
HideFromTaskBar() Added
NetJoinDomain Added
NetUnjoinDomain Added
NetJoinWorkgroup Added
NetGetJoinInformation Added
SysTrayIconBalloon Added
TaskbarProgress7 Tips Added
UserLogged() Added
WindowsThreaded Tips Added
CabExtract() Added
LogoffDetect Tips Added
SelfDelete Added
ServiceStart Added
ServiceStop Added
UseInternalIni Added
UseInternalIni Added
EditInternalIni Added

_________________
DroopyLib/PBFastLib/HMod


Top
 Profile  
Reply with quote  
 Post subject: Re: DroopyLib
PostPosted: Sun Jul 17, 2011 10:18 pm 
Offline
Enthusiast
Enthusiast
User avatar

Joined: Thu Sep 16, 2004 9:50 pm
Posts: 658
Location: France
16/07/11 : Library 4.51.007
Major change in Registry functions (Ex & Wow64 Mode)
RegMode() added
ApiCommandlineInit() added
ApiCommandlineGet() added
Tips AutoScroll added
IECInit() added
IECSendMessage() added
Tips SystrayPopupMenu added
SysTrayIconBalloonHide added
IsWow64Process() added
Wow64DisableWow64FsRedirection() added
Wow64RevertWow64FsRedirection() added

_________________
DroopyLib/PBFastLib/HMod


Top
 Profile  
Reply with quote  
 Post subject: Re: DroopyLib
PostPosted: Wed Jul 20, 2011 8:30 am 
Offline
User
User
User avatar

Joined: Thu Dec 22, 2005 2:43 pm
Posts: 74
Location: Chios, Greece
Hi Droopy,

Thank you very much for updating your excellent library and all the hard work you've put in to it.
Any plans to provide a library for the 64-bit version of PureBasic?


Top
 Profile  
Reply with quote  
Display posts from previous:  Sort by  
Post new topic Reply to topic  [ 182 posts ]  Go to page 1, 2, 3, 4, 5 ... 13  Next

All times are UTC + 1 hour


Who is online

Users browsing this forum: No registered users and 7 guests


You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum

Search for:
Jump to:  

 


Powered by phpBB © 2008 phpBB Group
subSilver+ theme by Canver Software, sponsor Sanal Modifiye