DGL • Thema anzeigen - Lecks bei zu langer Laufzeit

Lecks bei zu langer Laufzeit

Moderator: DGL-Team

Seite 1 von 4

[ 49 Beiträge ]

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

Vorheriges Thema | Nächstes Thema

Autor

Nachricht

Shaddow

Betreff des Beitrags: Lecks bei zu langer Laufzeit

Verfasst: Di Okt 03, 2006 09:03

DGL Member

Registriert: So Aug 20, 2006 23:19
Beiträge: 564

Ich wende mich in der denkbar schlimmsten Lage an euch...
Ich sitze nun schon einige Weile und suche verzweifelt einen Performancebug.

Im OnidleEvent binde ich folgendes ein:

Code:

 
  StartTick := GetTickCount;
 
  glClear(GL_COLOR_BUFFER_BIT or GL_DEPTH_BUFFER_BIT);
 
  glMatrixMode(GL_MODELVIEW);
  glLoadIdentity;
 
  glTranslatef(0,-1,-15);
 
[RENDERABSCHNITT]
 
  if FPSDraw = TRUE then
  begin
    OrthoStart();
    DrawFPSGraph;
    OrthoStop();
  end;
 
  SwapBuffers(DC);
 
  DrawTime := GetTickCount - StartTick;
 
  INC(Frames);
  Result := DrawTime;
 
  if GetTickCount-LastTick >= 1000 then
  begin
    INC(Seconds);
    LastTick := GetTickCount;
 
    if Length(Effekte)>0 then
      UseForm.Caption := 'ShaddowEngine .:. 0.0.0.1 '+ IntToStr(Frames) + ' FPS - ' + IntToStr(CalculateEffektNumParticles) + ' Particles'
    else
      UseForm.Caption := 'ShaddowEngine .:. 0.0.0.1 '+ IntToStr(Frames) + ' FPS';
 
    for i:=0 to Length(FPS60)-1 do
      if FPS60[i+1]>0 then
        FPS60[i]:=FPS60[i+1];
 
    FPS60[59] := Frames;
    Frames :=0;
  end;
 
  if FirstRun=TRUE then FirstRun:=FALSE;
 

Eventuell falls es was bringt, hier noch die DrawFPSGraph:

Code:

 
procedure TEngine.DrawFPSGraph();
var i, DiffWidth:Integer;
    HighestFPS, ActualFPSHeight: Cardinal;
begin
  HighestFPS:=0;
 
  for i:=0 to Length(FPS60)-1 do
    if HighestFPS<FPS60[i] then
      HighestFPS:=FPS60[i];
 
  glEnable(GL_BLEND);
  glBlendFunc(GL_SRC_ALPHA, GL_ONE_MINUS_SRC_ALPHA);
 
  // BackGround
  glColor4f(0.5,0.6,0.7,0.25);
  glBegin(GL_QUADS);
    glVertex3i(FPS_GRAPH_POSITION[0],FPS_GRAPH_POSITION[1],0);
    glVertex3i(FPS_GRAPH_POSITION[2],FPS_GRAPH_POSITION[3],0);
    glVertex3i(FPS_GRAPH_POSITION[4],FPS_GRAPH_POSITION[5],0);
    glVertex3i(FPS_GRAPH_POSITION[6],FPS_GRAPH_POSITION[7],0);
  glEnd();
 
  // Rahmen
  glColor4f(0.5,0.6,0.7,1);
  glBegin(GL_LINE_LOOP);
    glVertex3i(FPS_GRAPH_POSITION[0],FPS_GRAPH_POSITION[1],0);
    glVertex3i(FPS_GRAPH_POSITION[2],FPS_GRAPH_POSITION[3],0);
    glVertex3i(FPS_GRAPH_POSITION[4],FPS_GRAPH_POSITION[5],0);
    glVertex3i(FPS_GRAPH_POSITION[6],FPS_GRAPH_POSITION[7],0);
  glEnd();
 
  glColor4f(0.5,0.6,0.7,0.25);
  glBegin(GL_LINES);
    // Vertikale Linien
    for i:=0 to FPS_GRAPH_WIDTH DIV 10 do
    begin
      glVertex3i(FPS_GRAPH_POSITION[0]+i*10,FPS_GRAPH_POSITION[1],0);
      glVertex3i(FPS_GRAPH_POSITION[6]+i*10,FPS_GRAPH_POSITION[7],0);
    end;
 
    // Horizontale Linien
    glVertex3i(FPS_GRAPH_POSITION[0],FPS_GRAPH_POSITION[1]+FPS_GRAPH_HEIGHT DIV 2,0);
    glVertex3i(FPS_GRAPH_POSITION[2],FPS_GRAPH_POSITION[3]+FPS_GRAPH_HEIGHT DIV 2,0);
 
    // aktuelle FPS
    glColor4f(0.5,0.6,0.7,0.5);
    for i:=0 to Length(FPS60) do
    begin
      if FPS60[i]>0 then
      begin
        ActualFPSHeight := FPS_GRAPH_HEIGHT-round(FPS60[i]*FPS_GRAPH_HEIGHT/(HighestFPS+10));
        //unten
        glVertex3i(FPS_GRAPH_POSITION[0]+i*10,FPS_GRAPH_POSITION[1],0);
        // oben
        glVertex3i(FPS_GRAPH_POSITION[6]+i*10,FPS_GRAPH_POSITION[7]-ActualFPSHeight,0);
      end;
    end;
  glEnd();
  glDisable(GL_BLEND);
 
  DiffWidth := FontManager.GetTextWidth('FPS',inttostr(FPS60[59])+' FPS');
 
  glEnable(GL_TEXTURE_2D);
    with FontManager do
    begin
      Draw('FPS',inttostr(HighestFPS)+' FPS',    FPS_GRAPH_POSITION[2]+5,           FPS_GRAPH_POSITION[5] - FontManager.Fonts[0].Height);
      Draw('FPS',floattostr(HighestFPS/2)+' FPS',FPS_GRAPH_POSITION[2]+5,           FPS_GRAPH_POSITION[3] + FPS_GRAPH_HEIGHT DIV 2 - GetTextHeight('FPS') DIV 2);
      Draw('FPS','0 FPS',                        FPS_GRAPH_POSITION[2]+5,           FPS_GRAPH_POSITION[3]);
      Draw('FPS',inttostr(FPS60[59])+' FPS',     FPS_GRAPH_POSITION[0]+5,           FPS_GRAPH_POSITION[1]);
      Draw('FPS',inttostr(Seconds)+' Seconds',   FPS_GRAPH_POSITION[0]+DiffWidth+25,FPS_GRAPH_POSITION[1]);
    end;
  glDisable(GL_TEXTURE_2D);
end;

Ich weiss ja leider nicht, wo der Fehler liegt, aber er äußert sich folgendermaßen:
Sobald ich die Exe etwa 130 Sekunden oder so laufen lasse, wackelt der ansonsten so stabile FPS Wert. Eben noch konstant auf 60, kippt er auf einmal auf 54 dann wieder auf 60 usw.
Stoppe ich dann die Anwendung, dauert es wirklich einige Sekunden (vlt 10) bis die Anwendungen geschlossen wurde, und ich meinen Desktop wieder sehe. Wenn die Sekundendauer unter 60 liegt, dann beginnt es irgendwie zu laggen.

Gibs das bei euch auch?
Wenn ja, habt ihr ne Idee, worans liegt. Habe schon so einiges auskommtiert, aber es wird nich besser....

Hier die Exe: http://shaddow89.sh.funpic.de/2006-10-3v2_particle.rar

Danke schonma

Zuletzt geändert von Shaddow am Di Okt 03, 2006 16:31, insgesamt 1-mal geändert.

Nach oben

Shaddow

Betreff des Beitrags:

Verfasst: Di Okt 03, 2006 13:12

DGL Member

Registriert: So Aug 20, 2006 23:19
Beiträge: 564

Es liegt scheinbar irgendwo an der SPeicherfreigabe... nach 60 Sekunden verschlingt die Anwendung bereits 360mb Arbeitsspeicher, das kann nich wahr sein...

Nach oben

La Boda

Betreff des Beitrags:

Verfasst: Di Okt 03, 2006 13:48

DGL Member

Registriert: Mi Jul 17, 2002 12:07
Beiträge: 976
Wohnort: Tübingen

Im obigen Code kann ich keine Lecks finden, aber ein so gewaltiger Speicherfresser sollte doch zu finden sein.

_________________
"Du musst ein Schwein sein in dieser Welt, sangen die Prinzen, das ist so 1.0. Du musst auf YouTube zeigen, dass dir dein Schweinsein gefällt, das ist leuchtendes, echtes Web 2.0."
- Hal Faber
Meine Homepage: http://laboda.delphigl.com

Nach oben

Shaddow

Betreff des Beitrags:

Verfasst: Di Okt 03, 2006 13:52

DGL Member

Registriert: So Aug 20, 2006 23:19
Beiträge: 564

Eben das ist es ja...
Ich denke mal, wenn mein Speicherverbrauch sich jede Sekunde um 6 bis 8mb erhöht, dann liegt es irgendwo an Dyn arrays, aber ich habe alle gechecked... sie werden nur selten mal initialisiert, und ordnungsgemaess gelöscht

Nach oben

LarsMiddendorf

Betreff des Beitrags:

Verfasst: Di Okt 03, 2006 14:00

DGL Member

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

Beim neuen Turbo Delphi kann man sich die Speicherlecks ausgeben lassen. Einfach ReportMemoryLeaksOnShutdown := True; am Anfang ins Programm schreiben.

Nach oben

Shaddow

Betreff des Beitrags:

Verfasst: Di Okt 03, 2006 15:41

DGL Member

Registriert: So Aug 20, 2006 23:19
Beiträge: 564

Bei mir funkt die Installtion partout nich...
Geht das vllt auch mit D7 oder D2005?

Ansonsten ich habe echt keine Ahnung, warum die Performance so leidet

Nach oben

Sascha Willems

Betreff des Beitrags:

Verfasst: Di Okt 03, 2006 15:47

DGL Member

Registriert: Mo Sep 23, 2002 19:27
Beiträge: 5812
Programmiersprache: C++

Für "ältere" Delphiversionen kann man auch FastMM nutzen, mit dem man Speicherlecks sehr schnell auffinden kann.

_________________
www.SaschaWillems.de | GitHub | Twitter | GPU Datenbanken (Vulkan, GL, GLES)

Nach oben

Shaddow

Betreff des Beitrags:

Verfasst: Di Okt 03, 2006 16:07

DGL Member

Registriert: So Aug 20, 2006 23:19
Beiträge: 564

Also ich weiss nich wirklich wie ich damit umgehen soll, also hab ich einfach ma getestet. und so habe ich also mein Programm als hostprogramm des Replacement BorlndMM DLL ausgeführt. ich hatte eigentlich irgendne msg oder eine file erwartet, die mir was sagt, aber nix dergleichen.

Nach oben

Sascha Willems

Betreff des Beitrags:

Verfasst: Di Okt 03, 2006 16:10

DGL Member

Registriert: Mo Sep 23, 2002 19:27
Beiträge: 5812
Programmiersprache: C++

Das steht alles direkt in der FastMM4.pas drin.

_________________
www.SaschaWillems.de | GitHub | Twitter | GPU Datenbanken (Vulkan, GL, GLES)

Nach oben

uweq

Betreff des Beitrags:

Verfasst: Di Okt 03, 2006 16:18

DGL Member

Registriert: Fr Jul 14, 2006 13:08
Beiträge: 117
Wohnort: Berlin

hi Shaddow.

Hab mal die EXE ausgetestet, nach ca 10 min und allem verstellen etc immernoch unter 8MB speicherverbrauch.
Nach beenden des Progs Desktop sofort sichtbar.
(fps - anzeige vermisst, daher keine Aussage ;o) )

Gruß Uwe

System :
WinXP Pro

Sascha schrieb:

Zitat:

...FastMM4...

Shaddow fragt:

Zitat:

Geht das vllt auch mit D7 oder D2005?

Ich schreibe:
Ja das geht, ich hab es bei beiden Installationen am Laufen

_________________
Die 3 Totfeinde eines Programmierers ?
a) Tageslicht
b) frische Luft
c) ..und das ständige Gebrüll der Vögel

Nach oben

Shaddow

Betreff des Beitrags:

Verfasst: Di Okt 03, 2006 16:29

DGL Member

Registriert: So Aug 20, 2006 23:19
Beiträge: 564

uweq hat geschrieben:

(fps - anzeige vermisst, daher keine Aussage ;o)

Hier hab ich mich gewundert... Sorry habe die falsche URL gepostet:
http://shaddow89.sh.funpic.de/2006-10-3v2_particle.rar

Da is naemlich n FPS Counter dabei ^^

uweq hat geschrieben:

Sascha schrieb:

Zitat:

...FastMM4...

Shaddow fragt:

Zitat:

Geht das vllt auch mit D7 oder D2005?

Ich schreibe:
Ja das geht, ich hab es bei beiden Installationen am Laufen

[/quote]

Das hats du falsch aufgefasst. Mein "geht das auch..." bezog sich auf Losseys Comment nicht auf Saschas. Habe es eben wie in der FastMM4 angewiesen, ausgeführt, aber es kam trotzdem keinerlei hinweis, was denn nun mit meinem speicher los is. bekomm ich da eine logdatei oder wie?
da steht ja nur drin, dass ich es als erstes use einbinden soll usw.

Nach oben

uweq

Betreff des Beitrags:

Verfasst: Di Okt 03, 2006 16:33

DGL Member

Registriert: Fr Jul 14, 2006 13:08
Beiträge: 117
Wohnort: Berlin

hi Shaddow,

Zitat:

ich hatte eigentlich irgendne msg oder eine file erwartet, die mir was sagt, aber nix dergleichen.

wenn du mit FastMM arbeitest und Delphi dann musst Du die FastMM-DLL ins Such-Path hinkopieren. Also ich hab sie ins Win/system32-Dir reingelegt. Weiterhin muss die FastMM.pas über Bibliothekspfad deiner Anwendung auffindbar sein.

Dann trage in deiner xxx.dpr als erste Zeile FastMM4, ein.
Danach dann siehe Bild:
Alles andere kannst dann wie Sascha schrieb in der FastMM4.pas einstellen.
...und du erhälst deine Datei in TXT-Form im Arbeitsverzeichznis Deines PAS-Projekts ausgegeben.

Gruß Uwe

Du hast keine ausreichende Berechtigung, um die Dateianhänge dieses Beitrags anzusehen.

_________________
Die 3 Totfeinde eines Programmierers ?
a) Tageslicht
b) frische Luft
c) ..und das ständige Gebrüll der Vögel

Nach oben

Shaddow

Betreff des Beitrags:

Verfasst: Di Okt 03, 2006 16:43

DGL Member

Registriert: So Aug 20, 2006 23:19
Beiträge: 564

Ah danke. Ein Prob noch. Trotz der Tatsache, dass meine Uses so aussehen:

Code:

uses FastMM4,
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, ExtCtrls,
 
  DGLOpenGL,
 
  Engine, Effect, BugTracker, Tools, AppEvnts;

Bringtz er mir den Fehler, dass der Memory nicht zugewiesen werden konnte etc. Cannot install FastMM4 - Memory has already been allocated

Nach oben

uweq

Betreff des Beitrags:

Verfasst: Di Okt 03, 2006 16:51

DGL Member

Registriert: Fr Jul 14, 2006 13:08
Beiträge: 117
Wohnort: Berlin

das was du da im Source zu stehen hast ist falsch.

Der speicher fuer FastMM MUSS als ERSTES reserviert werden also direkt in der Projekt-Datei,
und sonst nirgendwo anders mehr.

Gruß Uwe

Du hast keine ausreichende Berechtigung, um die Dateianhänge dieses Beitrags anzusehen.

_________________
Die 3 Totfeinde eines Programmierers ?
a) Tageslicht
b) frische Luft
c) ..und das ständige Gebrüll der Vögel

Nach oben

uweq

Betreff des Beitrags:

Verfasst: Di Okt 03, 2006 17:01

DGL Member

Registriert: Fr Jul 14, 2006 13:08
Beiträge: 117
Wohnort: Berlin

hi Shaddow,

Fehlersuche:
Setze Dein Augenmerk auf Dynamische Array und deren Freigabe.
Solch ein riesiger Speicherbedarf kann nur dadurch erzeugt werden, oder durch erzeugen von immer neuen Objecten, welche nicht mehr freigegeben werden.

Achtung:
Lass dein Prog nicht solange laufen, denn deine Fehlerreportdatei dürfte etwa nach 30 sekunden eine größe von ca >500MB haben.

Gruß Uwe
[edit]
Bin dann jetzt leider mal kurz raus hier, hoffe ich konnte dir helfen.
[/edit]

_________________
Die 3 Totfeinde eines Programmierers ?
a) Tageslicht
b) frische Luft
c) ..und das ständige Gebrüll der Vögel

Zuletzt geändert von uweq am Di Okt 03, 2006 17:04, insgesamt 1-mal geändert.

Nach oben

Seite 1 von 4

[ 49 Beiträge ]

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

Foren-Übersicht » Programmierung » OpenGL

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.