Thema: Delphi ID3 No.2059573 ...

Einzelnen Beitrag anzeigen

marabu

Registriert seit: 6. Apr 2005
10.109 Beiträge
 
#6

Re: ID3 No.2059573 ...

  Alt 27. Jul 2007, 17:47
Hallo,

natürlich geht es auch mit den Jedis:

Delphi-Quellcode:
procedure TDemoForm.Button2Click(Sender: TObject);
begin
  with TagV2 do
  begin
    Open;
    EnsureExists([fiTrackNum, fiAlbum, fiBand, fiTitle]);

    Texts.TrackNum := formatFloat('000', 1);
    Texts.Album := 'the album';
    Texts.Band := 'the interpret';
    Texts.Title := 'the title';

    Commit;
    Close
  end;
end;
Freundliche Grüße
  Mit Zitat antworten Zitat