-
Content Count
83 -
Joined
-
Last visited
Everything posted by uligerhardt
-
Is there a Delphi equivalent of WriteStr ?
uligerhardt replied to Martin Liddle's topic in RTL and Delphi Object Pascal
That should be just Str. -
How to detect if a Dialog is open/running?
uligerhardt replied to Ian Branch's topic in General Help
Depending on your needs a non-modal solution might be better - something like Windows' toast notifications. I use DevExpress' dxAlertWindow for that. -
I have disabled the "Always break line between else and if" option, and I'm happy with the results. However my colleague insists on having nested if-elses without begin/end pairs and on top mixes this with comments. A simplified example: procedure MyProcedure(a, b: Boolean); begin if a then if b then Beep else Beep else // Kommentar if b then Beep else Beep; end; This gets formatted to procedure MyProcedure(a, b: Boolean); begin if a then if b then Beep else Beep else {// Kommentar} if b then Beep else Beep; end; Is there an option to keep the lines separate under these circumstances? Do you deem the current behavior desirable?
-
How should spaces after a comment be handled by the formatter
uligerhardt replied to dummzeuch's topic in GExperts
I think leaving the spaces as is (C3) may be the least annoying solution. -
"Always break line between else and if" vs. comments
uligerhardt replied to uligerhardt's topic in GExperts
Do I remember correctly that the standalone formatter doesn't use the expert DLL anymore? That should make debugging much easier. -
"Always break line between else and if" vs. comments
uligerhardt replied to uligerhardt's topic in GExperts
OK then, I'll see if I can give it a try. -
"Always break line between else and if" vs. comments
uligerhardt replied to uligerhardt's topic in GExperts
I'd just use begin/end here too, but that's difficult because of my charcter counting colleague. 😉 -
I have an existing enhanced TMetafile in memory (technically speaking an array of them - it's a print preview) and want to add some text to it (page numbers). How can I best achieve that? First I tried creating a TMetafileCanvas for the MF and added my text. But creating the TMetafileCanvas clears the existing MF, so no luck. Could I supress the clearing somehow? The next idea was to clone the original MF: OrigMF := // my metafile in memory CloneMF := TMetafile.Create; try CloneMF.Assign(OrigMF); MFCanvas := TMetafileCanvas.Create(CloneMF, 0); try MFCanvas.Draw(0, 0, OrigMF); // Draw my stuff on MFCanvas finally MFCanvas.Free; end; OrigMF.Assign(CloneMF); finally CloneMF.Free; end; but I didn't manage to preserve the page dimensions, font sizes etc. The reference DC used to create OrigMF is gone and the combinations of properties like Width, MMWidth and Inch that I tried didn't help. How could I clone OrigMF retaining these informations (that must be stored inside)? PS: While writing this post I managed to dig out a reference DC that worked. But answers would be still interesting.
-
Thanks, I didn't see that comment. And indeed it mostly works without the cloning. However without passing a reference DC <> 0 resolution/size still get mixed up. But as mentioned in my postscriptum I found a compatible DC, so that's only a cosmetic problem. :-))
-
The Alt-F7/8 shortcuts for moving through compiler messages don't work for me anymore (since some time already). I suspect these GExperts shortcuts to be the culprits: Can anybody confirm the issue?
-
Grep Alt-F7/8 disable builtin shortcuts for message window
uligerhardt replied to uligerhardt's topic in GExperts
I had a look in the source code and decided I don't want to mess up GExperts' shortcut management. 😅 However I discovered that the relevant actions (actListSelectNext/actListSelectPrevious in TfmGrepResults) have SecondaryShortCuts assigned. These don't work for me out of the box but I assigned them in the config dialog: I'll check how that works out for me. -
Grep Alt-F7/8 disable builtin shortcuts for message window
uligerhardt replied to uligerhardt's topic in GExperts
I guess one could track the most recently focused one of the "target" lists. Maybe it could work to have the shortcuts enabled (i.e. <> 0) only if the Grep result list is focused? I'll see if I can play a bit with that. -
Grep Alt-F7/8 disable builtin shortcuts for message window
uligerhardt replied to uligerhardt's topic in GExperts
I just compiled a new GExpertsRSXE6.dll and the problem persists: Alt-F7/F8 iterate through the Grep results but not the compiler messages. Does anybody else have this issue? How can I fix it? I would like the shortcuts to work in both lists (e.g. depending on the focus) but if this isn't feasible I'd like to work them for the compiler messages. -
Scrap TVirtualStringTree using Win 32 api (SendMessage)
uligerhardt replied to MaxBayne's topic in Windows API
TVirtualStringTree is a custom control completely written in Delphi/VCL, so WinAPI messages won't help (especially not ones meant for list views). Are you extending the Delphi app? Do you have its source code? Do you want to talk to a running instance of the app? -
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.
-
Systemic failing of Embarcadero development and support or am I just paranoid ?
uligerhardt replied to CyberPeter's topic in General Help
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
-
Compilng in x64 gives a warning I see why occurs
uligerhardt replied to alank2's topic in General Help
Would be nice if the warning specified that non-const aspect. 😉 -
Delphi’s TZipFile working on a stream
uligerhardt replied to dummzeuch's topic in Tips / Blogs / Tutorials / Videos
Try storing zip.FileNames in a local variable. Edit: ... and maybe drop vZipContents and use that local variable instead.