Auch nett:
Delphi-Quellcode:
// Loakle IP auslesen (!)
GetLocalIPs(Memo1.Lines);
// Falls keine IP vorhanden, dann N.N. eintragen, ...
if not GetLocalIPs(Memo1.Lines)
then
StatusBar1.Panels[3].Text := '
IPv4-Adresse: N. N.'
else
...
1. 'Loakle' vs. 'Lokale'
2. Kommentar zu 'GetLocalIPs' = 'Lokale
IP auslesen'...
3. Du ließt die ja 2x aus...
Delphi-Quellcode:
var
hasLocalIP : Boolean;
...
hasLocalIP := GetLocalIPs(Memo1.Lines);
// Falls keine IP vorhanden, dann N.N. eintragen, ...
if hasLocalIP
then
StatusBar1.Panels[3].Text := '
IPv4-Adresse: ' + Memo1.Lines.Text;
else
StatusBar1.Panels[3].Text := '
IPv4-Adresse: N. N.'
...
Und beherzige den Tipp von alda, der dir empfiehlt, deine ziemlich lange Methode in einzelne kleine Methoden zu unterteilen, sodaß jede Methode genau eine Sache macht (Grid füllen,
IP-Adresse ermitteln etc.). Jedem dieser Methoden verpasst Du einen aussagekräftigen Namen und schon sparst Du dir die Kommentare (wie alda das gesagt hat).