Hi
Ein seltsames verhalten zeigt sich wenn ich das Plugin Visual Ball (und andere) ausführen will.
Aus VB heraus gibt es keine Probleme Visual Ball für Sonique wird ordnungsgemäß ausgeführt mit der BassVis.dll
Starte ich das gleiche plugin auf die gleiche weise wie in VB
unter Delphi dann gibt es mir immer einen Fehler aus
Zitat:
floating point division durch null
Mit allen Sprachen C#, VB_NET, VB, MSVC funktioniert das Plugin nur unter Delphi nicht.
Die ausführung ist in allen Anwendungen gleich da sie über die BassVis gehen müssen.
VB
Delphi-Quellcode:
Public Declare Function BASS_SONIQUEVIS_CreateVis Lib "bass_vis.dll" ( _
ByVal f As Any, _
ByVal visconfig As Any, _
ByVal flags As Long, _
ByVal w As Long, _
ByVal h As Long _
) As Long
VisChan = BASS_SONIQUEVIS_CreateVis(lstPathList.List(lstPlugins.ListIndex), sdir & "\vis.ini", 0, Picture1(0).ScaleWidth, Picture1(0).ScaleHeight)
Delphi
Delphi-Quellcode:
function BASS_SONIQUEVIS_CreateVis(f, visconfig:PChar; flags, w, h: DWORD):HVIS; stdcall; external 'bass_vis.dll';
vischan := BASS_SONIQUEVIS_CreateVis(PChar(vislist[ListBox1.ItemIndex]), PChar(PluginDir + '\vis.ini'), 0, Panel2.Width, Panel2.Height);
Irgend jemand eine Idee woran das liegen könnte ?
Nur Anwendungen in Delphi verursachen dieses Problem.
gruss Emil