StringList An Dll übergeben...

[Sir K]

Hallo,

Ich hab n Problem beim übergeben von StringListen an eine Dll.
Und zwar bekomme ich immer eine Zugriffsverletzung wenn ich auf die count eigenschafft zugreifen möchte... weis einer woran das liegt?

Hier mal ein einfaches Beispiel

Quelltext im Programm welches auf die dll zugreift:

Delphi-Quellcode:

var
  StringList1, StringList2: StringList;
  i: Integer;
begin
  StringList1:= TStringList.Create;
  StringList2:= TStringList.Create;

  for i:=0 to Memo1.Lines.Count - 1 do
    StringList1.Add(Memo1.Lines[i]);
  
  // CompareLists ist die function in der dll.
  if CompareLists(StringList1, StringList2) then
    ShowMessage('Die Listen Stimmen überein!');

Quelltext in der Dll:

Delphi-Quellcode:

function CompareLists(List1, List2: TStringList): Boolean; stdcall;
var
  i: Integer;
begin
  Result:=true;
  if List1.Count <> List2. Count then
    Result:=false
  else
   ...
end;