Jump to content

DelphiRio

Members
  • Content Count

    19
  • Joined

  • Last visited

Everything posted by DelphiRio

  1. 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!
  2. I solved this problem by using OpenVPN!
  3. DelphiRio

    Experience/opinions on FastMM5

    There is version of FastMM4 supports NUMA & FPC. Check here: https://github.com/maximmasiutin/FastMM4-AVX
  4. 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
  5. DelphiRio

    Get memory usage information

    Thank you very much. It works!
  6. DelphiRio

    Get memory usage information

    Called FastMM4.CheckBlocksOnShutdown(True) and FastMM4.CheckBlocksOnShutdown(False), nothing happens. My app is well tested and no memory leak!
  7. I would like to draw something like this: Thank you very much
  8. DelphiRio

    Use graphics32 to draw rounded rectange with gradient + border

    @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
  9. DelphiRio

    Hook keyboard and mouse

    Try this: https://github.com/JensBorrisholt/Hooks
  10. DelphiRio

    Directions for ARC Memory Management

    IMO EMBT should create a new programming language and put ARC on it
×