Record New/Dispose resultiert in MemoryLeaks

[Zacherl]

Zitat von Glados:

Das mit dem 10.000-Limit wusste ich nicht.
Dann wäre es glaube ich das Beste, wenn ich das mit dem Record sein lasse und Strings stattdessen so mitschicke
PostMessage(receiver, command, wParam, LPARAM(PChar('string')));

Das klappt auch ausschließlich mit String-Konstanten.

Im Falle von:

Delphi-Quellcode:

var
  S: String;
begin
  S := 'blabla';
  PostMessage(receiver, command, wParam, LPARAM(PChar(@S[1])));
  // ...
  S := '123';

kannst du nie sicher sein, ob S noch 'blabla' oder schon '123' enthält, wenn deine Nachricht bearbeitet wird. Selbes gillt natürlich für den Falle, dass der Thread den String in jeder Iteration modifiziert.

Ich kann dir nur nochmal raten von dem ganzen Message Gefummel zurück zu TThread.Queue zu wechseln. Da musst du dir weder um manuelle Speicherverwaltung, noch um irgendwelche Message-Queue Limits oder andere Edgecases Gedanken machen.

[Glados]

Zitat:

Ich kann dir nur nochmal raten von dem ganzen Message Gefummel zurück zu TThread.Queue zu wechseln. Da musst du dir weder um manuelle Speicherverwaltung, noch um irgendwelche Message-Queue Limits oder andere Edgecases Gedanken machen.

Ich versuche meine vorhandenen Codefragmente mal in Prozeduren zu packen und das so zu machen.

Jedoch würde ich aus den Threads eine Prozedur in einer anderen Unit aufrufen (mit Übergabe der Thread-ID), um einige unnötige Zeilen (Queue(nil{* <= kommt hier dann die Thread-ID hin? *}, procedure begin end); ) zu sparen.

Ich melde mich sobald ich alles umgebaut habe.

[Zacherl]

Statt der ThreadId, musst du die Instanz des aufrufenden Threads also Self als Parameter vom Typ TThread übergeben, aber dann sollte es ohne Probleme funktionieren die Funktion auszulagern

[Glados]

Ok danke ich melde mich