Miniautransicht von Bildern in Delphi? eine zusätzliche Komp

[Karstadt]

Hallo.

Bin auf der Suche nach eine Komponente die mir bestimmte Bilder in Miniaturansicht zeigt und das aktuelle Bild in einen etwas größeren Format.

Oder kann mand das ganz einfach in D7 Pro realisieren?

Dankeschön

[fkerber]

Hi!

Eine solche Komponente iss mir nicht bekannt - aber eigentlich kann man das recht gut umsetzen.
Es gibt auch einige Programme hier in diese Richtung...


Ciao Frederic

[Karstadt]

Ein Ansatz wäre :

Ein Image Objekt zur Laufzeit mehrere male erstellem (Anzahl von Bilder)

Beim OnClick wird das Bild an das Große Image objekt übergeben... richtig?

[fkerber]

Hi!

Der Ansatz ist in der Theorie gut. Man sollte halt bedenken, für wie viele Bilder das ganze klappen soll.
Bei 1000 Bildern im Ordner iss das vielleicht nicht mehr so toll. Aber sonst isses ganz ok.


Ciao Frederic

[alcaeus]

Zitat:

Zitat von Karstadt

Ein Image Objekt zur Laufzeit mehrere male erstellem (Anzahl von Bilder)

Beim OnClick wird das Bild an das Große Image objekt übergeben... richtig?

Oder ein DrawGrid "missbrauchen" und die Images in die einzelnen Cells reinzeichnen. Hat den Vorteil dass du das Ganze auf kleinem Raum hinstellen kannst, und automatisch schon Scrollleisten dabei sind :)
Im OnSelectCell zeichnest du dann einfach das entsprechende Bild im Grossformat ;)

Greetz
alcaeus

[Karstadt]

In meinen Situation sieht das etwas anders aus. Ich lese die Pfade von Bilder in eine TStringlist ein und übergeben die an "miniaturanicht"


Wie kann ich eine Objekt Createn und dann eine Onclik Ereignis zuweisen?

[Karstadt]

Zitat:

Oder ein DrawGrid "missbrauchen" und die Images in die einzelnen Cells reinzeichnen. Hat den Vorteil dass du das Ganze auf kleinem Raum hinstellen kannst, und automatisch schon Scrollleisten dabei sind Smile
Im OnSelectCell zeichnest du dann einfach das entsprechende Bild im Grossformat Wink

Werden die Bilder 800x600 automatisch in 640x480 verleinet? In Timage ja

[alcaeus]

Zitat:

Zitat von Karstadt

Werden die Bilder 800x600 automatisch in 640x480 verleinet? In Timage ja

Nein, aber genau fuer solche Faelle gibts StretchBlt()

Greetz
alcaeus

[Karstadt]

Zitat:

Zitat von alcaeus

Zitat:

Zitat von Karstadt

Werden die Bilder 800x600 automatisch in 640x480 verleinet? In Timage ja

Nein, aber genau fuer solche Faelle gibts StretchBlt()

Greetz
alcaeus

wie meist du das? wo kann ich diese Eigenschaft aktivieren?

[Karstadt]

bzw. kannst du mir zeigen wie ich ein Bild in DrawGrib reinbekommen

Delphi-Quellcode:

  with DrawGrib do
  begin
    //Pro Feld 
    Loadfromfile('C:\Bild.jpg'); ? :)
  end;

[uligerhardt]

Such doch mal auf Torry nach Thumbnail. Das Demo zu TThumbnailList schaut doch z.B. ganz gut aus.

Uli.

[Alter Mann]

Hallo,

bei Jedi ist eine Thumbnail bei(jvImages, Animators).

Oder selber schreiben, ist nicht so schwer: Zur Darstellung eine Kompo von TScrollBox ableiten und für Thumbnails nimmst Du
TCustomControl als Vorfahr.

Gruss

Alter Mann

[Karstadt]

Zitat:

Such doch mal auf Torry nach Thumbnail. Das Demo zu TThumbnailList schaut doch z.B. ganz gut aus.

Uli.

hast du das ausprobiert? Ich, ja.. das ist viel zu langsam! 10 Bilder (jedes Bild 1 MB dauer 1 Minute)

:(

[Karstadt]

eins steht fest. Ich muss die Bilder verkleinen (temporär speichern) und dann anzeigen, sonst dauert es viel zu lange. Wie macht das windows? Die Bilder in Miniaturansicht befinden sich irgendow in temp ordner in verkleineten zustand...oder hat JPG zwei bilder gros und klein?

[Sharky]

Zitat:

Zitat von Karstadt

... Wie macht das windows? ...

Windows legt für die Miniaturansicht in dem Verzeichniss mit den Bildern die Datei Thumbs.db an und speichert dort die Minibilder. Sobald sie einmal darin sind werden sie bei nächsten mal nicht neu erzeugt sondern aus der Datei geladen.

[Karstadt]

richtig :) jetzt kann ich mich daran erinner :) Es gibt eine Funktion, das das abspeichern von Miniaturbilder verhindert. Nun, ja die Bilder werde also zwischen gespeichert

[uligerhardt]

Zitat:

Zitat von Karstadt

hast du das ausprobiert?

Allerdings.

Zitat:

Zitat von Karstadt

Ich, ja.. das ist viel zu langsam! 10 Bilder (jedes Bild 1 MB dauer 1 Minute)

:(

Das ist schade.

[Karstadt]

Funktioniert das bei dir schneller?

[Mavarik]

Zitat:

Zitat von Karstadt

Funktioniert das bei dir schneller?

1000 Bilder (BMP) Auflösung zwischen 800x600 und 1280x1024
umrechnen in Thumbs und speichern...

8 Sekunden...

Oder habe ich da etwas falsch verstanden?

Frank :coder: