Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Algorithmen, Datenstrukturen und Klassendesign (https://www.delphipraxis.net/78-algorithmen-datenstrukturen-und-klassendesign/)
-   -   TBitmap Zoom Option , VCL Framework (https://www.delphipraxis.net/210386-tbitmap-zoom-option-vcl-framework.html)

bernhard_LA 16. Apr 2022 15:24

TBitmap Zoom Option , VCL Framework
 
gibt es frei verfügbare TBitmap zoom Komponente in DELPHI + VCL ?

Mit der Mouse über da Bild fahren und dann an der Stelle des jeweiligen Mouse Cursors das Bitmap gezoom darstellen ?
Wollte erstmal nichts eigenes Basteln

DeddyH 16. Apr 2022 16:31

AW: TBitmap Zoom Option , VCL Framework
 
Hilft Dir das hier für den Anfang weiter? Du müsstest dann nur noch den gewünschten Bildausschnitt definieren und in einer weiteren Bitmap temporär speichern.

Michael II 16. Apr 2022 19:48

AW: TBitmap Zoom Option , VCL Framework
 
Graphics32 kann das auch. Es sind verschiedene Resampler (wie zum Beispiel Lanczos) eingebaut.
Und affine Abbildungen (also auch dein gewünschtes "Skalieren mit Fixpunkt") sind auch bereits eingebaut. Es gibt zwar soweit ich weiss nicht direkt eine GR32 Komponente, basteln musst du aber nix.

Jens01 18. Apr 2022 11:22

AW: TBitmap Zoom Option , VCL Framework
 
Ich würde auch GR32 vorschlagen. Dort gibt es auch gute Komponenten. Deine Vorstellung wird aber nicht direkt umgesetzt, da mußt Du noch basteln.

Vllt hat aber Angus schon etwas dafür entwickelt, mußt Du einfach mal gucken: http://www.angusj.com/delphi/image32...nels/_Body.htm

HolgerX 18. Apr 2022 20:34

AW: TBitmap Zoom Option , VCL Framework
 
Hmm..

Zitat:

Zitat von bernhard_LA (Beitrag 1504676)
gibt es frei verfügbare TBitmap zoom Komponente in DELPHI + VCL ?

Mit der Mouse über da Bild fahren und dann an der Stelle des jeweiligen Mouse Cursors das Bitmap gezoom darstellen ?
Wollte erstmal nichts eigenes Basteln

Soweit ich diese Anfrage verstanden habe, geht es nicht um ein einfaches Zoom des ganzen Bildes sondern eher um eine Art Lupe (Magnifier) welche einen Teilausschnitt des Images unterhalb der Mouse vergrößert. Dieses als 'fertige' Komponente..

Richtig?

Wenn dem so ist dann kann ich mal in meinen alten Archiven suchen..

Renate Schaaf 18. Apr 2022 21:09

AW: TBitmap Zoom Option , VCL Framework
 
Liste der Anhänge anzeigen (Anzahl: 1)
Wie gut, dass ich mit Graphics32 rumgespielt habe, um so ein Vergrößerungsglas zu bauen. Dadurch habe ich nämlich einen bug gefunden, den ich in GR32_Resamplers produziert habe. Mit der momentan letzten Version geht das gar nicht. Ich habe ein "issue" auf GitHub erstellt mit der Berichtigung, ich hoffe Anders reagiert gewohnt schnell.

Jedenfalls funktioniert das angehängte Vergrößerungsglas, das Projekt enthält die berichtigte Version von GR32_Resamplers. Man könnte das auch in eine nicht-visuelle Komponente übersetzen, aber im Moment ist das nur ein Formular TfrmMagnify32, welches eine Lupe für eine beliebige TControl macht.

Renate


Alle Zeitangaben in WEZ +1. Es ist jetzt 11:33 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz