Thema: Delphi Label => "Change"

Einzelnen Beitrag anzeigen

Namenloser

Registriert seit: 7. Jun 2006
Ort: Karlsruhe
3.724 Beiträge
 
FreePascal / Lazarus
 
#7

Re: Label => "Change"

  Alt 29. Jul 2007, 19:40
Delphi-Quellcode:
procedure TForm1.Timer4Timer(Sender: TObject);
begin
  // Caption geändert?
  if InterpretTitel1.Caption <> OldSongTitel then
    ListBox1.Items.Add(OldSongTitel);
  // Caption merken
  OldSongTitel := InterpretTitel1.Caption;
end;
  Mit Zitat antworten Zitat