Search results for query: *

I would appreciate any help and recommendation to solve the following problem in our Client/Server applications: our client programs communicate via the default net-library, Named Pipe with the SQL Server 6.5. Because of changes in the C/S environment (that is the client and the server should be...

Another approach may be to create the code to do the read / insert as a small app then use Microsoft’s scheduled tasks to run the code when, and as often as you like You could do this on the server which normally does not get shut down thus not missing any scheduled activates. X-) Billy H...

Instead of using the onClick method use the mouse down, this has as 2 of its param the X and Y co-ords of the click. You could build conditions around these to control the actions: EG procedure TForm1.Image1MouseDown(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y...

Create another table that holds your priorities with a ranking: EG Title Rank MD 1 FD 2 MK 3 …… Next use a nested query, such as: SELECT Contacts.name, Contacts.jobTitle, Contacts.thisandthat, Contacts.Company, Ranking.Rank FROM Ranking INNER JOIN...

One way to guarantee customer security is through the use of SSL (secure Sockets Layer) technology and the displaying of a secure site certificate, such as the BT Ignite seal. Fid details of this at: http://www.ignite.com/application-services/products/verisign/products/globalcerts.html The...

Steve What you could do is write the code to check for saving in the MMDIChild procedure TMDIChild.FormClose(Sender: TObject; var Action: TCloseAction); begin if MessageDlg('Save application ?', mtConfirmation, [mbYes, mbNo], 0) = mrYes then begin doMySaveFunction(); Action...

Use the image editor in Tools | Image Editor then open you .RES file (all compiled delphi apps have a .RES file) right click on contents - select new - choose cursor - change its name and create it in the image editor. OR If you have Microsoft Misuall C++ open the .RES file in this and this...

Steve: I dont know if this will help you, but here are two fuctions that do the same thing - with one difference the first function access the the Shell32 method via its function name the second access the same function via the ordinal. Ordinal = 235 (0x00EB) Function = SHAddToRecentDocs...

As far as setting a pixel to transparent, this is a bit 'iffy', what you can do is set acolor to be transparent using TBitmap.TransparentColor. Alternitavly you could creat a bitmap mask of the are where the bitmap is going to be displayed, then set the image pixel = mask pixel, I think that...

Try this: procedure TForm1.Button1Click(Sender: TObject); begin Edit1.Text := IntToHex(form1.color, 8) end; procedure TForm1.Button2Click(Sender: TObject); begin form1.color := StrtoInt('$'+Edit1.Text); end; X-) Billy H bhogar@acxiom.co.uk

Can you not just look up the entry point using an application such as Dependancy Walker, for example in Shell32.dll Ordinal = 62 (0x003E) EntryPoint = 0x00065574 Ordinal = 98 (0x0062) EntryPoint = 0x00077E13 X-) Billy H bhogar@acxiom.co.uk

There are quite a few different versions of Shell32.DLL check that you are : A) Using the most up to date version OR B) Using functions that are within the vision you are using C) Make sure the DLL is registered X-) Billy H bhogar@acxiom.co.uk

On the flip side of the argument, if you want to distribute less files with your applications you may want to stick to units as these will be compiled into you .EXE So choose what is best for you less files or upgradability and reusability X-) Billy H bhogar@acxiom.co.uk

In Delphi you can simply use the RenameFile function: EG if not RenameFile('IMAGE1.GIF', 'IMAGE01.GIF') then ErrorMsg('Error renaming file!'); X-) Billy H bhogar@acxiom.co.uk

One possible way (although I do not know how well it would work) would be to use a couple of loops and apllication.processmessage: [code] for loop1 := 1 to NO_OF_BLINKS do begin for loop2 := 1 to DELAY do begin Application.ProcessMessages; end...

sggaunt: In the past I've allways created my own Icon picker, that seems the simplest way to do it. The code below provides the basis of this and in this example displays the ecions for 'shell32.dll' As for as Address := chr(62); goes this has me puzzled as I do not seem to be able to track...

At http://www.torry.net/db/visible/db_tables/bspktbl.zip you will find a component complete with source that is a TTABLE replacement with additional functions to Pack (permanently remove deleted records) and regenerate indexes for DBase and Paradox tables. X-) Hope this sorts yoour problem...

Try procedure TForm1.Button1Click(Sender: TObject); var lpBuff : pchar; ret : longbool; ret2 : Cardinal; begin ret2 := 25; ret := GetUserName(lpBuff,ret2); caption := lpbuff; end; Hope this helps X-) Billy H bhogar@acxiom.co.uk

Have you tried using the TApplication.onHint event. Have a look at the delphi help for TApplication.onHelp and in here you could write your code to 'get the item' depending upon the control type, Maybe using TWinControl from which all the controls you are intersted in are inherited from? X-)...

One possibility would be to use a Page Control with 3 pages: Page 1 a DbGrid Page 2 a DbCtrlGrid with data controls laid out to give a type 2 display Page 3 another DbCtrlGrid with data controls laid out to give a type 3 display X-) Billy H bhogar@acxiom.co.uk