![Delphi-PRAXiS [en]](https://en.delphipraxis.net/uploads/monthly_2018_12/logo.png.be76d93fcd709295cb24de51900e5888.png){kind=logo}
Registration disabled at the moment Read more...
×
Anna Blanca
-
Content Count
43 -
Joined
-
Last visited
-
So, i must open my DPROJ file with Notepad++ and edit it?
-
Thanks for your work. It's better!
-
May be, better make that: procedure Start(hwnd: HWND; hinst: HINST; lpszCmdLine: PAnsiChar; nCmdShow: Integer); stdcall; begin if Failed(CoInitialize(nil)) then begin CoUninitialize; end; end; Not?
-
I want make ShellLing object only with Delphi resources. How i can make it?
-
I'm creating plan DLL. I'm not acrossin DLL boundary. I'm just trying meke LNK-file in DLL, working through rundll32.exe, nothing more.
-
O'K, but LNK-file not created. But earlier, in Delphi 11, it's created normal.
-
Thanks for you all, but one problem is still now. I can't make LNK-file from my DLL: procedure TForm1.CreateLink(const PathObj, PathLink, Desc, Param: String); var IObject : IUnknown; SLink : IShellLink; PFile : IPersistFile; begin IObject := CreateComObject(CLSID_ShellLink); SLink := IObject as IShellLink; PFile := IObject as IPersistFile; SLink.SetArguments(PChar(Param)); SLink.SetDescription(PChar(Desc)); SLink.SetPath(PChar(PathObj)); PFile.Save(PWChar(WideString(PathLink)), FALSE); end; procedure TForm1.Timer1Timer(Sender: TObject); var S : String; begin S := TPath.GetHomePath + '\Linker.lnk'; CreateLink('FileName.jpg', S, 'Company', 'Argument'); Timer1.Enabled := False; end; When i use it in my DLL - nothing no happen. But when i use this in sample EXE - all working normal.
-
In this case, my DLL is main application. So, what library i must add in uses? And i want message you, if my DLL launch normal, when i not hide Form1, when i not use Application.ShowMainForm := False;
-
Hm-m-m, earlier, in Delphi 11, all worked normal and my library launched by rundll32.exe normal. So, and what is HINSTANCE? When i use it in my code, IDE underlining it by red.... No one module in uses not help.
-
Hello. I'm trying add Form in my DLL, and i hide it with next constraction: procedure Start; begin Application.Initialize; Application.CreateForm(TForm1, Form1); Application.ShowMainForm := False; Application.Run; end; exports Start; Earlier, in previous versions Delphi, my DLL worked normal, but exactly in 12-th Delphi version, all broked. When i launch my library through app, it's working normal, but when i launch through rundll32.exe - no one component on Form1 not working. What Embarcadero broked in this time and how fix it? P.S. I attach my project to this topic, you can open it and look all youselfe. Fucking DLL.zip
-
Where is this notes must be? Android Manifest?
-
I don't touch the splash screen, i only changed icons of app (36x36, 48x48, 72x72, etc).
-
O'K. Test.dproj
-
I not change splash screen
-
Yes, i do. No reactions.
