DelphiRio
Members-
Content Count
19 -
Joined
-
Last visited
Everything posted by DelphiRio
-
How to forward from public http proxy to private http proxy?
DelphiRio posted a topic in Network, Cloud and Web
Hi all, I have two servers which are running 2 http proxies (TIdHttpServerProxy). The first one is assigned to a public IP, and the second one is assigned to a private IP. Those are in difference private network! My question is: is there any component to forward connection from public proxy to the private one? The public one could run any software/component! Thanks! -
How to forward from public http proxy to private http proxy?
DelphiRio replied to DelphiRio's topic in Network, Cloud and Web
I solved this problem by using OpenVPN! -
Experience/opinions on FastMM5
DelphiRio replied to Leif Uneus's topic in RTL and Delphi Object Pascal
There is version of FastMM4 supports NUMA & FPC. Check here: https://github.com/maximmasiutin/FastMM4-AVX -
Hi, I'm facing a problem that my app uses a lot of RAM. The main data structure is a tree, it uses TList<T> to hold children (called node). When the app runs, it creates about 3600 nodes. But the memory is 400MB. The InstanceSize of node is about 200 bytes only, the data is not much, about 1KB each node, so it consumes about 4MB. I tested with default memory manager, FastMM4, same result. My question is: is there any tool to show how many object instances in the app (count + memory size)? Thank you
-
Thank you very much. It works!
-
Called FastMM4.CheckBlocksOnShutdown(True) and FastMM4.CheckBlocksOnShutdown(False), nothing happens. My app is well tested and no memory leak!
-
I would like to draw something like this: Thank you very much
-
Use graphics32 to draw rounded rectange with gradient + border
DelphiRio replied to DelphiRio's topic in VCL
@jbWishmaster Thank you very much. @Anders Melander I opened GradSampler, changed the code to: // ... FOutline := RoundRect(FloatRect(20, 20, 200, 200), 3); // ... procedure TFrmGradientSampler.PaintBox32PaintBuffer(Sender: TObject); begin //... Renderer.Filler := nil; Renderer.Color := clRed32; Renderer.PolyPolygonFS(BuildPolyPolyline(PolyPolygon(FOutline), True, 1, jsRound, esRound)); //... end; The border is not RED and larger than 1px (see the screenshot - zoom in version). How to get it draw same to (I mean the border quality) : https://jsfiddle.net/zjLsuavy/ Thank you very much -
Try this: https://github.com/JensBorrisholt/Hooks
-
Directions for ARC Memory Management
DelphiRio replied to Marco Cantu's topic in RTL and Delphi Object Pascal
IMO EMBT should create a new programming language and put ARC on it