delphi

RAS popup terminal window programmatically

Hi, I have a custom dialer for dial-up connections (written in delphi). It works perfectly and does a lot of great stuff... Now, i want to allow the user to configure the connection to show an after-dial terminal window as if they checked the box "Show Terminal Window" in the "Security" tab of the connection properties. I already used...

Return value of stored functions in MyDAC

I am working with Devart's MyDac and MySQL Server 5.0.41. Here is a section from the documentation on executing stored procedures with TMyConnection.ExecProc: Note: Stored functions unlike stored procedures return result values that are obtained internally through the RESULT parameter. You will no longer have to provide anonymous va...

Need advice for mass mailer in Delphi

I'm trying to develop a mass mailing application and would like to use Delphi for it. What components or libraries would be my best options (for Delphi7). Can they handle sending about 25,000 emails? The application is not for spamming, so I'm curious if correctly authenticating and playing by the rules will add some delay to the process...

Reading and writting DEVMODE.dmColor

Hi I'm having trouble with the dmColor field fo the DEVMODE structure. My default printer is a color printer, if I default output color of the printer properties through the control panel to black and white the DEVMODE.dmColor field always returns DMCOLOR_COLOR instead of DMCOLOR_MONOCHROME. Even if I default my printer to a black a...

How to convert C union inside a struct to Delphi

I need help to convert this C type declaration to Delphi: typedef struct _IO_STATUS_BLOCK { union { NTSTATUS Status; PVOID Pointer_; } ; ULONG_PTR Information; } IO_STATUS_BLOCK, *PIO_STATUS_BLOCK; Thanks in advance. ...

return TCollection or array of objects from Dll

I tried to return from dll function my own object (derived from TCollection). I used FastMemoryManager, but without success... So I tried to return dynamic array of some objects. Length of the array of set of course in dll function. It works realtive good, but allocated memory is not freed. (I measure with Windows tarsk manager). Is th...

How do I run Delphi 7 on Windows 7 without disabling UAC?

I had the bad idea of switching to Windows 7 (32 bit) and now my old Delphi 7 won't work properly. Actually it worked just fine until yesterday but (I suppose) after some MS Windows updates, it crashes if I double click a DPR file. However, it works if I run as administrator or if I start Delphi IDE without double clicking a DPR file (an...

How can I search faster for name/value pairs in a Delphi TStringList?

I implemented language translation in an application by putting all strings at runtime in a TStringList with: procedure PopulateStringList; begin EnglishStringList.Append('CAN_T_FIND_FILE=It is not possible to find the file'); EnglishStringList.Append('DUMMY=Just a dummy record'); // total of 2000 record appended in the same way...

How to create a screen image from TColors and intensities (in Delphi)

I have a (spectrographic profile) data set of Wavelength (x-axis) and Intensity (y-axis, in arbitrary units that can have different ranges...) I want to convert this numeric data to a graphical view as shown at the bottom of the image below. But, I've never done anything in Delphi (2010) with Canvas's, TImages, bitmaps, or whatever way...

[DELPHI] Canvas/Bitmap scrolling question

Hello. I'm trying to make a small game based on the canvas in Delphi. Basically, I'd like to make a fairly large bitmap ( 3000x3000, for example ), then load it into the canvas, and being able to scroll right/left/up/down just like an ordinary image viewer, however I can't seem to find what I'm looking for. Any ideas? ...

Delphi TStringGrid Flicker

Hi I am adding multiple rows to a string grid from a CSV file @ runtime, However the StringGrid seems to flicker lots when it is being upadated, I presumed there would be a beginupadate / Endupdate command to stop this. However I cannot find it. Is there another way to stop the flicker when the grid id being updated. Colin ...

Using JVCL's debug DCUs with C++Builder

How do I debug JVCL code using C++Builder? I enabled building debug DCUs when I installed JVCL, I turned on "use debug DCUs" under my project's Delphi settings (there doesn't appear to be an analogous option under C++ settings), and I disabled building with packages. In spite of all of this, single step still skips over JVCL code, and ...

How can I check if my application has focus?

What I want to do is check if my application has focus because if it is not then I will popup an Alert Window just over the Notification Area to display some message to the end user. ...

How to get google pagerank from delphi

Anyone can show example code, how to get google pagerank from delphi ? e.g. with usage of INDY. I mean without usage of outer PHP script. So I mean direct call to google server from delphi ,decode data and show site(page) pagerank. ...

Tracking changes in a directory programmacticaly

I have to write a litle app that will process files saved in a given dir. I doesn´t pleases me the idea of writing infinite loops, timers and that kind of stuff. I´d like to know if there if (I would bet a finger that there is!) there is any windows API that would send my app a message for any file saved in that given dir. ...

Image editor colour problems (transparency?)

D7: I created an edit box component which only accepts integers. I want to create a buttonbar icon for it based on TEdit. TEDit shows "ABC" and a cursor on a white background. I copied and, pixel by pixel, changed ABC to 123. However, while TEdit shows a white background, mine shows gray. The pixels are definitely white but show up the...

how to make a tmemo and Tedit with a transparent background?

how to make a tmemo and Tedit with a transparent background? or add image background on it's canvas. that workable in both Delphi7 up ...

Limit Decimal Places in DBGrid

I have a DBGrid which is connected to a ClientDataSet and it has a field UnitCost. What I want to do is to limit to 2 decimal places every value that will be assigned to that field. Is there an easier way to do this other than validating every input value? ...

to get date from january until today date

hi..before this i'm using this function to from 6 month date to today date.. dFromYear := AddMonth(dFromDate, -5); dToYear := EncodeDate(iYr, iMon, DaysInMonth(iYr, iMon)); but now i want to get date from january until today date...for example if today month is september 2010 so i want to get date from january2010 to september 2010....

Is there a way to disable font anti aliasing when using TextRect (aka ExtTextOut in GDI32) in Delphi?

I'm using a custom gauge, based on the example that came with Delphi (5 Enterprise). For those that don't know, it's like a smooth progress bar, but displays the percentage or value in the centre (vertically and horizontally) of the component. To make sure the text is readable both when the gauge is filled and when it's empty, the text ...