Forum: Sonstige Fragen zu Delphi
Delphi
by easteregg,
3. Apr 2007
hier nochmal die überarbeitete (wenn auch bestimmt nicht eleganteste lösung - aber besser kann ichs nicht ;) )
function ItunesSong(): string;
var
iTunesApp: OLEVariant;
begin
result := 'iTunes closed';
if FindWindow('iTunes', nil) <> 0 then
begin
try //Itunes rennt?
Forum: Sonstige Fragen zu Delphi
Delphi
by easteregg,
3. Apr 2007
danke für den tipp! da schau ich gleich mal nach :)
edit: das programm is ja genial! danke dafür!!!
Forum: Sonstige Fragen zu Delphi
Delphi
by easteregg,
3. Apr 2007
herzlichen dank :)
für alle die das auch mal schnell brauchen :)
function ItunesSong(): string;
var
iTunesApp: OLEVariant;
begin
// iTunes Objekt erzeugen
iTunesApp := CreateOleObject('iTunes.Application');
if not VarIsNull(iTunesApp) then
Forum: Sonstige Fragen zu Delphi
Delphi
by easteregg,
3. Apr 2007
heyho,
Ich such für mein Projekt die Möglichkeit den aktuellen ITunes Song auszulesen!
Auf der Suche nach einer Möglichkeit bin ich auf den Thread hier gestoßen: http://www.delphipraxis.net/internal_redirect.php?t=61708&highlight=itunes
allerdings ist der thread a) schon etwas älter und b) bringt mich zu einer ganz anderen frage.
Nämlich woher bekomm ich die nötigen .pas Files die da...