Jump to content

Ian Branch

Members
  • Content Count

    1281
  • Joined

  • Last visited

  • Days Won

    3

Everything posted by Ian Branch

  1. Ian Branch

    How to detect if a Dialog is open/running?

    Thanks Guys for your suggestions. Doh!! So simple! Just disable/enable the timer... I'm embarrassed. πŸ™‚ Regards & Tks Again, Ian
  2. Hi Team, Does anybody know of an English version of GLibWMI? I'm afraid my French, or whatever language it is, is not all that good. i.e. non existant. Also, I don't think English Users would appreciate non-english prompts. πŸ˜‰ Alternatively, is there another Library that provides similar functionality? I'm really only after the ability to stop/start windows services. Regards & TIA, Ian
  3. Ian Branch

    Set Print Font Size...

    Hi Team, You might want to upvote this RSP submission if you experience the same issue I do.. https://quality.embarcadero.com/browse/RSP-40401?filter=-3 Regards, Ian
  4. Ian Branch

    Set Print Font Size...

    The monitors are scaled to the recommended 150%. This works fine for all Apps in the main.
  5. Ian Branch

    Set Print Font Size...

    Hi programmer2k, Yes it does, but you expect it there because you have set it as such. Yes, the IDE does the same thing but should it? I don't set the font in the IDE to 14 so I can print at 14, I set it so I can read it. Trying to work with a font size of 10 in the IDE on a 4k screen is just impossible for my tired olds eyes. πŸ˜‰ Yet font size 10 on print is perfectly readable. When I print, I need to be able to reduce the font to a manageable size for reading on the paper. Hence the request. Ian
  6. Ian Branch

    Pos

    Seems to have a redundant ')' after the =0..
  7. Ian Branch

    English Version of GLibWMI??

    Thank you all for your inputs. Appreciated. In the short term I have gone with Angus' Magenta component. Having said that I am interested in learning how to call/use the winapi stuff. Is there a guide somewhere? I have looked at the MS information and it is like reading a different language. Regards & TIA, Ian
  8. Ian Branch

    English Version of GLibWMI??

    Angus - Tks, d/load requested. Stephane - French, Spanish, same difference to me. I don't understand it. πŸ™‚ Ian
  9. Ian Branch

    Indy 11 ??

    No pressure, just asking.. When might Indy 11 surface?? Regards & TIA, Ian
  10. Ian Branch

    Indy 11 ??

    Tks Remy, As I said, just curious. Regards, Ian
  11. Ian Branch

    Can anybody confirm, pls

    D11.2 - I don't get the error message but Delphi falls over.. 😞
  12. Ian Branch

    Close application during form create??

    Tks Mark-
  13. Ian Branch

    Error building rev 3943

    Attempting to build rev 3943 under D11.2. Get the following.. Regards, Ian
  14. Ian Branch

    Error building rev 3943

    Tks, all good now.
  15. Hi team, Given a database table field statement.. MyTable.Fieldbyname('MyField').AsString What is the best/most efficient way to test if it is empty or NULL?? IsNullOrEmpty(MyTable.Fieldbyname('MyField').AsString) But Delphi didn't like it. Regards & TIA, Ian
  16. Ian Branch

    Check if database table string field is empty or NULL??

    Hi Stano, Doesn't that assume that the field is Null if empty? Ian
  17. Didn't even realize there was such a thing as a 'Premium Update Subscription'. 😞
  18. Ian Branch

    Regex help please..

    Hi Team, Regex is one of those mysteries I have never fathomed. :-( I have the following code.. function ValidEmail(const EmailAddress: string): Boolean; const EMAIL_REGEX = '^((?>[a-zA-Z\d!#$%&''*+\-/=?^_`{|}~]+\x20*|"((?=[\x01-\x7f])' + '[^"\\]|\\[\x01-\x7f])*"\x20*)*(?<angle><))?((?!\.)' + '(?>\.?[a-zA-Z\d!#$%&''*+\-/=?^_`{|}~]+)+|"((?=[\x01-\x7f])' + '[^"\\]|\\[\x01-\x7f])*")@(((?!-)[a-zA-Z\d\-]+(?<!-)\.)+[a-zA-Z]' + '{2,}|\[(((?(?<!\[)\.)(25[0-5]|2[0-4]\d|[01]?\d?\d))' + '{4}|[a-zA-Z\d\-]*[a-zA-Z\d]:((?=[\x01-\x7f])[^\\\[\]]|\\' + '[\x01-\x7f])+)\])(?(angle)>)$'; begin Result := IsMatch(EmailAddress, EMAIL_REGEX); end; I don't recall exactly where I found it, apologies to the author, and it has served me well. It works well for single email address entries. How can it be modified so that it will parse multiple email addresses separated by a ';'? e.g. myemail@here.com;youremail@there.com.au With possible expansion to three or more email addresses in the future. I will be most grateful for any solution. Regards & TIA, Ian
  19. Ian Branch

    Turbopower Visual Planit??

    Hi Team, Has anybody brought TPVP into the 21st century? πŸ˜‰ I have downloaded it from SF and am trying to get it loaded under D11.2. Regards & TIA, Ian
  20. Ian Branch

    Turbopower Visual Planit??

    I suspect it does, it has a later version #. Maybe I will look at it once I get this little exercise over.
  21. Ian Branch

    Getters & Settters??

    Hi Team, I have only ever used a Getter/Setter construct once and that was just copying some code. It worked, but I didn't really understand what was going on and at the time urgency was priority. I now believe I have a use for Getters & Setters but don't understand what they are actually doing. Can some one point me to a plain English explanation of what Getters & Setters do and how they do it. Do I need both a Getter & a Setter for the functionality to work? Be gentle.. πŸ˜‰ Regards & TIA, Ian
  22. Ian Branch

    Turbopower Visual Planit??

    OK. I downloaded and had a look at the Lazarus implementation. I also had a look at various Lazarus/Delphi conversion guides. As I have the original almost working now I don't think I want to tackle the Lazarus/Delphi conversion.
  23. Ian Branch

    Turbopower Visual Planit??

    No, I wasn't aware. Is there much involved in porting Lazarus/FreePascal to Delphi??
  24. Ian Branch

    Turbopower Visual Planit??

    If I ever get it working.. πŸ™‚
  25. Ian Branch

    Turbopower Visual Planit??

    I changed TVpDependentInfo(DependentList.Listο»Ώ^[I]).Component to TVpDependentInfo(DependentList.Items[I]).Component and it seems to like it. We'll see. Next issue..
Γ—