Delphi Enviar ID do PC via IdTCPClient/IdTCPServer

[Arraz]

om galera estou criando um aplicativo aqui, porem eu queria sabe como que faço para pega o ID da Máquina e enviar pro idTCPServer e mostra no coluna
do ListView tipo...

Lembrando estou usando os component IdTCPClient/IdTCPServer

e para receber no IdTCPServer
L: TListItem;
begin
L := LV.Items.Add;
L.SubItems.Add(IDPC); // Aqui quero que mostra o ID do PC, Tipo, SerialHD,Address MAC que pro IdTCPServer receber essas informações
L.SubItems.Add(DateToStr(Now)); // Aqui mostra a hora

Alguem pode me ajudar ai...

Mais se ninguém tentar ajuda, eu tento aqui na mão mesmo...