Jump to content

sh17

Members
  • Content Count

    32
  • Joined

  • Last visited

  • Days Won

    1

sh17 last won the day on November 15 2020

sh17 had the most liked content!

Community Reputation

22 Excellent

Technical Information

  • Delphi-Version
    Delphi 10.4 Sydney

Recent Profile Visitors

1722 profile views
  1. No activity in the repository. Open pull requests. Is there an alternative? What is currently the best choice for cryptography under Delphi?
  2. sh17

    Firebase Push Notification for IOS

    I've found this Delphi 11 – Firebase Cloud Messaging ( FCM ) – iOS app Push Notification - Synaptica srl
  3. new reporte issue on this [RSP-33962] F2084 Interner Fehler: AV0D803420(0D7E0000)-R54626454-0 - Embarcadero Technologies
  4. sh17

    swagger help needed

    I'm in the same situation right now. There's no Delphi client generator for Swagger? Damn it.
  5. https://github.com/DelphiPraxis/DDevExtensions/releases/tag/v2.87 compiled pre-release, not fully tested yet
  6. @jbg do you manage pull requests? Otherwise we can centralize development here. https://github.com/DelphiPraxis/DDevExtensions
  7. sh17

    LibPhonenumber Delphi-wrapper

    the according Visual Studio project will come shortly I still have to prepare it, it looks a bit wild. technical it uses https://github.com/3F/DllExport
  8. In case someone wants to use the LibPhonenumber library from Google in Delphi. I've written a wrapper for the C # port of this library. Support for 32 bit and 64 bit. https://github.com/landrix/LibPhonenumber-for-Delphi
  9. sh17

    Sending email and compose via Outlook

    Yes, definitely in Office 365.
  10. sh17

    Sending email and compose via Outlook

    Not very different TMailOutlook = class(TObject) private const olMailItem = $00000000; private class function HaveActiveOleObject(const ClassName: string): boolean; public class procedure Execute(const _To,_ToCC,_ToBCC,_Subject,_Body,_Attachment : String); end; { TMailOutlook } class procedure TMailOutlook.Execute(const _To, _ToCC, _ToBCC, _Subject, _Body,_Attachment: String); var Outlook: OleVariant; MailV: Variant; begin if not HaveActiveOleObject('Outlook.Application') then Outlook := CreateOleObject('Outlook.Application') else Outlook:= GetActiveOleObject('Outlook.Application'); MailV := Outlook.CreateItem(olMailItem); if (_To <> '') then MailV.To := _To; if (_ToBCC <> '') then MailV.BCC:= _ToBCC; if (_ToCC <> '') then MailV.CC:= _ToCC; MailV.Subject := _Subject; MailV.Body := _Body; if _Attachment <> '' then if FileExists(_Attachment) then MailV.Attachments.Add(_Attachment); MailV.Display; end; //// Want to Bypass exception so we check this without using the activex unit class function TMailOutlook.HaveActiveOleObject( const ClassName: string): boolean; var ClassID: TCLSID; Unknown: IUnknown; oleresult: HResult; begin ClassID := ProgIDToClassID(ClassName); oleResult:= GetActiveObject(ClassID, nil, Unknown); result:= Succeeded(oleResult); end;
  11. sh17

    Drag and Drop Component Suite for Delphi 10.4 Sydney

    I updated the repository.
  12. sh17

    CalDavServer and Client

    I've been looking for a long time. There is no Delphi CalDAV server component. SabreDAV seems to be the best basis to develop your own server. Or as the basis for a port.
  13. sh17

    CalDavServer and Client

    There is no CalDAV server implementation for Delphi. A good base is https://sabre.io/dav/ I don't know how complex a port to Delphi is. CalDAV Clients come from https://www.tmssoftware.com/site/cloudpack.asp and https://www.sync-components.com/dav-delphi-components/caldav
  14. sh17

    Delphi 10.3.3 - Indy - could not load root certificate

    patch available http://blog.marcocantu.com/blog/2020-january-rad1033-indyssl-patch.html?utm_source=feedburner&utm_medium=feed&utm_campaign=Feed%3A+marcocantublog+(marcocantu.blog)
  15. not very handy, to many clicks, sry
×