hallo,
hier der code
[/delphi]
procedure TForm1.AddBtn1Click(Sender: TObject);
var
I: integer;
begin
{ setup a simple playlist so we can demonstrate how to
handle it }
if OpenDialog3.Execute then
for i:=0 to opendialog3.Files.Count -1 do
begin
JvPlaylist1.AddItem(Extractfilename(opendialog3.Fi les.Strings [i]),nil );
end;
end;
wenn ich JvPlaylist1.AddItem(Extractfilename(opendialog3.Fi les.Strings [i]),nil ); weg lasse geht er aber den nur mit pfad anzeige.
gruss
