Jump to content

Ian Branch

Members
  • Content Count

    440
  • Joined

  • Last visited

  • Days Won

    1

Ian Branch last won the day on August 8 2019

Ian Branch had the most liked content!

Community Reputation

46 Excellent

Technical Information

  • Delphi-Version
    Delphi 10.4 Sydney

Recent Profile Visitors

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

  1. Ian Branch

    Try-Finally-end; & Exit??

    To All, Regrettably my skills & knowledge are not at your depth. If they were, then I wouldn't have needed to ask the question. I have also always been a believer that if you have a question in your mind then someone else probably has too. Ergo, ask it, and get the answer and at the same time make the answer available to others. In this particular case, I looked at Exit but not at Try-Finally. Why, I don't know, it simply didn't occur to me. I'm going to call it a Senior's Moment. My thanks to those that have responded and clarified the issue for me and I unreservedly apologise to all inconvenienced by responding to my question. I will attempt to do better next time. Ian
  2. Ian Branch

    Try-Finally-end; & Exit??

    Hi Team, I suspect I have been doing something wrong. And not for the first time. ;-) If I have the following construct.. try ..... .... if x then begin ..... Exit; end else begin .... ... end; Finally FreeAndNil(something); end; Will the Exit bypass the FreeAndNil?? I suspect it does and I may have been causing myself some grief. Regards & TIA, Ian
  3. Ian Branch

    Can the width of TaskMessageDlg be set?

    Tks Anders. It was worth the ask to confirm one way or the other. Cheers, Ian
  4. HI Team, D10.4.1. Can I change the default width of a TaskMessageDlg? I can't find any way to do it. :-( Regards & TIA, Ian
  5. Ian Branch

    Library Path disappeared??

    Hi emailx45, Thanks for your input/suggestion. I went to that registry entry and it was empty. I then remembered the Delph keeps a history of sorts of changes to the Library Path. See attached. I selected the last one, it was incomplete, but was able to add those paths missing. Relatively painless. So, I have two questions now.. 1. Why did it happen in the first place?? I will leave that in the hands of the Windows Gods. 2. Where does Delphi keep this History? I would like to make sure it is appropriately backed up. Regards, Ian
  6. Ian Branch

    Library Path disappeared??

    Hi All, D10.4.1, Windows 10 64 bit. Somehow my 32 bit Library path totally disappeared. Any thoughts where I might find/recover it?? Regards & TIA, Ian
  7. Ian Branch

    Internet time sync - with some timeout

    Hi Remy, Ahhh. I see it now. Didn't think at all of a separate App. Regards & Tks. Ian
  8. Ian Branch

    Internet time sync - with some timeout

    Hi Remy, Ahh. Thank you. At least I know it is possible. :-) Pardon my ignorance but which would be the easiest to achieve? Without giving me the answer, can you point me where to look? Regards, Ian
  9. Ian Branch

    Internet time sync - with some timeout

    You might also want to test the success of SyncTime.. ... .... if Sntp.SyncTime() then Log('SetSystemTime(): System clock sync completed') else Log('SetSystemTime(): System clock sync failed'); .... .... It fails on my Win 10 PC and on a 2012 Server. It is OK if the App is run as Administrator. I wonder if there is a way to have just the routine run at elevated level??? Ian
  10. FWIW see attached. Regrettably, I can't recall where I downloaded it from. EIAES Encryption.zip
  11. Ian Branch

    Main Form appearing issue..

    Shouldn't it be that by default?
  12. Ian Branch

    Main Form appearing issue..

    Hi Guys, Thanks for the pointers. I found the answer here.. http://www.delphigroups.info/2/e6/483281.html I recall now the User was complaining that dialogs were being hidden by the form. That was in an earlier Delphi. I shall have to experiment a little to see if the issue still persists now I have commented out that piece of code. Thanks again. Ian
  13. Ian Branch

    Main Form appearing issue..

    All, Thank you for your input. Appreciated. Something Lajos said.. Triggered something in my head. Having another look at the code in the Sub Form I found this.. ... .... private { Private declarations } public { Public declarations } protected procedure CreateParams(var Params: TCreateParams); override; end; var And this.. procedure TAudioForm.CreateParams(var Params: TCreateParams); begin inherited; Params.ExStyle := Params.ExStyle or WS_EX_APPWINDOW; Params.WndParent := 0; end; Now, I have no recollection of what that code was put in for, oh so long ago, but if I comment it out all is good. No more MainForm appearing. Can someone enlighten me as to why I would have put that there?? I'm sure I put it there for a reason. ;-) Ian
  14. Ian Branch

    Main Form appearing issue..

    And that's a reasonable assumption except I can't find anything to account for it. I have eliminated everything in the MainForm Create & Show events. The Audio form is called with a simple.. AudioForm := TAudioForm.Create(Self); AudioForm.Show; All the AudioForm does on Creation is open tables. There is nothing in the Show event. I thought it might have been something in the Project file but I can't see anything there that would contribute/cause this. Ian
  15. Ian Branch

    Main Form appearing issue..

    Hi Team, D10.4.1, 32bit App, Windows 10. I think I have chased this up once before but I can neither find it or recall where. Please see the attached short video. At the start the Main Form is open. Click the Audio button and the Audio form is opened, then the Print Listing option selected. Note the Main Form appears at the same time but under the Print dialog. When the Print dialog is closed they both disappear. Obviously I don't want the Main Form to appear when the dialog is called, even though it doesn't hamper the usage. As far as I can tell, everything is being called correctly. I am open firstly to understanding why the Main Form is appearing, and secondly, how to prevent it. Regards & TIA,. Ian MMLIssue.mp4
×