Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

Register Log in
  • Congratulations Rhinorhino on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

Search results for query: *

  1. WildWill

    TCP/IP Conectction PROBLEM

    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...
  2. WildWill

    Timer or Service to run

    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...
  3. WildWill

    Running events of parts of an image.

    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...
  4. WildWill

    Selecting certain records based on priority criteria

    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...
  5. WildWill

    security and trust in e-business

    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...
  6. WildWill

    MDI children 2

    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...
  7. WildWill

    how can i use other's CURSOR's in my app??

    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...
  8. WildWill

    How to make undocumented API Calls

    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...
  9. WildWill

    Convert a TColor variable to a string and vice versa

    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...
  10. WildWill

    Convert a TColor variable to a string and vice versa

    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
  11. WildWill

    How to make undocumented API Calls

    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
  12. WildWill

    Please help - dynamic link library shell32 not found

    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
  13. WildWill

    DLL vs Units

    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
  14. WildWill

    Changing files name

    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
  15. WildWill

    BLINKING LABEL CAPTION WITHOUT USING TIMER

    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...
  16. WildWill

    Login Name???

    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...
  17. WildWill

    How do Pack Paradox tables at run time ?

    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...
  18. WildWill

    Login Name???

    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
  19. WildWill

    How to get an item of a dblookuplist at mouseover?

    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-)...
  20. WildWill

    Display records like in Visual dBase5

    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

Part and Inventory Search

Back
Top