Canvas.TextOut mit Text Shadow-Erweiterung

[s.h.a.r.k]

Zitat von NamenLozer:

Die Exe-Demo funktioniert leider auch nicht:

Zitat:

---------------------------
Project1.exe - Komponente nicht gefunden
---------------------------
Die Anwendung konnte nicht gestartet werden, weil FastMM_FullDebugMode.dll nicht gefunden wurde. Neuinstallation der Anwendung könnte das Problem beheben.
---------------------------
OK
---------------------------

PS: Wäre schön, wenn du für Archive ein offenes Format wie 7zip oder ZIP statt RAR verwenden würdest.

Okay, okay, okay... Wird auch noch gefixt Mein Lib kommt dann auch noch 7z-verpackt...

So, anbei das Paket im 7z-Format und im Examples-Ordner befindet sich eine gefixte Version, ohne Einbindung von FastMM.

[stOrM]

Btw. Ich teste grad mal ein wenig rum, ganz nette Sachen bei
Btw. sowas funzt ned?

Code:

Label1.Canvas.ShadowedTextOut(8, 8, 'Test!', 2, 2, 4, 0, 255);

[s.h.a.r.k]

Hm, da stimmt wohl eine Berechnung eines Rechtecks nicht so recht

-- Edit: Doch, ist alles korrekt imho. Schau mal in die Zeile 200 der ApLib.ClassHelpers. Dort pinsel ich via TextOut die Schrit auf das Canvas und das genau an die Stelle, die du via X und Y Koordinaten übergibst.

Und nachdem das hier eine Frage war.

Zitat von stOrM:

Btw. sowas funzt ned?

Code:

Label1.Canvas.ShadowedTextOut(8, 8, 'Test!', 2, 2, 4, 0, 255);

Doch, das geht

[stOrM]

Naja so tief bin ich nicht eingestiegen in die Sourcen fiehl mir nur grad auf weil genau für nen Label könnt ich den Shadowtext gut brauchen. Gibts ein SVN zu deinen Sourcen falls es Opensource bleibt bzw. Du Sachen fixt?

[s.h.a.r.k]

Zitat von stOrM:

Naja so tief bin ich nicht eingestiegen in die Sourcen fiehl mir nur grad auf weil genau für nen Label könnt ich den Shadowtext gut brauchen. Gibts ein SVN zu deinen Sourcen falls es Opensource bleibt bzw. Du Sachen fixt?

Bisher ist leider alles noch in einem Closed-Source-Repository. Ich wollte schon seit Monaten meine Lib veröffentlichen, bin aber leider noch nicht so recht dazu gekommen, alles auf ein von mir gewünschtes Niveau zu heben. Es gibt hier und da immer noch Ecken und Kanten, die noch nicht so toll sind. Ebenso sind die Demos nicht unbedingt auf dem Stand des Source-Codes und es fehlen noch viele Demos, die ich in einem anderen Repo pflege, da diese noch nicht final sind.

Jedenfalls hoffe ich, dass ich das binnen ein bis zwei Monate endlich mal eine Beta veröffentlichen kann. Dann erfährst du definitiv hier davon Hin und wieder poste ich ein Version der Lib in einem Beitrag, da ich sonst die Lib auseinandere nehmen müsste, wenn ich eine Demo oder dergleichen poste -- so wie es eben hier der Fall ist.

Somit, in alter Blizzard-Manier: It's done, when it's done!

PS: Es bleibt auf jedenfall Opensource, da mir die DP schon so viel gegeben hat, dass man so einer Community auch was zurückgeben muss. Werde wohl auch die MIT Lizenz nutzen, da diese recht kurz und frei gehalten ist.

[stOrM]

Ja würd mich freuen wenn Du mir eine Info zukommen läßt wenns mal soweit ist mit der Beta...
Was ich vorschlagen würde wäre ggf. Wenn Du halt Demos machst nutz wenn Du kannst Hauptsächlich standart VCL für Einstellungen und der gleichen. (Beispiel ShadowText man will ja nicht immer ne Komplette Sammlung installieren um eine Sache anzusehen.)

Was die Sache mit dem gerade besprochenen TLabel anbelangt also bisher funzt es nicht bei mir, muß ich mir noch mal genauer ansehen an den Coords sollte es eigentlich nicht liegen, da die nun auf 0, 0 stehen anstelle von 8,8 also sollte die im Rect liegen)

[s.h.a.r.k]

Pass aber auf die AutoSize-Eigenschaft deines Labels auf. Ich habe vorher einfach die Caption entfernt, dann die Größe via Designer gesetzt und AutoSize gleich False gesetzt. Hat dann eben wunderbar geklappt gehabt.

Bzgl. den Demos: Jup, da hast du wohl Recht Dieses BMSpinEdit nutze ich nur sehr gerne, da es von der Usability her klasse ist, ebenso die (Sp-)TBX-Komponenten.

[stOrM]

Zitat von s.h.a.r.k:

Pass aber auf die AutoSize-Eigenschaft deines Labels auf. Ich habe vorher einfach die Caption entfernt, dann die Größe via Designer gesetzt und AutoSize gleich False gesetzt. Hat dann eben wunderbar geklappt gehabt.

Bzgl. den Demos: Jup, da hast du wohl Recht Dieses BMSpinEdit nutze ich nur sehr gerne, da es von der Usability her klasse ist, ebenso die (Sp-)TBX-Komponenten.

Sorry wie Dumm muß man sein ne andere Komponente hatte das Label verdeckt deshalb sah ich nix Funzt nu super

[Blup]

Für alle die sich mit AlphaBlend rumärgern müssen, hier noch die Änderung am urspünglichen Code:

Delphi-Quellcode:

var
  Alpha: word;
{...}
      for Col in [0 .. Buffer.Width - 1] do
      begin
        BufferPixel := @BufferScanline[Col];
        MaskPixel   := @MaskScanline[Col];
        Alpha := (MaskPixel.rgbtRed + MaskPixel.rgbtGreen + MaskPixel.rgbtBlue) div 3;
        // premultiplied alpha, red, green and blue channel
        BufferPixel.rgbRed      := (BufferPixel.rgbRed   * Alpha) shr 8;
        BufferPixel.rgbGreen    := (BufferPixel.rgbGreen * Alpha) shr 8;
        BufferPixel.rgbBlue     := (BufferPixel.rgbBlue  * Alpha) shr 8;
        BufferPixel.rgbReserved := Alpha;
      end;