Jump to content

bazzer747

Members
  • Content Count

    142
  • Joined

  • Last visited

Community Reputation

15 Good

Recent Profile Visitors

The recent visitors block is disabled and is not being shown to other users.

  1. bazzer747

    Two Lists synchronised movement

    Alongside each other on a form I have a CheckList and a ListBox. As I scroll down the CheckList (on the left side) box I want the ListBox (on the right side) to also scroll down, but at half the speed. The left side has 64 rows (col height 30) , the right side 32 rows (col height 60). As the scrolling goes through the 64 rows on the left side two rows at a time I want the right side to scroll down one row at a time. The application monitors progress of a knockout competition. Currently I try this using the following procedures to synchronise the vertical scrolling: procedure TForm1.Grid1WindowProc(var Message: TMessage); begin OldGridProc1(Message); if ((Message.Msg = WM_VSCROLL)) then OldGridProc2( Message ); end; procedure TForm1.Grid2WindowProc(var Message: TMessage); begin OldGridProc2( Message ); if (( Message.Msg = WM_VSCROLL )) then OldGridProc1( Message ); end; In the form activate I have this: OldGridProc1:= sgLastRound.WindowProc; sgLastRound.WindowProc := Grid1WindowProc; OldGridProc2:= gsgNextRound.WindowProc; gsgNextRound.WindowProc:= Grid2WindowProc; And this works correctly scrolling each side BUT at the same amount. What I'm after is the right side to scroll at half the amount of the left side. I can't see where I can divide the right side movement by 2 so it goes half the distances. Sorry if this isn't that clear. The attached screenshot may help visualise the problem.
  2. bazzer747

    Outlook Server Execution Failed

    Hi, Sorry it took so long, just been able to get to my client to take a look at his registry. There are 2 entries: Outlook.Application - Microsoft Outlook 15.0 Object Library and Outlook.Application 15 - Microsoft Outlook 15.0 Object Library
  3. bazzer747

    Outlook Server Execution Failed

    Hi, When I create emails in Outlook using below code they all work without a problem. I'm using Office365, so the latest version of Outlook. However, when that same code is executed on a different PC, and one that uses Outlook 2013, I get 'Server execution failed, ProgID: 'Outlook Application' The start code for the email application is: try Outlook:= GetActiveOleObject('Outlook.Application'); except Outlook:= CreateOleObject('Outlook.Application'); end; When I google I get various replies to this issue (some of which are not a solution here), but wondered if any Delphi guys have hit this problem and know of a solution. Maybe a different way to open an Outlook instance?
  4. bazzer747

    Outlook Server Execution Failed

    Am I an idiot for not checking before post. Yes, wrong forum (I was working with Indy just prior and brain didn't disengage when I did this post, sorry). AND, a typo, the failure was on Outlook 2013 not Outlook 2003! I've since tested on Outlook 2010 and the code works fine. I'm thinking it's more of a permission thing on the client's PC, rather than Outlook itself. However, I'll shift this post to the correct forum now ...
  5. bazzer747

    Outlook Server Execution Failed

    Hi, When I create emails in Outlook using Indy they all work without a problem. I'm using Office365, so the latest version of Outlook. However, when that same code is executed on a different PC, one that uses Outlook 2003, I get 'Server execution failed, ProgID: 'Outlook Application' The start code for the email application is: try Outlook:= GetActiveOleObject('Outlook.Application'); except Outlook:= CreateOleObject('Outlook.Application'); end; When I google I get various replies to this issue, but wondered if any Delphi guys have hit this problem and know of a solution. Maybe a different way to open an Outlook instance?
  6. bazzer747

    SQL

    Is there a question here?
  7. bazzer747

    Notification of Replies

    Ah, I now see! This seems to be on all content rather than just a specific topic raised. But I see in the specific topic the above drop-down window has a 'Unfollow' button, which I'm thinking does the job. Thanks for pointing this out.
  8. bazzer747

    Notification of Replies

    Hi, When I raise a new topic I always check the 'Notify me of replies'. Fairly obvious, I suppose, as I don't log in every day. Which is great. However, on several topics I've raised, the subject matter being discussed does occasionally tend to drift off the main thread. Sometimes interestingly, sometimes not. It would be a nice addition if you could uncheck the 'Notify me of replies' when the latter happens. No big deal, just a thought ...
  9. bazzer747

    Learning Delphi

    In the early days (Delphi 3 and up), I bought every book there was and they really helped. Much better than online documentation. However, over the years I used them less often and eventually (under pressure from other half!) had to get rid of them. Space was the issue, plus I looked at them less frequently. I regret that now. Most of the Delphi books out there now are generally quite advanced and very expensive.
  10. bazzer747

    Learning Delphi

    A great place to start is LearnDelphi.tv Lots of free video's to view, but the paid for videos look at the details of all components in the VCL.
  11. bazzer747

    Firedac and MariaDB

    Hi, I'm trying to connect to a MariaDB database. I have MariaDB v10.3.24 installed on a NAS Server (32bit version). I can access it using HeidiSQL and see my tables etc. But from Delphi I'm not. I have also loaded MariaDB onto my PC, same version (the 32 bit version) and can see this from HeidiSQL. In my TfdConnections I have the same parameters as I see from the HeidiSQL Session Manager, so I know they are correct. What I get (trying to access either instance of MariaDB) is a message 'Cannot load vendor library [...libmariadb.dll ...]. The specified module could not be found. Hint: check it is in the PATH or application EXE directories, and has x86 bitness..' Well, I do have libMariaDB.dll in the EXE directory, I also have it in the C:\Program Files (x86)\MariaDB 10.3\lib directory, and both these paths are set as search paths in the project options. It is also in the Windows PATH environmental variable. I'm sort of at a loss now as to what else I can do. The error message would appear to be giving wrong information
  12. bazzer747

    Target machine actively refused connection

    Finally got it working. I think the problem was twofold - first I had IB Server 'developer_ib2020' running, and 'gds_db' wasn't running. I brought up IB Console and added 'gds_db' and created a new User. Then when I ran my application it connected successfully. So another case of the error message not giving a clue as to where the problem lay. It was really that I'd never used the 'gds_db' server before and therefore it wasn't configured correctly for use. Still not sure technically why it didn't connect to the 'developer_ib2020' instance that was running.. Now I'm connected I'll dig deeper and maybe start to understand the configuration aspects of these different server instances. Thanks all who responded to help me out. Really appreciated.
  13. bazzer747

    Target machine actively refused connection

    Yes, the service is running. See snapshot above.
  14. bazzer747

    Target machine actively refused connection

    So I am only in development on my PC, so when I installed Interbase I accepted all the defaults. This is why I'm a bit surprised that it doesn't work. It isn't that I'm doing anything complicated. Connecting to MSSQL is so simple and works seamlessly, I've had no issues at all. Yet, with Interbase I am getting issues all the time. No wonder I'm deciding not to use IB 🙂 What I have noticed, looking at Services, is the path to the executable is it points to the ..Program Files (x86)\Embarcadero\Studio\20.0\InterBase2020" -p developer_ib2020. So not the 21.0 directory (which is the 10.4 install). Could this be an issue? Also, in the Log On tab there's a checkbox 'Allow service to interact with desktop' which was unchecked. Checking it makes no difference. I'm thinking a good old uninstall/re-install to see if the previous installations have cross-contaminated each other ...
  15. bazzer747

    Target machine actively refused connection

    Hi, Yes, I have Interbase Server running - called developer_ib2020. And in the FDConnection it's almost exactly like yours: I did changed Protocol from 'local' to TCP/IP but made no difference (and Server from localhost to 127.0.0.1). On your last point - VendorHome and VendorLib properties, which DLL are you referring to?
×