Reboot
[code lang=”asm”]asm cli @@WaitOutReady: { Busy-wait until 8042 is ready for new command} in al,64h { read 8042 status byte} test al,00000010b {…
Align App Without Covering TaskBar
Align App Without Covering TaskBar (Make your app full screen without covering the Taskbar) Contributed by Nelson Williams (I modified this a bit)…
Default icon is used instead of custom icon
Q: default icon is used instead of custom icon A: just found this mail – do you talking about the application-icon? if so…
Adding ODBC-Treiber/DSN with Delphi
> Hi! > > I have to check if some ODBC data source is created and if not create > it in runtime.…
CreateProcess
[code lang=”delphi”]function CreateProcessSimple(sExecutableFilePath : string ): string; var pi: TProcessInformation; si: TStartupInfo; begin FillMemory( @si, sizeof( si ), 0 ); si.cb := sizeof(…
Environment: OSVersion
[code lang=”delphi”]var VersionInfo: TOSVersionInfo; begin VersionInfo.dwOSVersionInfoSize := Sizeof(TOSVersionInfo); GetVersionEx(VersionInfo); Case VersionInfo.dwPlatformID of VER_PLATFORM_WIN32S: Do_SomeThing; VER_PLATFORM_WIN32_WINDOWS: Do_SomeOtherThing; VER_PLATFORM_WIN32_NT: Do_SomeThingElse; End; end; typedef struct _OSVERSIONINFO{…
Newsflash Environment: SetSystemEnvironmentVariable
This is how you do it in NT…. [code lang=”delphi”]procedure SetSystemEnvironmentVariable (const name, value : string); var rv : DWORD; begin with TRegistry.Create…
Environment: SetSystemPowerState
This isn’t a question, it’s a tip!! I’ve recently discovered a fancy, but most of the time useless, API-function called SetSystemPowerState, wich can…
How to create unique strings
> Hi > > How can I make really really really, extremely, unique names??? I need > about 100 of them at a…
PostKey32ex
> I have build an application who displays a hebrew keyboard, and I use > a combination of six TToolBars with left or…