[SOLVED] Splitting an image

[madref]

I know I am a terrible forum member that keeps asking.


But is it possible to adjust the letters in the boxes zo they are centered?

[paweld]

check my example - there they are centered

[madref]

i am looking at it....but don't know whee to look.
I am just a hobby programmer

[KodeZwerg]

First off all I am glad that it works now for you and that you actually read the source to (de)activate proper compile setting

I know I am a terrible forum member that keeps asking.


But is it possible to adjust the letters in the boxes zo they are centered?

With my example you have 2 options, try to draw it quick with disadvantage as of right now to be drawn centered
or you turn Speedmode off and get a centered variation that also is filling out the available space.

If you really want "small" letters than I would need to rethink my doing or you simply switch to the way faster always sharp rendered variant from paweld with 360 possible colorchanges on the fly
(because that it always look extra sharp I personal dislike it but the speed, omg, I do envy you so much ^_^)

Attached is my latest modifications, dont ask what I've changed, here and there some quirks
and again exemplary 2 images with the speed mode turned on and off.

[paweld]

I know I am a terrible forum member that keeps asking.

that's what the forum is for

But is it possible to adjust the letters in the boxes zo they are centered?

I took the liberty of slightly modifying @KodeZwerg's solution (I modified the latest version of the uFont.pas file) so that with “SpeedMode” the letters are centered.

... but the speed, omg, I do envy you so much ^_^)

this is all thanks to the BGRABitmap component.

[KodeZwerg]

I took the liberty of slightly modifying @KodeZwerg's solution (I modified the latest version of the uFont.pas file) so that with “SpeedMode” the letters are centered.

Thank you very much, I should add an ultraspeed mode for your way The success rate (is font full drawn or does it gets cut) is pretty high for many fonts I've tested with.
In my personal opinion I do dislike it since its loosing its charme of being an rendered image instead of a clear and sharp drawn font but hey, it's not about me

Code: Pascal  [Select][+][-]

1.             begin
2.               LHighRes.SetSize(CCanvasWidth, CCanvasHeight);
3.               LHighRes.Canvas.Brush.Color := $FEFEFE;
4.               LHighRes.Canvas.FillRect(LHighRes.Canvas.ClipRect);
5.               LHighRes.Canvas.Font := FFont;
6.               LHighRes.Canvas.Font.Height := Pred(CCanvasHeight);
7.               fw := LHighRes.Canvas.TextWidth(UTF8Copy(LWords[i], j, 1));
8.               LHighRes.Canvas.TextRect(LHighRes.Canvas.ClipRect, Pred(Round((LHighRes.Width - fw) / 2.5)), 0, UTF8Copy(LWords[i], j, 1));
9.             end;

Again very very slightly modified your way so they appear a mini bit more centered to the left side.

Cool contribution paweld!

[madref]

I tried the latest version of the uFont.pas but I get an error on these lines:

Code: Pascal  [Select][+][-]

1.       function ScaleTo(const ACurrent, AMax, AScaleMax: Int64; const AIncludeZero: Boolean = True): Int64; overload; inline;
2.       function ScaleTo(const ACurrent, AMax, AScaleMax: Double; const AIncludeZero: Boolean = True): Int64; overload; inline;
3.       function ScaleTo(const ACurrent, AMax, AScaleMax: Double; const AIncludeZero: Boolean = True): Double; overload; inline;
4.       function ScaleTo(const ACurrent, AMax, AScaleMax: Int64; const AIncludeZero: Boolean = True): Double; overload; inline;
5.  

Why is of course the question

[KodeZwerg]

...but I get an error on these lines...

Since you are not a coder you do not know this little thingy, without knowing the error there is not much we can talk about.

[madref]

Here are the errors

[KodeZwerg]

Here are the errors

Okay, it is strange but I accept that your version is not compatible to mine, no worries, fixing it is quit easy.
Make this:

Code: Pascal  [Select][+][-]

1.       function ScaleTo(const ACurrent, AMax, AScaleMax: Int64; const AIncludeZero: Boolean = True): Int64; overload; inline;
2.       function ScaleTo(const ACurrent, AMax, AScaleMax: Double; const AIncludeZero: Boolean = True): Int64; overload; inline;
3.       function ScaleTo(const ACurrent, AMax, AScaleMax: Double; const AIncludeZero: Boolean = True): Double; overload; inline;
4.       function ScaleTo(const ACurrent, AMax, AScaleMax: Int64; const AIncludeZero: Boolean = True): Double; overload; inline;
5.  

Look like this: (since the overloads I just prepared to be exported in my codelib)

Code: Pascal  [Select][+][-]

1.       function ScaleTo(const ACurrent, AMax, AScaleMax: Int64; const AIncludeZero: Boolean = True): Int64; inline;

When that is done, scroll very very down to the source where you find

Code: Pascal  [Select][+][-]

1. function TImageFont.ScaleTo(const ACurrent, AMax, AScaleMax: Int64; const AIncludeZero: Boolean = True): Int64; overload; inline;
2. begin
3.   if AMax = 0 then
4.     Result := 0
5.   else
6.   if ACurrent >= AMax then
7.     begin
8.       if AIncludeZero then
9.         Result := AScaleMax
10.       else
11.         Result := Pred(AScaleMax);
12.     end
13.   else
14.     if AIncludeZero then
15.       Result := Round(ACurrent * AScaleMax / AMax)
16.     else
17.       Result := Round(ACurrent * Pred(AScaleMax) / AMax);
18. end;

remove there the "overload;" in first line and delete all other "ScaleTo" variations.

[madref]

I thought it was solved but I noticed a strange behavior with the letter i.


All letters are nice and tight except the letter i.


See picture.


Is there a way to solve this?

[KodeZwerg]

All letters are nice and tight except the letter i.

hmmm... I thought I've told that.

Problematic could be small printable chars that become "overstretched", like a dot become a gigantic cube.

Is there a way to solve this?

As of right now, no. Since the Stretch-To-Fit way does do exact what it should, it stretch the font to fit into the box by filling it out in all dimensions, without respecting proportions.
So when using the non-speed mode to stretch, than it is like it is, sorry mate.
Dangerous characters for stretching (depend on font) = i l 1 . , - _ : ; ' ^ ` ~ + ´ { ( [ ] ) } ² ³ |  (probably more small/thin characters that I forgot to mention)

Feel free to invent for those dangerous characters a separate way of how it's handled.

[KodeZwerg]

By quick checking for some unicode replacement for letter "i" -> this works " Ⅰ "

//edit
added image with the dangerous characters rendered two times, once in speed mode and once without.
there you can see pretty good what the stretching does do to small/thin characters.

[madref]

Maybe a silly option but is it possible to NOT stretch the letters but use a font size instead? and then center these letters?


Or am I asking to much?

[KodeZwerg]

Maybe a silly option but is it possible to NOT stretch the letters but use a font size instead? and then center these letters?


Or am I asking to much?

Watch image, what you want to have changed?
Its either stretched or centered but smaller.