DiaSchau Editor das DiaShow Program Update 18.05.05

[TeTSuO]

DiaSchau Editor

Mit diesem Program könnt ihr ein Dia-Projekt mit den Bildern (Unterstützte Formate : BMP, JPG, GIF (auch animierte), PNG, TIF, TGA, PCX) aus einem Ordner erstellen.
Diese Projekte sollen irgendwann mal wie "Multi Mediale Fotoalben" funktionieren.

Beim Start könnt Ihr ein neues Projekt erstellen oder ein gespeichertes öffnen

Im Hauptfenster seht ihr im TreeView euren aktuellen Albuminhalt dort könnt ihr

• das Album verändern (über das Menü "Bild", die Toolbar oder mit der Rechten Maustaste Popupmenü)
• normale Einstellungen zu den Bildern vornehmen wie Untertiteltext, Anzeigedauer bei Wiedergabe, Sound der abgespielt werden soll
• Projekte erstellen, öffnen und speichern
• Album als DiaSchau abspielen (über Button "Vorschau")

Die erweiterten Einstellungen für das Bild und zusätzliche Objekte wie

• beliebig viele, frei veränderbare, Text- und Bildfenster
• wählbares Datum (Create, Modify, EXIF) des Bildes im wählbarem Format
• Copyrighteinblendung mit wählbarem Text und Schrift

könnt ihr über den Editor (mit Dopppelklick auf Eintrag) erreichen

Während der Wiedergabe kann man mit der Taste "H" oder "F1" die Hilfe aufrufen die weitere Möglichkeiten beschreibt

Das Program erstellt eine INI-Datei für die Programmeinstellungen im selben Verzeichnis ie die EXE
Registrierungseinträge werden nur nach wunsch unter Einstellungen->Optionen erstellt und auch wieder restlos entfent.

Ich habe das Program unter XP geschieben und getestet.
Von einem Freund weiß ich das es unter 98/ME nich so toll aussieht :kotz: aber funktioniert. :wink:

Da das Program noch in der Betaphase ist und ich nicht genügend Leute kenne die es Testen wollen :cry: , stelle ich es hier zur Verfügung und hoffe das es euch nichts ausmacht meine Betatester zu sein. :pale:

Da ich das Program ständig weiterentwickle, hoffe ich das Ihr mir ein paar Anregungen geben könnt.

Für Fragen, Anregungen oder gefundene Fehler sendet einfach ne Nachricht

Viel spaß beim Testen

[toms]

Hallo!

Hast ein nettes Programm programmiert!

Anmerkungen:

• Waehrend der Diashow sollte man die Moeglichkeit haben, per Mausklick das naechste Slide anzuzeigen.
• Slide Vor & Zuerueck Funktionen waeren auch noch nuetzlich.
• Option, dass der Dateiname auf dem Slide angezeigt wird

[TeTSuO]

Zitat:

Zitat von toms

Hallo!

Hast ein nettes Programm programmiert!

Anmerkungen:

• Waehrend der Diashow sollte man die Moeglichkeit haben, per Mausklick das naechste Slide anzuzeigen.
• Slide Vor & Zuerueck Funktionen waeren auch noch nuetzlich.
• Option, dass der Dateiname auf dem Slide angezeigt wird

drücke mal währen der Darstellung "h" oder "F1" das öffnet die Hilfe
da klappt dann alles auch Bildinfos mit "i"

[EDIT]
Das mit der Maustaste ist neu und funktioniert jetzt auch
Download im 1 Beitrag
[/EDIT]

[toms]

Noch eine Frage: Wird das nächst folgende Bild in der DiaShow gecacht, also vorgeladen für eine schnelle Anzeige?

[TeTSuO]

Zitat:

Zitat von toms

Noch eine Frage: Wird das nächst folgende Bild in der DiaShow gecacht, also vorgeladen für eine schnelle Anzeige?

Nein ich mach das so
ich stoppe den timer lade alles und starte den timer damit die anzeigedauer ziemlich stimmt.

[TeTSuO]

Hilfe!

Ich habe ein Problem festgestellt das ich nicht lösen kann :(
Ich will OnMouseDown für die ganze Form abfangen aber es klappt nicht.

Wenn ich während des Abspielens auf eine Bild-Box (TPanel mit TImage) klicke kommt die Meldung nicht an.

Wie kann ich die Maus-Events für die ganze Form abfangen egal worauf ich klicke

Ich mache das zurzeit so

Delphi-Quellcode:

Procedure TForm1.WndProc(var Msg: TMessage);
Begin
 // wenn Message = Linke Maustate gedrückt
 if Msg.Msg = WM_LBUTTONDOWN Then
    // Timer Event auslösen um nächsten Bild zu laden
    tmrDelay.OnTimer(fPlay);
 // Messages weiter verabeiten
 inherited;
End;

[Keiko]

Ich finde das Programm wirklich toll.
Am betsen finde ich die Funktion mit dem Ton im Hintergund.
Eine Frage habe ich allerdings zu dem ganzen noch:
Ist es irgendwie möglich für das ganze noch eine Brennfunktion zu machen? Also entweder direkt auf eine CD oder halt als Video Datei um sie dann auch auf einem DVD-Player anschauen zu können?

[fkerber]

Hi!

Zitat:

Zitat von TeTSuO

Wie kann ich die Maus-Events für die ganze Form abfangen egal worauf ich klicke

Bin nicht sicher, ob es geht, aber stell mal KeyPreview von Form1 auf True - vielleicht betrifft das auch die Maus.


Ciao Frederic

[TeTSuO]

Zitat:

Zitat von fkerber

Bin nicht sicher, ob es geht, aber stell mal KeyPreview von Form1 auf True - vielleicht betrifft das auch die Maus.

Das mit dem KeyPreview hat nur was mit der Tastatur zu tun.
Ich habe das schon gelöst :)
man muss es abfragen in der WndProc und zwar mache ich das so

Delphi-Quellcode:

Procedure TfPlay.WndProc(var Msg: TMessage);
Begin
 // Message filtern
 if (Msg.Msg = WM_LBUTTONDOWN) or // für Maustaste auf der Form 
    (Msg.WParam = WM_LBUTTONDOWN) then // für andere WinControls auf der Form
    // wenn Maustaste gedrückt dann nächstes Bild
    tmrDelay.OnTimer(fPlay);
 // Messages weiter verarbeiten
 inherited WndProc(Msg);
End;

und es funktioniert einwandfrei :-D

Zitat:

Zitat von Keiko

Ist es irgendwie möglich für das ganze noch eine Brennfunktion zu machen? Also entweder direkt auf eine CD oder halt als Video Datei um sie dann auch auf einem DVD-Player anschauen zu können?

Gibt es für VCD eine Freeware-komponente? wenn es so etwas gäbe wäre das echt cool :???: Das mit dem Brennen von CD's würde ich dann auch einbinden