Delphi Indy 取得本機(localhost) IP

在 Form 上放入 Indy Misc -> TIdIPWatch

procedure TForm1.FormCreate(Sender: TObject);
begin
  ShowMessage(IdIPWatch1.LocalIP);
end;