DGL • Thema anzeigen - Zeigerfehler verursacht schwere Fehler

Zeigerfehler verursacht schwere Fehler

Moderator: DGL-Team

Seite 2 von 3

[ 42 Beiträge ]

Gehe zu Seite Vorherige 1, 2, 3 Nächste

Vorheriges Thema | Nächstes Thema

Autor

Nachricht

Speedmaster

Betreff des Beitrags:

Verfasst: Mi Sep 21, 2005 23:03

DGL Member

Registriert: Do Apr 08, 2004 16:55
Beiträge: 516

LarsMiddendorf hat geschrieben:

Nun gut.
Eine andere Sache, was ich mal früher ausprobiert hatte, war eine Art GC in Delphi. Und zwar kann man ja mittels RTTI zumindest die published Eigenschaften auslesen. Wenn man alle erstellen Objekte in einer Liste sammelt kann man dann von Zeit zur Zeit über den ganzen Graphen gehen und nachsehen welche Objekte noch erreichbar sind. Da man natürlich recht eingeschränkt Zugriff auf den Stack hat, hatte ich das so gemacht, dass einige zentrale Objekte dann als statisch registiert wurden und von denen aus dann der ganze erreichbare Objektgraph markiert wurde. Jedenfalls hat man dann zwar nicht die Geschwindigkeit von .Net, aber man ist sicher das nichts vergessen wurde.

Hmm, komisch, auf dieselbe idee kam ich letztens wo ich gezwungen wurde mit Delphi.Win32 zu programmieren!

_________________
Shareholder und Leitender Entwickler bei Pipedream-Games.

Zitat: Siehst du diesen Park da unten? Jeden Tag lernen sich darin Menschen kennen und verlassen einander. Und du hast dein ganzes Leben Zeit darin zu gehen.

Nach oben

Flash

Betreff des Beitrags:

Verfasst: Mi Sep 21, 2005 23:43

Guitar Hero

Registriert: Do Sep 25, 2003 15:56
Beiträge: 7810
Wohnort: Sachsen - ERZ / C
Programmiersprache: Java (, Pascal)

Die Idee gefällt mir gar nicht... Da verkürzt sich meine Lebenszeit rapide, wenn ich sowas in den PBallManager einbauen soll.

@LossyX: Dein TglBitmap2D.FlipVert() hat laut MemLeak ein Speicherleck durch AllocMem.

_________________
Blog: kevin-fleischer.de und fbaingermany.com

Nach oben

Lossy eX

Betreff des Beitrags:

Verfasst: Do Sep 22, 2005 05:21

DGL Member

Registriert: Do Dez 05, 2002 10:35
Beiträge: 4234
Wohnort: Dortmund

Also selber ne eigene GC aufzubauen halte ich auch nicht unbedingt für das Beste. Eben auch darum, weil es sehr tief ins system geht und nicht das schnellste sein wird.

glBitmap: Ja du hast recht. Ich erstelle dort einen Pointer und gebe ihn dort nicht sofort wieder frei. Das liegt aber daran, dass ich den noch weiterverwende, weil sich dann dort drinne die Bilddaten befinden. So habe ich mir ein mal kopieren gesparrt. Kann mir also nicht vorstellen wo das Problem liegen könnte. Habe es ja selber schon ausreichend getestet. Werde es aber noch mal prüfen.

Nach oben

Tokter

Betreff des Beitrags:

Verfasst: Do Sep 22, 2005 15:04

DGL Member

Registriert: Fr Dez 19, 2003 14:27
Beiträge: 107
Wohnort: Indianapolis, USA

Wenn du mit Objekten arbeitest wuerde ich TObjectList verwenden. Wenn du die mit MyList:=TObjectList.Create(True) erzeugst gehoeren die Objekte in der Liste der Liste und werden bei einem MyList.Free oder MyList.Clear automatisch abgebaut.

Nach oben

Sidorion

Betreff des Beitrags:

Verfasst: Do Sep 22, 2005 16:07

DGL Member

Registriert: Mo Dez 20, 2004 08:58
Beiträge: 442
Wohnort: Mittweida (Sachsen)

Von wegen nicht buggy. Versuch mal eine Prozedur mit zwei varianten arrays und nem Vorgabeparameter zu erstellen. Bis NT4 klappts prima, ab win3k vergisst er glatt, das 2. array auf den stack zu packen und schlägt beim Begin in der prozedur der Länge nach hin.
Beispiel:

Code:

 
Procedure Test(_asErster: Array of String; _asZweiter: Array of String; _bDritter: Boolean=true);
 

Und bei Array of Variant im Übergabeparameter interpretiert eir einen übergebenen String als Array of Char beim Stackschieben

Code:

 
...
  Test2('Hallo'); //kracht gewaltig
  Test2(12345); //klappt prima
...
 
Procedure Test2(_avParam: Array of Variant);
Begin
...
End;
 

_________________
Manchmal sehen Dinge, die wie Dinge aussehen wollen, mehr wie Dinge aus, als Dinge.
<Esmerelda Wetterwax>
Es kann vorkommen, dass die Nachkommen trotz Abkommen mit ihrem Einkommen nicht auskommen und umkommen.

Nach oben

Tokter

Betreff des Beitrags:

Verfasst: Do Sep 22, 2005 17:05

DGL Member

Registriert: Fr Dez 19, 2003 14:27
Beiträge: 107
Wohnort: Indianapolis, USA

Das hier laeuft bei mir ohne Probleme (Delphi5/Win2k):

Code:

procedure TForm1.Test(_asErster: Array of String; _asZweiter: Array of String; _bDritter: Boolean=true);
var
  i : integer;
begin
  for i:=low(_asErster) to high(_asErster) do Memo1.Lines.Add(_asErster[i]);
  for i:=low(_asZweiter) to high(_asZweiter) do Memo1.Lines.Add(_asZweiter[i]);
end;
 
procedure TForm1.Test2(_avParam: Array of Variant);
var
  i : integer;
begin
  for i:=low(_avParam) to high(_avParam) do Memo1.Lines.Add(_avParam[i]);
end;
 
procedure TForm1.Button1Click(Sender: TObject);
var
  a,b : array of string;
  c   : array of variant;
begin
  //Test 1
  SetLength(a,2);
  a[0]:='a[0]';
  a[1]:='a[1]';
  SetLength(b,2);
  b[0]:='b[0]';
  b[1]:='b[1]';
  Test(a,b,true);
 
  //Test 2
  SetLength(c,2);
  c[0]:='c[0]';
  c[1]:=12345;
  Test2(c);
end;

Nach oben

Flash

Betreff des Beitrags:

Verfasst: Do Sep 22, 2005 19:01

Guitar Hero

Registriert: Do Sep 25, 2003 15:56
Beiträge: 7810
Wohnort: Sachsen - ERZ / C
Programmiersprache: Java (, Pascal)

Mittlerweile weiß ich net ob ich denkbar oder sauer über den Fehler sein soll. Ich hab gerade soviele Speicherlöcher gefunden und vernichtet....wahnsinn... :oops:

Andererseits debugge ich Code der schon ewig in benutzung ist, nicht von mir stammt und eigentlich auch nicht so die lieblingsstelle in dem Projekt ist... :roll:

Das mit der ObjectList werd ich mir merken. Das spart sicherlich einige Zeilen Code.

Tokter hat geschrieben:

Das hier laeuft bei mir ohne Probleme (Delphi5/Win2k):

Code:

procedure TForm1.Test(_asErster: Array of String; _asZweiter: Array of String; _bDritter: Boolean=true);
var
  i : integer;
begin
  for i:=low(_asErster) to high(_asErster) do Memo1.Lines.Add(_asErster[i]);
  for i:=low(_asZweiter) to high(_asZweiter) do Memo1.Lines.Add(_asZweiter[i]);
end;
 
procedure TForm1.Test2(_avParam: Array of Variant);
var
  i : integer;
begin
  for i:=low(_avParam) to high(_avParam) do Memo1.Lines.Add(_avParam[i]);
end;
 
procedure TForm1.Button1Click(Sender: TObject);
var
  a,b : array of string;
  c   : array of variant;
begin
  //Test 1
  SetLength(a,2);
  a[0]:='a[0]';
  a[1]:='a[1]';
  SetLength(b,2);
  b[0]:='b[0]';
  b[1]:='b[1]';
  Test(a,b,true);
 
  //Test 2
  SetLength(c,2);
  c[0]:='c[0]';
  c[1]:=12345;
  Test2(c);
end;

Bei mir auch. (D5/WinXP)

_________________
Blog: kevin-fleischer.de und fbaingermany.com

Nach oben

Flash

Betreff des Beitrags:

Verfasst: Do Sep 22, 2005 23:34

Guitar Hero

Registriert: Do Sep 25, 2003 15:56
Beiträge: 7810
Wohnort: Sachsen - ERZ / C
Programmiersprache: Java (, Pascal)

Leute saugt euch memChk!!!
Was ich schon für Speicherlöcher hier ausgemerzt hab is echt nicht normal...Sachen wo man denkt "Da kann gar nix verloren gehn" habens echt in sich. MemChk hatte bisher immer recht...Ich hab gezweifelt ob das sein kann, was dort in dem Logfile steht...aber wenn man lange genug sucht findet man raus, dass z.B. eine leere TList überschrieben wird. Fällt niemanden auf...außer memChk... Echt der hammer die Lib.

@Lossy: Zieh dir mal das Ding. Die einzigen 4 speicherlöcher (und noch dazu die größten) die ich net wegbekomme stammen von deinem MemAlloc. Und ich will wetten memChk hat auch hier recht...

_________________
Blog: kevin-fleischer.de und fbaingermany.com

Nach oben

Lossy eX

Betreff des Beitrags:

Verfasst: Fr Sep 23, 2005 05:37

DGL Member

Registriert: Do Dez 05, 2002 10:35
Beiträge: 4234
Wohnort: Dortmund

Wenn du uns auch sagst woher, dann werde ich das Teil auch mal ausprobieren. Wie gesagt. Ich gebe alles immer schön frei. Spätestens dann wenn die Klasse freigegeben wird. Bin mir also keiner Schuld bewusst.

Hier einige Codefragmente die meine Unschuld zu beweisen. ;-)

Code:

function TglBitmap2D.FlipVert: Boolean;
begin
    ...
    pDest := AllocMem(Height * RowSize);
    ...
    SetDataPtr(pDest);
    ...
end;
 
 
procedure TglBitmap.SetDataPtr(Ptr: PByte);
begin
  if FDataPtr <> Ptr then begin
    if (Assigned(FDataPtr))
      then FreeMem(FDataPtr);
 
    FDataPtr := Ptr;
  end;
end;
 
 
procedure TglBitmap.BeforeDestruction;
begin
  SetDataPtr(nil);
end;

Und das Läuft überall so ab. Außer an zwei Stellen da kopiere ich die Daten lediglich in den anderen Speicher und geben den dann frei. Ist bei mir aber schon gefixed. Niemand darf direkt schreibend auf den Pointer zugreifen. Nur über die Methode SetDataPtr. Und damit ist sichergestellt, dass alles freigegeben wird.

Größe: Bei Bildern ja vollkommen normal. ;-)

Nach oben

LarsMiddendorf

Betreff des Beitrags:

Verfasst: Fr Sep 23, 2005 08:34

DGL Member

Registriert: Sa Dez 28, 2002 11:13
Beiträge: 2244

MemCheck kenne ich auch. Das zeigt doch auch die Zeilennummer an, in der der Speicher belegt wurde. Da müßte man das dann doch weiter eingrenzen können.

Nach oben

Lossy eX

Betreff des Beitrags:

Verfasst: Fr Sep 23, 2005 09:31

DGL Member

Registriert: Do Dez 05, 2002 10:35
Beiträge: 4234
Wohnort: Dortmund

Ah. Mit nem passenden Name hab ich das auch gefunden. Kann das allerdings immer noch nicht nachvollziehen. Habe auch gerade meine Developerversion bei seite gelegt und die letzte veröffentlichte geschnappt aber auch da nicht. Als ich absichtlich etwas eingebaut hatte, hatte ich auch Meldungen. Aber sonst 0. Zur Not hänge das Log mal an oder schick es mir per Mail (falls es nicht jeder sehen soll). Dann schaue ich mir das mal an und versuche etwas zu finde. So kann ich jetzt nichts bösartiges ausmachen.

Zeilennummern zeigt er bei mir nicht an. Oder nur so bei 1 oder 2 Zeilen pro Fehler. Die aber meist weiter oben liegen. Da nützt einem das recht wenig.

[edit] Wenn MemProof richtig eingestellt ist (er also die Codes finden kann) zeigt er einem auch gleich die passende Quellcodestelle an.

Nach oben

Flash

Betreff des Beitrags:

Verfasst: Fr Sep 23, 2005 10:58

Guitar Hero

Registriert: Do Sep 25, 2003 15:56
Beiträge: 7810
Wohnort: Sachsen - ERZ / C
Programmiersprache: Java (, Pascal)

Zum MemProof hatte ich keine Hilfe gefunden. Und ohne Hilfe konnte ich nur soweit das Programm vestehn, dass ich die Exe aus dem raus gestartet habe. Alle anderen Funktionen sind mir verborgen geblieben.

Hmmm... :shock:

ich glaub ich hba noch ne ältere Version von deinem Loader... :oops:

Ich werd mir mal die neue Ziehn und gucken obs dann klappt.

_________________
Blog: kevin-fleischer.de und fbaingermany.com

Nach oben

LarsMiddendorf

Betreff des Beitrags:

Verfasst: Fr Sep 23, 2005 21:32

DGL Member

Registriert: Sa Dez 28, 2002 11:13
Beiträge: 2244

Habe ich gerade gesehen:
http://www.delphipraxis.net/topic64173_ ... inden.html

Nach oben

geo

Betreff des Beitrags:

Verfasst: Sa Sep 24, 2005 13:03

DGL Member

Registriert: Di Dez 02, 2003 12:47
Beiträge: 300
Wohnort: Marburg

Ich muss mal was einwerfen:

Was ist eogentlich ein speicherleck :?:

Ist dass, wenn ich vergesse was freizugeben und da tote daten aufm speicher rumliegen???

Ich gebe nemlich nie was frei... :oops:

Was für Daten müssen eigentlich wieder freigegeben werden?

Bei DLs VBOs und Texturen mache ich das (manchmal)!

_________________
Nothing, oh sweet nothing,
today we are doing nothing at all...
http://www.geo-progs.de

Nach oben

Frase

Betreff des Beitrags:

Verfasst: Sa Sep 24, 2005 13:36

Forenkatze

Registriert: Mi Okt 22, 2003 18:30
Beiträge: 1945
Wohnort: Närnberch
Programmiersprache: Scala, Java, C*

Prima geo!

Freigegeben werden müssen eigentlich alle Sachen, die du vorher initialisierst. Also Klassen mit TObject.Create zum Bleistift. Texturen werden meist vom Treiber freigegeben, aber da kann man sich auch nicht drauf verlassen. Dann musst du natürlich bei Zeigern aufpassen auf erzeugte Klassen.

Objekte muss man auch freigeben. Siehe das Octree-Tutorial von Soulchild. Dort werden objects verwendet und wieder freigegeben.

_________________
"Für kein Tier wird so viel gearbeitet wie für die Katz'."

Nach oben

Seite 2 von 3

[ 42 Beiträge ]

Gehe zu Seite Vorherige 1, 2, 3 Nächste

Foren-Übersicht » Programmierung » Allgemein

Wer ist online?

Mitglieder in diesem Forum: 0 Mitglieder und 2 Gäste

Du darfst keine neuen Themen in diesem Forum erstellen.
Du darfst keine Antworten zu Themen in diesem Forum erstellen.
Du darfst deine Beiträge in diesem Forum nicht ändern.
Du darfst deine Beiträge in diesem Forum nicht löschen.
Du darfst keine Dateianhänge in diesem Forum erstellen.