Array of Integer und crash

[EWeiss]

Zitat von haentschman:

Zitat:

Wie meinst das?

damit wärst du schon fertig ohne die Pointer Problematik und Arrays als Parameter.

Ich habe kein Problem mit dem Pointern nur mit dem Array.

Delphi-Quellcode:

procedure GetGifFrameDelays(InGifImage: Cardinal; InFrameCount: UINT;
  var OutFrameDelay: TOutFrameDelay);

Delphi-Quellcode:

procedure LoadGif;
var
  FrameCount: UINT;
  FrameDelay: TOutFrameDelay;
begin

  FrameCount := 0;

  if GetGifFrameCount(gp.GifImage, @GuidFDT, FrameCount) = S_OK then
    If (FrameCount - 1) = 0 then
    begin
      SetLength(FrameDelay, 0);
    end else
    begin
      GetGifFrameDelays(gp.GifImage, FrameCount, FrameDelay);
    end;
end;

Jetzt brat mir einer nen Storch warum geht das nicht.

grrrr... LOL

gruss