Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Sonstige Fragen zu Delphi (https://www.delphipraxis.net/19-sonstige-fragen-zu-delphi/)
-   -   Delphi Fehler bei Größenänderung eines zurückgegebenen Arrays (https://www.delphipraxis.net/17196-fehler-bei-groessenaenderung-eines-zurueckgegebenen-arrays.html)

empanyc 29. Feb 2004 21:43


Fehler bei Größenänderung eines zurückgegebenen Arrays
 
Hi,

ich lasse mir von einer DLL ein dynamisches Array aus Records zurückgeben.
Wenn ich nun folgenden Code ausführe kommt ein Zugriffsfehler:

Delphi-Quellcode:
function fkt_in_hauptrogramm(abc:tarr_of_record):tarr_of_record;
var buf : tarr_of_record;
    i : integer;
begin
 buf := fkt_in_dll(abc);
 i := length(buf);
 setlength(buf, i); <-- zugriffsverletzung
 send_status_to_contacts := buf;
end;
Ich brauche diese neue Größenänderung ja, um das Array im Hauptprogramm
von dem in der DLL unabhängig zu machen.

Vielen Dank!
Mario

choose 2. Mär 2004 06:00

Re: Fehler bei Größenänderung eines zurückgegebenen Arrays
 
Hallo empanyc,

wenn Du Delphi-Strings oder Delphis dynamische Arrays über dein Binary hinaus auch im Zusammenhang mit anderen DLLs verwenden möchtest, also dort ihre Größe änderst, sie dort erstellst und wieder zurückgeben möchtest, etc. solltest Du den Hinweis, der bei der Erzeugung von DLLs in den Source der Projektdatei der DLL geschrieben wird, beherzigen (Stichwort: Sharemem).
Leider kann ich Dir von hier aus weder ein Zitat des Kommentars noch etwas aus der OH posten.

HTH

empanyc 2. Mär 2004 14:31

Re: Fehler bei Größenänderung eines zurückgegebenen Arrays
 
Ich achte schon darauf, dass das Array keine Strings enthält.
Die Variable "buf" in meinem Bsp ist ja praktisch auch nur ein
Zeiger auf das eigentlich Array. Daher wird ja praktisch nur
ein Pointer zurückgegeben und das dürfte ja dem delphischen
Speichermanagement nicht in die Quere kommen.
Das Problem ist ja nicht die Übergabe. "buf" ist ja nach der
Zuweisung durch die Fkt korrekt belegt. Nur ich kann die
Größe des Arrays nicht verändern.

Der Fehler ist inzwischen nicht mehr akut, da ich ihn durch
eine Codeänderung umgehe, aber es würde mich doch interessieren,
warum es nicht funktioniert...

Danke!
Mario


Alle Zeitangaben in WEZ +1. Es ist jetzt 09:11 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz