Jump to content

limelect

Members
  • Content Count

    767
  • Joined

  • Last visited

  • Days Won

    1

Everything posted by limelect

  1. limelect

    debug message

    D10.2.3 window 7 I have had this problem for many years I wonder if there is a solution The program does not break on message in the IDE However, running the execution it works. P.S I see the + sign on the form when dragging a file wile in the IDE Drag and Drop do not work either I saw David Heffernan solution, but it did not help. https://stackoverflow.com/questions/14244325/drag-and-drop-files-to-delphi-form-not-working Any help? . unit Unit1; interface uses Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics, Vcl.Controls, Vcl.Forms, Vcl.Dialogs, Vcl.ExtCtrls, ProCtrls, Vcl.StdCtrls; type TForm1 = class(TForm) procedure FormDestroy(Sender: TObject); procedure FormCreate(Sender: TObject); private { Private declarations } procedure WMDropFiles(var Msg: TWMDropFiles); message WM_DROPFILES; public { Public declarations } end; var Form1: TForm1; implementation {$R *.dfm} uses ShellAPI; procedure TForm1.WMDropFiles(var Msg: TWMDropFiles); begin inherited; MessageDlg('dssdfsd', mtWarning, [mbOK], 0);<<<<<<<<<<<< does not break end; procedure TForm1.FormDestroy(Sender: TObject); begin DragAcceptFiles(Self.Handle, False); inherited; end; procedure TForm1.FormCreate(Sender: TObject); begin inherited; DragAcceptFiles(Self.Handle, True); end; end.
  2. limelect

    debug message

    I just found that drag-drop within a Delphi project will in the IDE works
  3. limelect

    debug message

    Thanks I know I have a huge problem here
  4. limelect

    debug message

    No they all work with this Windows 7. With no problems All I say is that Drag and Drop does not work under above conditions in the IDE. Neither the message problem work on D7 which mean that there is a System problem interacted with Delphi IDE
  5. limelect

    debug message

    I do not know if this help The problem of drag and drop (I did not check for messages) Persist with D7 too. Drage and Drop does not work on D7 either. Only outside of Delphi. So it is Windows 7 ported to ANY Delphi. Any idea how to check this? \
  6. limelect

    debug message

    I disabled D&d it did not help I know my problem is someplace in the IDE
  7. limelect

    debug message

    P.S i tried my test shown above in release It did not help
  8. limelect

    debug message

    Could you plz elaborate I do not recognize this May be send me link so I know what it si
  9. limelect

    debug message

    @Remy Lebeau @Anders Melander as i said on my D10.2.3 IDE nothing works as for drop As for my basic demo, I did exactly the suggestion no !!!! breakpoint in ide how ever message works with exe as for the analyzer I cannot drop either in ide or exe I doubt that I can be helped. it has something to do with my d10.2.3 and my Windows 7 system I guess. One more option is that a component I install does the problem But since I have large amount it is impossible to find which. OR an expert? Thanks
  10. limelect

    debug message

    @Anders MelanderI am I to drop a file onto the main pan? In my ide it does not work. it has an impossible sign.
  11. limelect

    debug message

    @PeterBelow can you plz give me a few lines of code thanks p.s do not forget official drag and drop do not work either in the ide
  12. limelect

    SSL connection

    I cannot communicate with my SSL site I cannot communicate to any HTTPS:// What am I doing wrong? function GetUpDate(Link: string): string; var S: string; IdHTTP: TIdHTTP; SSL: TIdSSLIOHandlerSocketOpenSSL; begin IdHTTP := TIdHTTP.Create(form1); try SSL := TIdSSLIOHandlerSocketOpenSSL.Create(IdHTTP); with SSL.SSLOptions do begin Method := sslvTLSv1_1; <<<< I tried them all Mode := sslmBoth; SSLVersions := [sslvSSLv2, sslvSSLv23, sslvSSLv3, sslvTLSv1, sslvTLSv1_1, sslvTLSv1_2]; end; IdHTTP.IO.Handler := SSL; // S := IdHTTP.Get(Link); S := IdHTTP.Get('https://limelect.com/UpDate/document-projects.txt'); result := S; except result := ''; ShowMessage('Could not get VERSION information from the INTERNET'); end; IdHTTP.Free; SSL.Free; end; I do not want to use any DLL plz.
  13. limelect

    SSL connection

    Thanks, everybody I incorporated Indy.SChannel into my software and it works great And why not dll because what for if there is an option without them? I like to make my software without dll as much as possible.
  14. limelect

    SSL connection

    Thanks a lot this did it Great NO DLL
  15. limelect

    SSL connection

    Tried that too allready Tried all out of frustration
  16. limelect

    SSL connection

    Thanks, I will try it immediately
  17. limelect

    SSL connection

    I know there is a way without DLL. Am I wrong? Any suggestion?
  18. limelect

    SSL connection

    D10.2.3 Indy 10 AND NO DLL
  19. limelect

    Is there a way to create a photo capture toobar?

    Just an idea. If this is a Chrome page use https://www.printfriendly.com/ to convert all HTML pages to PDF. I have an addon for Chrome which I use all the time
  20. limelect

    D4P_export_demo

    I wonder if someone can help. I made this Python to EXE with Delphi https://limelect.com/downloads/python-2-execute/ It works BUT when I use it on Delphi Py the first line does not find it. from delphifmx import * from parent_window import Parent_Form def main(): Running this script on GUIPY with no problem The line I am using is pyinstaller.exe --windowed D4P_export_demo.py --onefile --paths=C:\Users\LimElect\anaconda3\Lib\site-packages\delphifmx --name D4P_export_demo I have tried all combinations and could not find something. -paths=C:\Users\LimElect\anaconda3\Lib\site-packages\delphifmx is the path to the library. But GUIPY finds it with no problem P.S. I have asked this question on the Python platform with no answer. StackOverflow rejected my question I do not understand why so you are left. One more thing pip list shows the package
  21. limelect

    D4P_export_demo

    It is fixed here https://github.com/Embarcadero/DelphiFMX4Python/issues/94
  22. limelect

    D4P_export_demo

    OK guys I got this suggestion in HEBREW "https://www.facebook.com/groups/306586986847428/" pip install auto-py-to-exe==2.42.0 which I did and got the same problem So I guess I am left with Embarcadero helllllllllp
  23. limelect

    D4P_export_demo

    Sorry guys to bother .I came to a conclusion that it is Embarcadero's problem or mine. as it is in __init__.py if 'DelphiVCL' in fname: return os.path.join(sdir, os.path.basename(fname)) raise ValueError("DelphiVCL module not found. Try to reinstall the delphivcl package.") why ? i do not know. so I hop one of thos Delphi guys will see this All the package portions are there and in GUIPY it finds it but not as an execution. I single step to see this. Thanks
  24. limelect

    D4P_export_demo

    I tried a VCL project same problem
  25. limelect

    webcam settings

    I just want to open webcam setting with Delphi window 7 just code plz
×