Ian Branch

Hi Team, So, this raises a question in my mind about how GetIt works. I assumed (Acknowledging Professor Julius Sumner-Miller) that GetIt read whatever from Emba each time it was opened. I am guessing that Emba wouldn't allow us to change anything at Emba so it suggests that the GetIt information is on our PC somewhere and only gets changed if/when/how Emba makes a change. So, it could be that GetIt hiccupped during its deinstall and actually deleted the KSVC entry from its listing. Which means I may be able to recover it from my C-Drive backup. All speculation on my part. Does anybody have any explicit information on this area? I'm kinda hung out on a clothes line att with no pegs. 😞 Regards, Ian

Ahh. If only it were so in my Getit. 😞

Hi Team, As I did with D10, I want to take the 'distributed' Indy out of the equation and just use the Git Indy as it is, I believe, more up-to date. Remy, I had a try at creating he D11 versions but got lost and it failed to build. 😞 Ian

Thank you. I thought it would be like that. I also thought the Git Indy would have the D11 Libraries build bits but I don't see any. 😞 Regards, Ian

Hi Team, First time I have seen this error. It happened apparently at the line indicated below.. if MainForm.DBWReg.ReadBool('ThoughtForTheDay', 'ShowAtStart', True) and not lThoughtForTheDay then begin // if CheckUrl('http://quotes4all.net') then begin HTTP := TIdHTTP.Create; try interim := HTTP.Get('http://quotes4all.net'); <<<<<<<<<< Error here.. // ChopStart := pos(StartQuote, interim); if ChopStart > 1 then begin ChopEnd := PosEx(EndQuote, interim, ChopStart + 1); if ChopEnd > ChopStart then begin interim := Copy(interim, ChopStart, ChopEnd - ChopStart); InCmnd := False; for Cntr := 1 to Length(interim) do begin if interim[Cntr] = '<' then InCmnd := True else if interim[Cntr] = '>' then InCmnd := False else if not InCmnd then Quote := Quote + interim[Cntr]; end; TaskMessageDlg('Thought for the Day...', Quote, mtInformation, [mbOK], 0); end; end; finally FreeAndNil(HTTP); // .Free; lThoughtForTheDay := True; end; // end; I have seen Remy suggest using "TIdHTTP.Disconnect(False) and TIdHTTP.IOHandler.InputBuffer.Clear() ". How/where do I incorporate them into the above code please? Should they be incorporated into the above code? Regards & TIA, Ian

Ahhh. Thanks Remy. It is clearer now. RE the CheckURL, that is a really old habit I have.. Regards, Ian

Hi Team, Is there any difference between the following form creation methods?? Application.CreateForm(TReportsForm, ReportsForm); and ReportsForm := TReportsForm.Create(nil); Do either have an advantage over the other? Regards & TIA, Ian

Tks David, I found the former in an older part of my code and couldn't remember the reason or need for it. I too use the latter form. Regards & Tks again, Ian

Daniel Wolf I miss my WUPPDI Welcome Page in D11. :-(

Hi Attila, Thank you for your contribution. Given that I have no idea about regex I can only wonder at what you have done. Regards, Ian

Hi David, Doh!! This is where I face palm myself and berate myself for not thinking of that. 😞 Thank you for pointing out my inadequacy. 🙂 Regards & Tks again, Ian

Hi Stefan, I just did an svn on DDevExtensions rev 18 and the D11 code didn't come with it. Do I have to do something else? Ian

Enjoy your Vacation..

Excellent! Perhaps an option for MMX?

Hi Team, Final release D11, KSVC via Getit. Trying to use the Raize components, when I go to build my App I get.. "[dcc32 Fatal Error] MainFrm.pas(48): F2051 Unit RzCommon was compiled with a different version of Vcl.Forms.TCustomForm" I'm going to take a guess that KSVC may have been built with a slightly earlier version of D11.. Anybody else seeing this? Note: I do have KSVC installed in by D10.4.2 via Getit, without any App build issues. Any thoughts/suggestions? Regards, Ian

FredS - Is your issue resolved??

I took the dpi switch out and installed the latest and the Config dialog opening tab looks a lot better and is usable.. The General Tab needs a little more TLC. ;-) The IDE & Code Editor tabs seem a little squashed but are usable. Again, your efforts are very much appreciated. Regards, Ian

Hi Team, I would like to embed something in my Delphi D10.4.2 32 bit Apps that would monitor something such that I could send a text message to them. e.g. Send a message, "Please log out of your application asap!", to 5 Users on 5 different workstations connected via LAN & RDP. The Apps would detect this message and pop up a message dialog to the User. Obviously it would need a sending mechanism as well. Thoughts, suggestions, examples, recommendations appreciated. Regards & TIA, Ian

That fixed it.. But I view that as a stop-gap measure. 😉 Regards, Ian

Noted.

Where is this set/setting? I have the 96dpi set as you have. I have two 4k monitors, set exactly the same.

Appreciate the concern. The usage model is that the originator will probably want one or more Users to exit their App(s). As the Apps check every 60 secs and the Originator's Generate App checks every 120 secs, then shortly after the generator App shows the message the Originator would exit, deleting the message file. Yes, if the User(s) are away from their PC there will be messages waiting for them when they get back. The practicality is that if they haven't exited in a timely manner their Boss will be on the Phone to them. 🙂 In general this has nothing to do with any Server action. It is purely for if/when an App update needs to be loaded. Ian

I just built rev 3613 in D11. HTH. Regards, Ian

The D11 .dll provided by Dave Nottage did the same thing. See the other thread. "r3588 and Alexandria." My monitor is a 27" I wonder if it is a combination of D11 & Windows 11 thing?? It is fine under D10.4.2 & Win 11. What are your D11 display/DPI settings? Ian

Error Handling - Not worth it in this case. This may get used once a month, if that. It is intended to repeat every 60 secs as long as the message.txt lives. Exiting the message.txt creating App deletes the file. Try-Finally bloc - Yup, will do that. TFileStream - Will look at. Thank you for your input/suggestions. Ian