Probleme mit Bass_Vis

[BassFan]

Zitat:

Zitat von Daniel G

Zitat:

Zitat von BassFan

Sorry im moment habe ich keinen Webspace um ihn zum Download freizugeben :cry:

Hm, schade. Dieses Trayplugin hat's mir vom sehen her angetan. Im Moment nutze ich den Max Tray Player... Is' nur 'ne Evaluationsversion, deswegen...

Jo.
Habe das Design davon abgeschaut!
Allerdings ohne Player im tray.

Ansonsten fast die gleichen Funktionen wie beim Max TrayPlayer :wink:
Aber in VB geschrieben wird dir also nichts nutzen :(

auf den Bildern sind 3 gen_Plugins am laufen .. Mixer,tray,AlbumBrowser

Gruß

[BassFan]

Habe das Projekt nochmal analysiert!
Was definitiv fehlt.

WinampIPC die const:

#define IPC_GETINIFILE 334 // returns a pointer to winamp.ini
#define IPC_GETINIDIRECTORY 335 // returns a pointer to the directory to put config files in (if you dont want to use winamp.ini)


Übersetzt:

Delphi-Quellcode:

  IPC_GETINIFILE = 334;
IPC_GETINIDIRECTORY = 335;

Mein Problem nun das übersetzen des C++ Schnipsel.

Code:

case IPC_GETINIFILE:
         {
            static char szWinampInipath[ MAX_PATH ] = "";
            if( *szWinampInipath == '\0' )
            {
               GetModuleFileNameA( NULL, szWinampInipath, MAX_PATH - 1 );
               char * szWalk = szWinampInipath + strlen( szWinampInipath ) - 1;
               while( ( szWalk > szWinampInipath ) && ( *szWalk != '.' ) ) szWalk--;
               szWalk++;
               strcpy( szWalk, "ini" );
            }
            return ( LRESULT )szWinampInipath;
         }

case IPC_GETINIDIRECTORY:
         {
            // TODO: trailing slash or not???
            static char szPluginInipath[ MAX_PATH ] = "";
            if( *szPluginInipath == '\0' )
            {
               GetModuleFileNameA( NULL, szPluginInipath, MAX_PATH - 1 );
               char * szWalk = szPluginInipath + strlen( szPluginInipath ) - 1;
               while( ( szWalk > szPluginInipath ) && ( *szWalk != '\\' ) ) szWalk--;
               szWalk++;
               strcpy( szWalk, TEXT( "Plugins" ) );
            }
            return ( LRESULT )szPluginInipath;
         }

Würde mich freuen wenn es jemand übersetzen könnte.
Dann komme ich hoffentlich etwas weiter

Grüße

[BassFan]

Seltsames Forum ?

[Daniel G]

Zitat:

Zitat von BassFan

Seltsames Forum ?

Zwischen diesem und deinem letzten Post sind grad mal 4 Stunden... Jetzt bleib mal läscher locker, mensch.... :roll:

[BassFan]

Zitat:

Zitat von Daniel G

Zitat:

Zitat von BassFan

Seltsames Forum ?

Zwischen diesem und deinem letzten Post sind grad mal 4 Stunden... Jetzt bleib mal läscher locker, mensch.... :roll:

Jo :-D
Jetzt sind aber 24 Stunden um :lol:

grüße

EDIT: Aber macht nichts weiter :wink:

[BassFan]

Ok ich habs gebacken !!

Auch fast ohne fremde Hilfe... Obwohl ich mit Delphi noch nicht viel am Hut hatte!
Hatte meinen Account zwar schon gelöscht aber das wollte ich doch nochmal zeigen wie es jetzt läuft.

Grüße

[turboPASCAL]

Zitat:

Zitat von BassFan

Ok ich habs gebacken !!

Ist ja toll, könntest du verraten wie ?

[BassFan]

Breakpoints setzen beobachten und guter Auffassungsgabe :wink:
Wie es läuft kannst hier testen!

BassVis
werde mich nun um die 5.0 kompatibilität kümmern.

Eine frage noch.
Ich habe ja das Dummy Winamp Window als Parent Window auf meinen Player gesetzt
Ist es möglich hier die IPC IsPlaying function einzubinden und abzufragen
wie der Status ist?

Das prob dabei ist auch die Plugins müssen den Status lesen (erkennen) können.
Wie kann man das am besten realisieren.
Vorallem es so einzubinden das auch andere Anwendungen ohne viel auufhebens
ähnlich wie bei Winamp es benutzen können.?

grüße

[MagicAndre1981]

kannst du das vllt hier posten, nicht jeder ist in dem FOrum dort angemeldet ;)

Btw, warum hast du deinen Account gelöscht und dann wieder regiestriert?

[BassFan]

Zitat:

Zitat von MagicAndre1981

kannst du das vllt hier posten, nicht jeder ist in dem FOrum dort angemeldet ;)

Btw, warum hast du deinen Account gelöscht und dann wieder regiestriert?

Bin davon ausgegangen das sich jemand für das Projekt interessiert.
Und mir hilft es zu realisieren deshalb habe ich mich hier angemeldet in der
Hoffnung das ein Forum (User) bereit sind zu helfen.

Aber leider wie bestimmt schon selbst erkannt kam da nichts. :(
Ist ja niemand zu verpflichtet aber das gar nichts kommt? Hmmmm
Das ist doch ein Forum für Delphi Programmierer ...

Grüße