Koukala jsem na tento a i zkoušela.
http://www.delphitricks.com/source-code/internet/g et_your_own_ip_address.html
[DCC Error] Unit1.pas(38): E2010 Incompatible types: 'PAnsiChar' and 'array[0..63] of Char'
[DCC Warning] Unit1.pas(44): W1057 Implicit string cast from 'AnsiChar' to 'string'

A to GetHostNameW() mi to vůbec nesežere, červena vlnovka.
Asi by to chtělo něco přečist o AnsiChar, ale bohužel je konec školního roku a každý dohání co za cely rok zanedbal.
Lituji že jsem vůbec brachovi něco takového slíbila,delphi máme ve škole první rok takže ???
Asi to odložím po zkouškách.