Text and Zoom

[Mirage]

Hello!

I wrote in a node ' Win Your Self'. When I press 2 times zoom + the ' W' of ' Win' disappears and the ' f' of ' Self' disappears.

I want to know that it is the problem and it is possible to correct it.

Normal Node:


Node after zoom:

[Kambiz]

It's SimpleGraph's bug. I'll fix it on the next release.

Thank you!

[elias]

To Kambiz:
What's the reason you decided not to use a Tlabel but creating your own drawing-text routines?

I was playing with your checkers game nice.

[Kambiz]

To be independent of Delphi's controls, felexibility, and not using extra resources.

Have fun with playing checkers.

[Mirage]

Hello



Please give me a solution!


thank you in advance.

[kokkoras]

So, this old issue

(http://www.delphiarea.com/forum/viewtopic.php?t=519 - #4)

is still here but in a different twist...

A working temporary solution is to increase the width of the node, by a small number of pixels, say 1 or 2. Thats what I did in the time of the above old post.

edit: The above statement is obviously wrong . It's not the node's width. Is must be related to some clipping rectangle.

[Kambiz]

As a quick fix, please open SimpleGraph.pas and look for:

Code: Select all

procedure TGraphNode.DrawText(Canvas: TCanvas);

inside the implementation of the method, look for:

Code: Select all

    DrawTextFlags := DT_NOPREFIX or DT_EDITCONTROL or
      TextAlignFlags[Alignment] or TextLayoutFlags[Layout];

Then, replace it with:

Code: Select all

    DrawTextFlags := DT_NOPREFIX or DT_EDITCONTROL or DT_NOCLIP or
      TextAlignFlags[Alignment] or TextLayoutFlags[Layout];

Eventually, save the file and compile your code.

[kokkoras]

As a quick fix, ......

Why is it a quick fix? Are there any side effects?

[Kambiz]

There's no side effect at all.

[Mirage]

Thank you Kambiz!

Thank you very much. You solved a big problem for me.

Thank to my ALLAH god;

Thanks