To je len sprostá kontrola stringu, či je syntax zadanej IP správna a už vôbec ten algoritmus porovnávania nedá odpoveď na to, či je IP platná alebo nezmysel...
Ak sa s tým chceš trápiť - môžeš...
Inak si stiahni knižnicu synapse.
Stačí použiť 2 unity:
synautil.pas
synaip.pas

IP overíš nasledovnou funkciou zo synaip:

if not isIP('999.999.999.999') then ShowMessage('nie je platna');