Delphi Can

Orjinalini görmek için tıklayınız: klasörde bulunan dosyaları slide şeklinde oynatma
Şu anda (Arşiv) modunu görüntülemektesiniz. Orjinal Sürümü Görüntüle internal link
herkese merhabalar  , Klaösrde bulunan dosyaları slide şekilinde oynatmak istiyorum. 

Tms firmasında şöyle bir bileşen var ama aşırı işlemci kullanımı oluyor , 
Linkleri Görebilmeniz İçin Üye Olmanız Gerekiyor. Üye Olabilmek İçin Lütfen Buraya Tıklayınız.

bilgisayarı yormayak daha sade bir şekilde yapılabilir mi? acaba..
klasör listesindeki jpg leri bir listbox a atın..
1 timer ekleyin. ve timerin ontimer olayına her seferinde listbox daki itemindex değeri artacak şekilde bir döngü yapıp, sıradaki dosyayı image nesnesine basın..
Merhaba.

- Slayt derken resimden resme geçişi anlık mı yoksa fadeIn-fadeout (alphablend) şeklinde mi göstermek istiyoruz ?

- Windows'un AlphaBlend fonksiyonu bir inceleyin derim. Ben resim geçişlerim yumuşak olsun istediğimde sürekli bunu kullanırım.  Idea

- Aşağıdaki gibi yani. ( GifAnimator resimleri bozyor kanmayın ona Smile   )

xscgjsqzemsiymfovpip.gif
Mrmarn üstadımın ki benimkinden daha güzel çalışmış Smile))  Ben bir adet timer ekleyip aşağıdaki şekilde denemiştim. 

procedure TForm1.Timer_Resim_DegisTimer(Sender: TObject);
var
ImgIdx:integer;
imgPath:string;
begin
inc(ImgIdx);
if (imgIdx <= 100) AND (FileExists(imgPath + intToStr(imgIdx) + '.jpg')) then
Image2.Picture.LoadFromFile(imgPath + intToStr(imgIdx) + '.jpg')
else
begin
imgIdx:= 1;
Image2.Picture.LoadFromFile(imgPath + intToStr(imgIdx) + '.jpg')
end;
end;
Öncelikle herkese çok teşekkür ediyorum ilgi ve alakasından dolayı.

Kullanılacak bilgisayarlar biraz eski ve ikinci ekranda program yanında çalışacağı için mümkün olan en az ram ve işlemci ile çalışması gerekiyor. Birkaç örnek denemiştim aslında güzelde çalışıyor fakat genelde işlemci kullanımı ve ram kullanımı çalıştığı bilgisayarları yoracak şekilde olduğu için farklı bir yöntem denemek istedim burdaki önerileri de deneyip en az işlemci ve ram kullanımı olan hangi yönten ise onu kullanmak sanırım mantıklı olacak.

Tekrar teşekkürler.