Self Contained Slideshow - Version 1.1

[DGL-luke]

Self Contained Slideshow - Version 1.1

Guten Morgen allerseits,

für diesen Beitrag: http://www.delphipraxis.net/internal...ct.php?t=80502

hab ich hier mal schnell was programmiert. Und da das meiner Meinung nach ganz schön geworden ist, stell ich das hier jetzt mal rein.

Was macht das?
Es zeigt zuvor hardcoded eingebettete Bilder an.

Wird die Exe da nicht ewig groß?
Ja, leider.

Und wie machst du das?
Mit der graphics32-lib: www.graphics32.org

Genauergesagt, ein TImage32 und eine TBitmap32List.

Fileheader/Changelog:

Code:

{*********************************************************
*  Simple Slide Show main unit v1.1
*
*  simple slide show to show possiblities of acquiring
*  image resources
*
*
*  © 2006 Lukas Erlacher aka DGL-luke aka luketheduke
*  released into Public Domain
*  Please keep my credits, i'd be glad to hear from
*  you if you can reuse my stuff and find it useful!
*  <[e-mail]>
*
**********************************************************
*  Version History:
*
*  v1.0 -
*    + loading bitmaps via TBitmap32List resources
*    + First, Previous, Next, Last navigation buttons
*
*  v1.1 -
*    + Direct Index Input via textbox
*    + Loading from Folders, hardcoded and user specified
*    + stretching and filtering
*    + GrahicEx for multiple image formats
*
*********************************************************}

Im Anhang ein Screenshot, der Source und die Exe.