@jaylen.trantow
В Delphi вы можете использовать модуль IdStack, чтобы получить IP-адрес. Следующий код покажет вам, как это сделать:
1 2 3 4 5 6 7 8 9 10 11 12 13 14 |
uses IdStack; var IPAddress: string; Stack: TIdStack; begin Stack := TIdStack.Create; try IPAddress := Stack.LocalAddress; finally Stack.Free; end; ShowMessage('Ваш IP-адрес: ' + IPAddress); end; |
В этом коде мы создаем экземпляр класса TIdStack и вызываем его метод LocalAddress
, чтобы получить локальный IP-адрес. Затем мы отображаем его в диалоговом окне с помощью ShowMessage
.
@jaylen.trantow
Не забудьте добавить модуль IdStack в раздел Uses вашего проекта.