AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Thema durchsuchen
Ansicht
Themen-Optionen

Assigned=true bei uninitialisierter Variable ?

Ein Thema von Int3g3r · begonnen am 25. Jun 2020 · letzter Beitrag vom 13. Jul 2020
 
Hobbycoder

Registriert seit: 22. Feb 2017
1.002 Beiträge
 
#3

AW: Assigned=true bei uninitialisierter Variable ?

  Alt 25. Jun 2020, 17:27
Du erzeugst ja lokal nur eine Variable vom Typ TServer. Im Speicher existiert das Object noch gar nicht.
Demnach kannst du dir die Prüfung mit not Assigned an der Stelle schenken. Assigned wird dann immer False bzw. not Assigned immer True liefern. Tut es zumindest bei mir.
Die Assinged-Prüfung macht erst NACH dem Create Sinn. Denn erst dann wird der Speicher reserviert und die Adresse zugewiesen, sofern dabei kein Fehler auftritt.

Zweitens müsste du nach deinem if Assigned() then auch in einem Block weitermachen.

Delphi-Quellcode:
procedure THeaderFooterForm.FormActivate(Sender: TObject);
var server : TServer;
begin
  server := TServer.Create('127.0.0.1',25222,true);
  if assigned(server) then
  begin
    server.StopTCPServer;
    FreeAndNil(server);
  end;
end;
Noch besser wäre so:
Delphi-Quellcode:
procedure THeaderFooterForm.FormActivate(Sender: TObject);
var server : TServer;
begin
  try
    server := TServer.Create('127.0.0.1',25222,true);
    try
      server.StopTCPServer;
    finally
      FreeAndNil(server);
    end;
  except
    ShowMessage('Server konnte nicht gestartet werden.');
  end;
end;
Assigned solltest du verwenden, wenn bestimmte Codeabschnitte nur ausführbar sind, wenn eine Variable<>nil ist. Um Fehler abzufangen: Try..Except
Gruß Hobbycoder
Alle sagten: "Das geht nicht.". Dann kam einer, der wusste das nicht, und hat's einfach gemacht.

Geändert von Hobbycoder (25. Jun 2020 um 17:55 Uhr)
  Mit Zitat antworten Zitat
 


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 10:29 Uhr.
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz