Search results for query: *

Unfortunately I have to build my program with runtime packages and have vclado50 in the list (this is the only one I have in the list), otherwise when the package tries to create a TQuery I get 'Application is not licensed to use this feature'. That's another bizarre problem, there are no ADO...

Not really, we could just put the classes in the exe, but it's plug-in functionality that we will charge extra for, so we wanted to be able to deliver it separately. It also means that we separate our 'model' from our 'view'.

Hi, I am trying to create a runtime package which will contain classes that my main application can use, but I'm having problems with the data access. My main app contains a TDatabase which points to a BDE alias. At runtime my package is dynamically loaded, and a method invoked in the package...

I haven't actually downloaded your code to look at, but in the FormShow you can use FindComponent to find a form if you know its name. FindComponent returns a TComponent, so you will need to cast the result to TForm (or whatever type you expect) e.g. procedure TMainForm.FormShow(Sender...

IAdams, gacutil.exe places the item in the GAC. The tool for registering the dll is regasm.exe (see http://msdn.microsoft.com/en-us/library/tzat5yw6(VS.80).aspx). Microsoft provide OleView.exe...

Futher to what Griffyn has said, you can also use the Anchors property to ensure the left/top/right/bottom of your control always stays in the same position relative to its parent. This should give you the behaviour you're looking for without the need for any code.

harebrain, thanks for your thoughts, but ADO doesn't use the ':param' syntax, it uses '?param' instead. And SQL Server doesn't use it either, so the example that you gave gets passed to SQL Server as is, and SQL Server then reports the error "Incorrect syntax near ':'" Steve

Hi, I'm trying to use an sql insert statement using ADO parameters, and I can't get the value of the parameter into the db, and it's driving me nuts! I'm using SQL Server 2000, Delphi 4 and ADO 2.1 (there's nothing like modern technology is there?!) The code is simply this: procedure...

No problem. As you've probably noticed, the only differences between your code and mine were that I used AddObject instead of Add to add items to the listbox, and then used Items.Objects[0] instead of Items.Strings[0] to retrieve the full path name of the file Steve

What do you mean by "will not work"? If you want to allow multiple selections you can do something like this: procedure TForm2.AddClick(Sender: TObject); var i: integer; begin if OpenDialog1.Execute then for i:=0 to OpenDialog1.Files.Count-1 do...

On question 1, it sounds as though you have the "Stop on Delphi Exceptions" option switched on. This is found under the Tools|Debugger Options menu, on the Language Exceptions tab (it may be different on Delphi 7). When this is switched on and you are running your application through the...

It seems I misunderstood what was happening. It looks as though the key combinations ALT+TAB or ALT+ESC will only produce a single WM_SYSKEYDOWN message on the message queue. I was expecting a WM_SYSKEYDOWN for the ALT key and a WM_KEYDOWN message for the ESC key, but the WM_KEYDOWN message...

Hello all, I'm looking into a problem with message handling within an application. When the app is started a thread is created, and within this thread is a message handler which is assigned to Application.OnMessage. The message handler will only handle custom messages (between WM_USER+6 and...

Basically what you have are just strings, so if you use ExtractFileName to get just 'bla.file' then put that in your playlist, then your playlist won't know the full path info of the files when you come to save it. If you just want to show the name of the file in the playlist, but keep the full...

There is no property you can set to do this, so you'll have to handle the drawing of the items yourself. To do this set the OwnerDraw property of the TMainMenu to true. Then create OnDrawItem and OnMeasureItem event handlers, and assign these to the events for each menu item that you want to...

Trying to read FileSize before the page has finished loading will give you an error. Just wait until the page has completed loading and it should(!) be okay procedure TestGetSize; var URL: string; Size: string; begin URL := 'http://www.google.co.uk'; WebBrowser1.Navigate(URL...

You can call any procedure or method from a button click event handler, so if you want to use ors' code you could do somethinglike this unit Unit61; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Printers, ExtCtrls, StdCtrls, Buttons, Dialogs...

The point that Aaron was making is that to get to the line RebuildList := False in the first begin/end block then RebuildList must be true, but if it's true then you will not enter the second begin/end block, so you will not get to the if statement that uses the new value. If RebuildList is not...

It sounds as though this may be a good example of when to use MDI forms. You could create an MDI parent form (i.e. set the FormStyle property to fsMDIForm) and on this form use a TMainMenu (as earthandfire suggested) to provide the user with a way of accessing the other forms. These other...

Just to expand on Aaron's answer, if the return code is <= 32 then you can use the SysErrorMessage function to return the error message, this means that you don't need to write the case statement for every possible error value. e.g. ReturnValue := ShellExecute(0, 'open', 'C:\test.txt', nil...