MS Testcontainer doesn’t close whith Delphi ActiveX. Same problem in MS C++ Solution: – look in the source AxCtrls.pas – look at the “function TActiveXControl.ObjQueryInterface(” – there’s a work-a-round for a bug in MS Access 97 included. if you comment … Weiterlesen
Q: How do i get how meny days there are in January 2002? How do i do that..? Thanks!! A1: NbrDays := EncodeDate(2002,2,1) – EncodeDate(2002,1,1); A2: The Delphi JEDI JCLDateTime.Pas unit has a DaysInMonth function: http://www.delphi-jedi.org/Jedi:CODELIBJCL A3: From Delphi Sysutils.pas: … Weiterlesen
> I am using the TDateTimePicker with Kind = dtkTime. I cannot seem to get > rid of the seconds in the control. I just want my user to be able to set > the hour & minutes. I have … Weiterlesen
// First we need to create a record type TimeParse = record timeDay : Integer; timeHour : Integer; timeMin : Integer; timeSec : Integer; end; // Now here is the function function … Weiterlesen
Installing/Removing Fonts: AddFontResource(Path+\FileName.TTF’); // to add font to system SendMessage(HWND_BROADCAST, WM_FONTCHANGE, 0, 0); //to notify that fonts are changed. you can use: RemoveFontResource(Path+’Data\FileName.TTF’); // to remove it from system [tags]Delphi, Misc, Fonts[/tags] Installing/Removing Fonts: AddFontResource(Path+\FileName.TTF’); // to add font to … Weiterlesen
Q: How to write all Font-Styles to the registry? A: True, but why handle the set elements in the first place? The following functions save/restore a font via a single registry key: FontRec = packed record Color: TColor; … Weiterlesen
Boris Nienke Sleep Delay Wait Pause procedure Delay(iMilliSec: integer); var tVergl: TTimeStamp; iTime : integer; begin tVergl := DateTimeToTimeStamp(now); iTime := tVergl.Time; repeat tVergl := DateTimeToTimeStamp(now); until (tVergl.Time – iTime) >= iMilliSec; … Weiterlesen
> > How to capture ALT+T E A M in a about box? > Hi … Set the form’s KeyPreview property to True and then write the following code : > > How to capture ALT+T E A M in … Weiterlesen
—– available WindowStates: SW_SHOWDEFAULT SW_SHOW SW_SHOWMINIMIZED SW_SHOWMAXIMIZED … look at Windows-API ———— function ExecAndWait(const Filename, Params: string; WindowState: word): boolean; var SUInfo: TStartupInfo; ProcInfo: TProcessInformation; … Weiterlesen
With the Delphi-Procedure “ExecuteFile” (details in Online-Help) you can run programs from within your Delphi appplication without handling complicated API-commands (CreateProcess etc..). [tags]Delphi, Misc, Files[/tags] With the Delphi-Procedure “ExecuteFile” (details in Online-Help) you can run programs from within your Delphi … Weiterlesen