Blinkendes Bild!?

[marmin]

Wo ist mein Fehler? Kann mir jemand helfen?

Delphi-Quellcode:

// Cover zum jeweiligen Lied
procedure TForm1.Timer1Timer(Sender: TObject);
var
  Filename : string;
begin
  if Listbox3.ItemIndex >= 0 then
    begin
    Filename := Listbox3.Items.Strings[Listbox3.ItemIndex];
      if Fileexists(ExtractFilePath(Filename) + 'folder.jpg')then
        Label14.Caption := '';
        Image1.Picture.LoadFromFile(ExtractFilePath(Filename) + 'folder.jpg')
      else Label14.Caption := 'NO COVER AVAILABLE'
    end;
end;

Das else ist irgendwie falsch und in einer einfacheren Version "blinkte" das Bild ständig.

[Luckie]

Bitte wähle ein aussagekräftiges Topic für deinen Beitrag. Und es wäre bestimmt sehr hilfreich, wenn du uns sagst, was dein Code machen soll und was er stattdessen macht.

[marmin]

Also das mit dem else hab ich Depp jetzt auch selber rausbekommen, aber warum blinkt das angezeigte Bild dann ständig?
Es soll passend zum Lied, das gerade abgespielt wird, das Cover dargestellt werden. Der Timer ist auf 250 eingestellt.

[Matze]

Versuche mal DoubleBuffered auf true zu stellen, das könnte Abhilfe schaffen.

[scp]

Nach dem if, also wenn die Bedingung zutrifft, willst du ja zwei Zeilen Code ausführen. Deshalb musst du drumherum ein begin end einsetzen.

EDIT: nach dem end natürlich kein Semikolon.

[marmin]

Danke an euch alle schon mal! Aber wo genau setze ich DoubleBuffered auf true oder false?

[flomei]

Ich glaube es reicht wenn du das im OnCreate Event der Form aufrufst...

MfG Florian :hi:

[marmin]

Aber wie ganau mache ich das? Ich bin noch Anfänger und hab sowas noch nie gemacht :(

[Matze]

Ich kann auch nicht garantieren, ob's geht, aber wenn, dann geht das so:

Delphi-Quellcode:

DoubleBuffered := true

Aber Borland liefert mit Delphi eine sehr gute Hilfe mit, da steht das alles drin.

[Luckie]

Warum lädst du das Bild alle 250 Millisekunden neu? Lad es am Anfang vom Lied und fertig. Da freut sich auch Windows und die Festplatte, wenn nicht andauernd auf die Festplatte zugegriffen wird. Damit legst du ja praktisch alle anderen festplattenoperationen lahm.