Array , Löschen von selben verhindern.

[EWeiss]

Wieder mein leidiges Array und pointer problem.

Delphi-Quellcode:

Type  
  PWinampVisInfo = ^TWinampVisInfo;
  TWinampVisInfo = Packed record
    Title:          PChar;
    FileName:       PChar;
    PlaylistLength: integer;
    PlaylistPos:    integer;
    Pos, Len:       QWORD;
    VisHeader:      PWinampVisHeader;
    VisModule:      PWinampVisModule;
    Init, Init2, Rendering: boolean;
    DllInstance:    THandle;
    WinHandle:      THandle;
    PluginId:       DWORD;
    ParentHandle:   DWORD;
    Vis_Atom_Emu:   ATOM;
    Vis_Window_Emu: HWND;
    VisInfoCount:   Integer;
  end;

Var
  VisInfo: array [1..5] of PWinampVisInfo;

Beim erstellen des neuen Threads
    ThreadHandle := BeginThread(nil, 0, @WinampVisWin, VisInfo[VisWinCounter], 0, ThreadId); Bleibt die Anwendung in der Function
function WinampVisWin(VisInfo : array of PWinampVisInfo): HWND; beim ersten begin stehen und gibt ein AV aus.
Was ist in der Functionszeile verkehrt?

gruß

[EWeiss]

Hat sich erst mal erledigt!

function WinampVisWin: HWND; gruß

[EWeiss]

PUSH..

Array wird überschrieben bzw.. gelöscht.

Delphi-Quellcode:

  try
    GetMem(VisInfo[VisCounter], SizeOf(TWinampVisInfo));
    ZeroMemory(VisInfo[VisCounter], SizeOf(TWinampVisInfo));
  except
    BassFuncs^.SetError(BASS_ERROR_MEM);
    Exit;
  end;

Solange wie nur ein Plugin gestartet wird läuft alles rund
wenn zwei laufen bekomme ich beim beenden immer einen AV.

Habe es mit ReAllocMem versucht aber irgendwie wird das 1 Plugin mit dem zweiten überschrieben
Bedeutet habe nun zwei index einträge mit den gleichen Plugineigenschaften.

Hmmm ... Ka warum.

gruß

[Sunlight7]

Pushen ist erst nach 24 stunden erlaubt

Edit: Ich meine da einen Fehler mit den PChar Pointern zu sehen, aber da ich mir nicht sicher bin,
bzw. die Lösung nicht weiß, sag ich lieber nix, es könnte nicht stimmten...

[EWeiss]

Zitat:

Ich meine da einen Fehler mit den PChar Pointern zu sehen

Hmmm im grunde läuft alles so weit was die pointer angeht
Denke das problem liegt daran das ich das array nicht redimensioniere (ReAllocMem)

Weis nicht wo oder wie ich da am besten ansetzen soll.
Meine Versuche gingen komplett daneben.

Alles funktioniert solange kein zweites plugin zur gleichen zeit aufgerufen wurde.

gruß

[Sunlight7]

Ich sagte ja, ich bin mir nicht sicher
Und es stimmt nicht

Ich hab das Problem nachgestellt, aber mir ist es nicht gelungen, das das ganze Array gelöscht wurde.

[EWeiss]

Zitat von Sunlight7:

Ich sagte ja, ich bin mir nicht sicher
Und es stimmt nicht

Ich hab das Problem nachgestellt, aber mir ist es nicht gelungen, das das ganze Array gelöscht wurde.

Nein es löscht nicht!
Es wird überschrieben ..

Quasi befindet sich dann das zweite Plugin in beiden Arrays..
Deshalb bekomme ich dann beim beenden den AV.

Schau die pics der reihe nach dann weißt du was ich meine.

gruß

[Sunlight7]

Äh ja, das meinte ich eigentlich mit "gelöscht".

Bist Du Dir sicher, das der VisCounter richtig gesteuert wird bzw. das es an der Programmstelle hakt?
Sonst fällt mir leider nix mehr dazu ein

[EWeiss]

Zitat von Sunlight7:

Äh ja, das meinte ich eigentlich mit "gelöscht".

Bist Du Dir sicher, das der VisCounter richtig gesteuert wird bzw. das es an der Programmstelle hakt?
Sonst fällt mir leider nix mehr dazu ein

Jo werden richtig übergeben.
Na ok Danke.

Dann weiss ich auch nicht weiter

gruß

[SirThornberry]

Das erste was mir auffiel ist das du ein dynamsiches Array übergibst was aber delphispezifisch ist. Ich kann mir nicht vorstellen das Winamp ein Delphiarray erwartet.