uligerhardt

DevEx cxImageLists at least store the individual images in separate blob subitems. And they don't change the blobs on every occasion.

I'll try to rephrase: As your package is called JasotComponents, * means JasotComponents, so the 3 $R lines are equivalent to: {$R JasotComponents.res JasotComponents.rc} {$R JasotComponents.res JasotComponentsResource.rc} {$R JasotComponents.res JasotComponents.rc} So you're instructing Delphi to include the resource file JasotComponents.res 3 times, and to create it alternatingly from JasotComponents.rc and JasotComponentsResource.rc. That probably won't work. 😉

Shouldn't the second $R line be {$R JasotComponentsResource.res JasotComponentsResource.rc} ? Also, the first and the third $R line refers to identical files, doesn't it?

Hello all! We are using an "prehistoric" version (2.21 AFAICT) of VCLZip by Kevin Boylan together with Delphi 2007. After finally making the switch to an Unicode version of Delphi we get some errors with invalid zip files and the like. In the internet I found references to an Unicode aware version 4.50 but no way to to licence or download it. Does anybody have any hints with this?

Not yet, But the Synopse stuff is usually good, so I'll might have a look.

FWIW: I sent an e-mail to his bigfoot address and got an "Undeliverable". 😞

XE6 for now. I know about System.Zip.TZipFile, but IIRC it didn't have all features we use from VCLZip. I should look again.

As an Ingress player, I always have to check whether I am in a Niantic or an Embarcadero forum, when I read stuff like this.

At least I'd be careful with letting an official Ferrari mechanic touch my Enzo 😉 Ferrari Enzo zerstört: Mechaniker zerlegt bei Spritztour Millionen-Rarität | STERN.de

Would be nice if the warning specified that non-const aspect. 😉

Try storing zip.FileNames in a local variable. Edit: ... and maybe drop vZipContents and use that local variable instead.

I'd compare your original docx before and the one after the user pressed "Yes". Maybe you can see what you have to change in the differences.

That's only true for the uses-clause entries that the form designer manages. (Which is a tiny fraction in my development.)

If I'm not missing anything, Oxygene didn't "reverse" it, but kept it consistent with Pascal.

There is http://docwiki.embarcadero.com/RADStudio/Sydney/en/Writeable_typed_constants_(Delphi). It's just off per default for some years now.

https://blogs.windows.com/windowsdeveloper/2021/01/21/making-win32-apis-more-accessible-to-more-languages/ Sounds very interesting.

Ok, then I misunderstood you. 😎

This is about generating wrappers for classic Win32 API, Not some WinRT stuff. Autogenerate Windows.pas! 😎

Hello! I want to show a MessageBox from inside a TL21_.OnViewerButtonClicked event handler and need the window handle of the preview form for that. Any idea how to get there?

I tried it just now, and it works AFAICT - I used GetWindowText(gPrintReportWnd, ...) to verify. Thanks a lot.

Here is the relevant code, a bit condensed: type TPrintLLReportEventHandler = class public procedure OnViewerButtonClicked(Sender: TObject; Button: TViewerButton; var PerformDefaultAction: Boolean); end; { TPrintLLReportEventHandler } procedure TPrintLLReportEventHandler.OnViewerButtonClicked(Sender: TObject; Button: TViewerButton; var PerformDefaultAction: Boolean); begin if Button = vbExit then begin MessageBox(AWnd, .....); // <= I'd like to get the preview form's window handle here for AWnd end; end; var evh: TPrintLLReportEventHandler; evh := TPrintLLReportEventHandler.Create; try MyLLReportInstance.OnViewerButtonClicked := evh.OnViewerButtonClicked; // Show preview here (using LL_PRINT_PREVIEW) finally evh.Free; end;

Sorry, forgot to mention it in the message body. It's the List&Label report component.

Yes. I guess DevEx wouldn't like us to pass links around, however outdated the components may be.

Very good. 🙂

No, that's "original content" that I just created just for this thread. 😄