Děkují moc za pomoc.
Pokud to bylo z hlavy tak jste se docela trefil.
Problém byl jen tady ImageList.1.Draw(Canvas, Rect, 0);
Opravil jsem to takto ImageList.Draw(Canvas,Rect.Left,Rect.Top,0);
Problém je že to děla úplně to samé co mi předtím.
Pokud jsou při spuštění programu ve sloupci nějake 1 tak to vykresli.
Pokud však přidám nějakou za běhu, tak se nic neděje.

Podobne veci se delaji opravdu pres ImageList. Takze obrazek misto toho, abys jej dal do TImage dej do ImageList

Tak jsem zkoušel a žádná slava, oproti Image nepodporuje PNG s průhledným pozadím a vybarvi ho černě.

Jinak pro pme: PingInfoView znám a kdysi jsem používal.
Pokud by šel ručně změnit HostName, tak by byl docela dobry.
Pokud má člověk jen par koustu na hlídaní a má ty IP v hlavě tak je to OK.