Deutsches Lazarusforum

Okay, danke für deine Hilfe

Aha! Trotzdem verstehe ich nicht, wieso ich picPointer gar nicht mehr mit New() reservieren muss

Wenn die Performance nicht drunte rleidet, würde ich den ganzen Pointer-Quatsch ja lassen, aber ich bin mir da halt nicht sicher ^^

Danke noch einmal. Habe jetzt auf den lokalen Pointer verzichtet. New/Dispose in Refresh war der Grund.

Mein Code:
procedure TContactListItem.Refresh();
var picPointer: TPicture;
begin

FMain.Caption := FData^.Name;
FSub.Caption := FData^.Skill;

if FData^.nation <> '' then
FSub.Caption ...

Das hier ist der Heaptrace nach Programmstart und sofortigem Schließen. Zwischendurch wurden 13 TContactListItems erzeugt und mit Daten gefüllt/gelinkt.

C:\Users\Mein_Toller_Pfad_Zum_Programm\Dialry v1.0.1-0\Dialry.exe
Heap dump by heaptrc unit
19622 memory blocks allocated : 120935096/120956416 ...

Okay, danke für die Tips :)
Bei den Pointern zu den einfach Datentypen wirst du sicher Recht haben - aber die Bilderliste hat einen extremen Vorteil gebracht, dabei habe ich zum Testen aktuell nur um die 10 Kontakte.

Was die Suche angeht lehne ich mich einfach zurück und lass SQLite3 die Arbeit ...

Vielen Dank für die Antwort! :)

Das Wichtigste zuerste: Dank dir ist der Fehler jetzt gelöst. Die Lösung war diese Zeile:
FData^ := data^;
Mein Code lautete so:
FData := data;
Allerdings kann ich noch nicht ganz nachvollziehen, warum meine Version nicht funktioniert. Das Disposen eines Pointers ...

Hallo,

tauche gerade ein in die wunderwolle Welt des heaptrc. Nachdem ich all meinen Klassen Destruktoren verliehen habe, wird mir nur noch ein einziger Memory Leak angezeigt: 1 Unfreed memory blocks : 8. Diesen kann ich mir aber nicht erklären und hoffe auf eure Hilfe :)

Der Call-Trace führt mich ...

Ohh Mann, vielen Dank euch beiden. Meine Lazarus-Kenntnisse sind echt eingerostet!
Werde jetzt erst einmal ein Record mit den zu speichernden Daten definieren und diese dann in der Datei speichern.

Schäme mich gerade so sehr ... XD

Hallo,

ich möchte eine Liste von Objekten in einer typisierten Datei speichern. Ein Objekt hat natürlich einen Namen (hier: fTitle/Title). Allerdings habe ich Probleme, diesen korrekt zu speichern und wieder auszulesen. Nach einer Weile und einigen unsauberen Tricks habe ich es geschafft, den ...

@Socke: ich bin mir nicht sicher, da ich neu auf dem Gebiet SQL in Lazarus bin. ABer ich verwende eine SQLite3Connection, von daher gehe ich mal von SQLite aus (habe bisher nur Erfahrung mit MySQL).

@Michl: Nein, leider nicht. Das ist genau die Variante, die ich anfangs hatte, als dann der Fehler ...

Hallo Community,

ich mache zurzeit meine ersten vorsichtigen Schritte mit SQL in Verbindung mit Lazarus. Wie sonst auch, hat jede meiner Tabellen eine Spalte ID, welche ganz normal via AUTO_INCREMENT hochgezählt werden soll.

Dies ist mein Code:

{ Create property table }
SQLQuery1.SQL.Text ...

Na sieht doch gut aus Danke für die Hilfe, ich werde jetzt ne Toolbar nehmen (auch wenn sie nicht ganz so komfortabel erscheint ^^).

Auch nochmal Danke an theo.

Grüße

Habe ich MenuItem gesagt? Ich meine natürlich NewItem ^^

Warte...ich darf die dort nicht freeen weil nur der Zeiger zum MainMenu hinzugefügt worden ist, oder? Und wenn ich NewItem free, verweist der Zeiger beim MainMenu ins Leere?

So oder so...egal ob ich freee oder nicht: Das Ergebnis bleibt ...

@theo: Mit dem Free bin ich nicht sicher gewesen, ob es gut/nötig ist. Ich weiß nicht, ob Objekte nach dem Durchlauf einer Prozedur automatisch sauber zerstört werden oder nicht. Um kein Risiko einzugehen, hab ichs per Hand gemacht.

@Mathias: Das könnte natürlich sein. Wäre ne Erklärung für das ...

Override? Nicht Overload? ich möchte die alte ja nicht überschreiben sondern nur eine gleichnamige Prozedur erhalten.

Und egal ob Overload oder nicht. Auch mit Overload ist das Problem nicht gelöst (bei override kommt eine Fehlermeldung, da die Parameter nicht gleich sind)