Jump to content

limelect

Members
  • Content Count

    835
  • Joined

  • Last visited

  • Days Won

    1

Everything posted by limelect

  1. limelect

    Best delphi so far?

    Since i am a Delphi developer since #1 and before I am in favor D7 and D10.2.3. Delphi is stable unless you add on some staff that make it erratic. For example closing D7 give an error that i never bothered to fix (i know which add on dose it). Some times D10.2.3 dose the same on closing. But on a days work i did not experience any problem unless the components do a problem. If one uses Delphi with nothing added no problem experience.
  2. limelect

    Passing back a string from an external program

    I used on D6 ,many years ago , mdMailSlot https://torry.net/authorsmore.php?id=152 It communicated between 4 computers (programs) maid with Delphi 6. Excellent
  3. limelect

    No TEMSProvider on my component pallet

    Delphi 10.2.3 I do not have TEMSProvider on my component pallet. Although i have the source. How to add it to component pallet ?
  4. limelect

    No TEMSProvider on my component pallet

    Thanks
  5. limelect

    No TEMSProvider on my component pallet

    No i do not have RAD SERVER on my pallet. There is a project i wanted to see that uses that component. Latter I found a demo project that is using it "E:\Delphi_Programs\Delphi_DEMO\Object Pascal\Database\EMS\CustomLogin\CustomLoginPackage.dproj" in it there is a dpk but then i have a new problem emsserverapi; well i am stack. it is a mess.
  6. limelect

    No TEMSProvider on my component pallet

    @PeterBelow No DPK no BPL? I have to make my own package? How come? Then which components are in C:\Program Files (x86)\Embarcadero\Studio\19.0\source\data\rest No "REGISTER" in any PAS file any link to procedure to register. And is this the only component in the above source? Although i am with Delphi since #1 never needed to do it that way
  7. This is mine http://limelect.com/downloads/add-characters-to-text-lines-on-large-scale/
  8. I have a similar project like this http://qaru.site/questions/919835/how-to-change-path-of-an-existing-windows-explorer-window when using Result := Succeeded(ShellBrowser.BrowseObject(ItemIDList, SBSP_SAMEBROWSER} or SBSP_ABSOLUTE)); explorer changes but i would like to bring also explorer to FRONT on top of all pages.
  9. limelect

    change the path to an existing windows explorer

    @PeterBelow Thank you what i did in the above program just added 2 lines findexpl:=GetAncestor(WebBrowserApp.HWnd,GA_ROOT); SetForegroundwindow(findexpl);
  10. limelect

    Getit problem

    On D10.2.3 did any one solved the problem of GetIt "invalid class typecast" I had the same problem d10.2.1 to use getit i open d10 free.
  11. limelect

    Blast from the past: BDE and Win10 W/S

    @Gary Mugford At a time BDE was very popular. I have many projects with it without any problems. Only this one customer who hold big amounts of records. Further more i have a few tables without any problems. Only this one table with large records. SO who have known that large table data will make problems?
  12. limelect

    Blast from the past: BDE and Win10 W/S

    I still have a customer who uses BDE. At a time i included PdxRbd source into the program. I do not know if it can be in your case. How ever from my experience of 20 years with my problem "out of sync" it seem that they closed the computer with out closing the program. Now a days it is OK. however if it once every 1/2 a year it mite happen so i run PdxRbd. At a time after long investigation there was no real solution to that problem. Further more i did NOT GIVE PERMISSION to update from window 7 to 10 !!!
  13. I am trying to translate "Libraries\Pictures\My Pictures\" for example to the directory "C:\Users\LimElect\Pictures" I am using var LShellItem: IShellItem; LPlace: TFavoriteLinkItem; begin if Succeeded(SHCreateItemFromParsingName(PWideChar('Libraries\Pictures\My Pictures\'), nil, StringToGUID(SID_IShellItem), LShellItem)) then begin Label1.Caption:= ShellItemFileSystemPath(LShellItem); //<< here LShellItem is nil !! end; This dose not work , any idea? I took the above from VCL.dialogs P.S Using FileOpenDialog and return FileOpenDialog1.ShellItem this works. BUT I DO NOT WANT TO EXECUTE. I just want the directory NOT a file !!
  14. limelect

    A directory translate

    @Remy Lebeau Thank you very much every body. From Remy who gave me a starting point i found what i NEED. It is MustangpeakVirtualShell-2.7.0\Demos\Namespace Browser It dose exactly my need. Thanks again
  15. limelect

    A directory translate

    @Attila Kovacs your solution mite work but in my case i cannot use . http://limelect.com/downloads/explorer-list/ My software opens the same ! explorer page to a new location !! i do NOT open a new page unless i want it. I need the real address P.S Try my software it is very useful to us programmers and many people downloaded it. I will try Remy solution
  16. limelect

    A directory translate

    @Remy Lebeau I will see how to apply your idea. Let me (if you allow ) how i got to this situation. I have a free program http://limelect.com/downloads/explorer-list/ which you can go to any EXPLORER address fast. I am adding to it explore HISTORY. (why ? because some time i forget where i was in explorer). when i go into a directory i get the TEXT in the explorer bar And then if i need it letter i use it. If i have an address as "c:\...." that not a problem. However libraries... this where my problem start. Thanks in any case
  17. limelect

    A directory translate

    @Rudy Velthuis sure no problem for that C:\Users\Rudy\Pictures. Since this is your directory for pictures . But that where i started to GET !!! from libraries\pictures to C:\Users\Rudy\Pictures THIS IS MY PROBLEM !!!
  18. limelect

    A directory translate

    @Rudy Velthuis Libraries\Pictures\My Pictures is OK I tried C:\Libraries\Pictures NOT OK. this is not logical since there in NO such directory. Just go to explorer and see how Explorer open 'libraries' and more
  19. limelect

    A directory translate

    @Rudy Velthuis I tried very simple 2 line of your suggestion var Attr, Eaten: ULONG; PathIdList: PItemIdList; DesktopFolder: IShellFolder; if Succeeded(SHGetDesktopFolder(DesktopFolder)) then begin //Libraries\Pictures\ if Succeeded(DesktopFolder.ParseDisplayName(0, nil, 'c:\', Eaten, PathIdList, Attr)) then begin end; If i use 'Libraries\Pictures\' for path i get PathIdList=nil If i use 'c:\' for path i get PathIdList <>nil i am stuck again Can you put your suggestion source here ? With what dir librery text did you try your solution?
  20. limelect

    Issue with code-editor toolbars

    @Uwe Raabe can you help with similar problem as seen The 2 arrows on the RIGHT of the component pallet (to move the component tab ) are not there since D10.1.0 the demo program. I am using D10.2.3 and still no arrow. On D10.2.1 neither . ON DXE it is OK !!! Can you convey the problem to Embarcadero.
  21. limelect

    A directory translate

    @Remy Lebeau I know most of the answer. It seem i did not ask the right way. The library section on the drive is only TEXT referring to c:/users/.... what i want is a way to translate this TEXT to c:/users/... My picture is just an EXAMPLE of my NEED. I tried Using FileOpenDialog that returns FileOpenDialog1.ShellItem this works. !!!!! BUT I DO NOT WANT TO EXECUTE. I just want the directory NOT a file !!!! I need the software behind FileOpenDialog ON A DIRECTORY (not a file) without the FileOpenDialog.execute. this is why i tried SHCreateItemFromParsingName I hop it clarified my need.
  22. limelect

    A directory translate

    NO because picture is only an example. However you gave me an idea to decode (i do not like it) a WORD in the explorer address to TPath.Get.... However i would like a nicer approach
  23. limelect

    Communication between processes (IPC)

    Many years ago with D6 i used TmdMailSlot very successful . Here you can download it https://torry.net/authorsmore.php?id=152
  24. limelect

    Shortcuts in Grep Results window no longer work?

    Just checked D10.2.3 V1.3.11.64 experimntal It works OK F5 (refresh), Ctrl+N (collapse all) and Ctrl + E (expand all) All work
  25. limelect

    How to replace whole words in a string

    In RX library use RxStrUtils.pas and use function ReplaceStr(const S, Srch, Replace: string): string; {$IFDEF RX_D9}inline; {$ENDIF} { Returns string with every occurrence of Srch string replaced with Replace string. } It dose the job
×