Tja, lokale Variablen sind nunmal per se niemals initialisiert (mit einigen Ausnahmen) und sind potentiell mit Zufallswerten gefüllt,
also musst du vorher irgendwas zuweisen, bevor du den Inhalt prüfen oder auslesen willst.
Zufallswerte: einmal 0 oder uber 4 Milliarden Mal was Anderes und die Stochastik lehrt dich, dass du wahrscheinlich meistens keine 0 bekommst.
Zitat:
Delphi-Quellcode:
var server : TServer;
begin
//server := nil;
if not assigned(server) then
Ich hoffe mal der Compiler hat dich korrekt ausgemeckert, dass du auf eine uninitialisierte Variable zugreifst.
Fazit: Du darfst die Zuweisung nicht auskommentieren,
oder lass sie nutzlose vorherige Zuweisung und das IF-Assigned einfach weg (siehe Vorredner) und initialisiere die Variable mit deiner neuen Instanz.
keine Ressourcenschutzblöcke?
Wenn es im StopTCPServer knallt, dann hast du ein wunderschönes Speicherleck.