AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Thema durchsuchen
Ansicht
Themen-Optionen

Array mit Records: Access violation

Ein Thema von OsCor · begonnen am 19. Mär 2021 · letzter Beitrag vom 20. Mär 2021
Antwort Antwort
Redeemer

Registriert seit: 19. Jan 2009
Ort: Kirchlinteln (LK Verden)
1.118 Beiträge
 
Delphi 2009 Professional
 
#1

AW: Array mit Records: Access violation

  Alt 20. Mär 2021, 00:09
packed array s verwenden? himitsu sagt mir bestimmt auch, ob das überhaupt einen Unterschied macht.
Oder nur einen ShortString bzw. String[33] und dann Eigenschaften benutzen? Keine Ahnung, ob das hilft.

Problem dürfte aber halt Größe der lokalen Variablen sein, daher:
Wär's nicht sinnvoller, den ganzen Variablenkram, vor allem das Record, in eine Klasse zu packen bzw. zu verwandeln?

Grüße
Dalai
Oder wenigstens globale Variablen. Ich werd aber gleich gesteinigt.

Sollte man die Daten nicht eher in Realzahlen wandeln? Die sind nur 4 Byte und man auch damit rechnen.
Real ist nicht 4 Byte groß sondern wahlweise 6 oder 8 (Standard).
Janni
2005 PE, 2009 PA, XE2 PA
  Mit Zitat antworten Zitat
Benutzerbild von Mavarik
Mavarik

Registriert seit: 9. Feb 2006
Ort: Stolberg (Rhld)
4.154 Beiträge
 
Delphi 10.3 Rio
 
#2

AW: Array mit Records: Access violation

  Alt 20. Mär 2021, 05:04
Also

Delphi-Quellcode:
Type MPunkt = record
     Z : String[16]; // Datum und Uhrzeit
     MT : String[5]; // Lufttemperatur
     MF : String[2]; // rel. Luftfeuchte
     MTP : String[5]; // Taupunkt
     MWI : String[5]; // Wärmeindex
Vielleicht besser:

Delphi-Quellcode:
Type
  PPunkt = ^MPunkt
  MPunkt = packed Record // 21 Byte;
             Z : TDateTime;
             MT : Int1632; // °C 8.32 * 10 = 832
             MF : String[2];
             MTP : Int32;
             MWI : String[5];
           end;
var
  MW : Array[1..20000] of PPunkt; // ~78kb
Oder

Delphi-Quellcode:
Type
  PPunkt = ^MPunkt
  MPunkt = packed Record // 25 Byte;
             Z : TDateTime;
             MT : Int1632; // °C 8.32 * 10 = 832
             MF : String[2];
             MTP : Int32;
             MWI : String[5];
             Next : PPunkt;
           end;
var
  Root : PPunkt; // 4 Byte Stack & ~488KB Heap
Mavarik
  Mit Zitat antworten Zitat
Antwort Antwort


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 13:41 Uhr.
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz