Kamerafahrt über ein Bild realisieren

[flipdascript]

Hallo Popov!

Das kommt dem was ich mir vorgestellt habe sehr nahe. Danke!

Muß heut abend mal schauen was Du da groß anders machst. Habe das grad nur kurz kompiliert und ausprobiert.

[Garfield]

Du meinst Pan & Scan?

Wenn es nicht alles in Delphi sein muss kann man auch Avisynth zu Hilfe nehmen. Da kann man zum Beispiel Slideshows erstellen.

[Popov]

@flipdascript

Das "Problem" ist, dass der Timer das Problem ist. Dass eine Prozeduren in 1/1000 Sekunde aufgerufen werden können, ist eher ein urbaner Mythos. Erfahrungsgemäß (ob gefühlt oder tatsächlich) sind es eher 10/1000, womit das Bild pro Sekunde nur um die 100 Pixel verschoben werden kann.

--Schnipp--

Um mein Gefühl zu überprüfen habe ich gerade einen Counter geprogt. Wenn ich da keinen Gedankenfehler habe, dann zählt der Timer wie oft er in der Sekunde aufgerufen wird (benötigt wird ein Timer und ListBox):

Delphi-Quellcode:

uses
  DateUtils;

var
  S1, S2, T: Word;

procedure TForm1.Timer1Timer(Sender: TObject);
begin
  S1 := SecondOfTheHour(Now);
  if S1 <> S2 then
  begin
    ListBox1.Items.Add(IntToStr(T));
    T := 0;
  end;
  Inc(T);
  S2 := S1;
end;

procedure TForm1.FormCreate(Sender: TObject);
begin
  Timer1.Interval := 1;
end;

Bei mir sind es 64 mal (ist ja auch ein alter Rechner).

Die "Lösung": pro Takt nicht ein Pixel verschieben, sondern mehrere Pixel.

[pelzig]

(Application.)OnIdle wird völlig überschätzt :thumb:

Deshalb sollte es hier auch nicht erwähnt werden!

MfG

[Garfield]

Zitat:

Zitat von Popov (Beitrag 1285195)

Dass eine Prozeduren in 1/1000 Sekunde aufgerufen werden können, ist eher ein urbaner Mythos. Erfahrungsgemäß (ob gefühlt oder tatsächlich) sind es eher 10/1000, womit das Bild pro Sekunde nur um die 100 Pixel verschoben werden kann.

Was willst Du mit 1000 Bildern je Sekunde? Schafft das Dein Bildschirm überhaupt?

Soweit ich das sehe wird SDTV mit 25 und HDTV mit 50 Bilder je Sekunde ausgestrahlt. Ein guter analoger Videorecorder hat ebenfalls 50 Bilder je Sekunde. Normal sollten 50 bis 60 Bilder je Sekunde vollkommen ausreichen.

[Popov]

Mein Fernseher läuft mit 400Hz, das mag mein Kanarienvogel. Der guckt schneller als ich ;)

Zum Thema...

Ich denke 1000 Bilder pro Sekunde sind nicht das Begehren des TE, sondern eher 1000 Schritte in der Sekunde, so dass ein Bild zur Not 1000 Pixel pro Sekunde gescrollt werden kann. Das kann man aber auch anders erreichen - einfach paar Pixel überspringen.

[Garfield]

Schön, dass Dein Fernseher 400 Hz hat. Meiner hat nur 100 Hz und zeigt damit nicht weniger Bilder in der Sekunde an als Deiner. 8-)

Wozu 1000 Schritte tun, wenn nur jeder 20. wahrgenommen wird? Dann reichen 50. Also nicht 1000 * 1 sondern dann 50 * 20.

[Sir Rufo]

Wer glaubt bei 400Hz auch 400 Bilder/s zu bekommen, der liest sich einmal dieses hier durch
http://www.hifi-forum.de/viewthread-133-7149.html

Es geht dabei nicht ums schlecht reden oder machen, sondern nur um die Klarstellung, was es mit diesen 100/200/400Hz auf sich hat.

[cbspeda]

Hi schau dir mal diese Komponente an:

http://www.imageen.com/info/index.html

lg Peter

[flipdascript]

Zitat:

Zitat von Garfield (Beitrag 1285159)

Du meinst Pan & Scan?

So ähnlich ja. Die Bewegung soll halt nur automatisch geschehen und es soll auch möglich sein zu zoomen.

Zitat:

Zitat von Garfield (Beitrag 1285159)

Wenn es nicht alles in Delphi sein muss kann man auch Avisynth zu Hilfe nehmen. Da kann man zum Beispiel Slideshows erstellen.

Ich würde das lieber in Delphi umsetzen. Wäre aber evtl. als Prästentationsworkaround denkbar ;P

Zitat:

Zitat von Popov (Beitrag 1285195)

@flipdascript
Das "Problem" ist, dass der Timer das Problem ist. Dass eine Prozeduren in 1/1000 Sekunde aufgerufen werden können, ist eher ein urbaner Mythos. Erfahrungsgemäß (ob gefühlt oder tatsächlich) sind es eher 10/1000, womit das Bild pro Sekunde nur um die 100 Pixel verschoben werden kann.

--Schnipp--

Die "Lösung": pro Takt nicht ein Pixel verschieben, sondern mehrere Pixel.

Das hakt leider ab und an, egal ob ich nur um einen, oder gleich um mehrere, Pixel verschiebe.

Zitat:

Zitat von Popov (Beitrag 1285212)

Ich denke 1000 Bilder pro Sekunde sind nicht das Begehren des TE, sondern eher 1000 Schritte in der Sekunde, so dass ein Bild zur Not 1000 Pixel pro Sekunde gescrollt werden kann. Das kann man aber auch anders erreichen - einfach paar Pixel überspringen.

Mein primäres Ziel ist es, dass die Bewegung flüssig dargestellt wird. Ich brauche keine 1000 Bilder die Sekunde. Die Windows 8 Locksceen Slideshow kommt dem was ich gern hätte noch am nähsten.

Hier ein Video in dem man sich das anschauen kann:
https://www.youtube.com/watch?v=lHoPCy1an8w

Zitat:

Zitat von cbspeda (Beitrag 1285342)

Hi schau dir mal diese Komponente an:

http://www.imageen.com/info/index.html

lg Peter

Werd ich machen. Danke für den Tip!