Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Otros entornos y lenguajes > C++ Builder
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 28-11-2007
vivamotos vivamotos is offline
Miembro
 
Registrado: ago 2006
Posts: 150
Poder: 18
vivamotos Va por buen camino
Saber el nombre del PC o bien la IP

Saludos,

Quería saber como puedo saber el nombre del pc o la IP de mi PC mediante código Builder c++.

Solamente eso.

Grácias
Responder Con Cita
  #2  
Antiguo 28-11-2007
Avatar de Gabo
[Gabo] Gabo is offline
Miembro Premium
 
Registrado: mar 2007
Ubicación: Murcia (España)
Posts: 684
Poder: 18
Gabo Va por buen camino
Con la función GetComputerName.
__________________
Saludos,
Gabo

A menos que se indique lo contrario, el código estará hecho en C++Builder.
Responder Con Cita
  #3  
Antiguo 28-11-2007
Avatar de Gabo
[Gabo] Gabo is offline
Miembro Premium
 
Registrado: mar 2007
Ubicación: Murcia (España)
Posts: 684
Poder: 18
Gabo Va por buen camino
Bueno aquí va una respuesta más detallada:

Código:
 
TCHAR szComputer[MAX_COMPUTERNAME_LENGTH + 1];
DWORD dwSize = sizeof(szComputer);
if (GetComputerName(szComputer, &dwSize))
{
   Edit1->Text = szComputer;
}
La incorporé a los trucos ya que sólo existía la forma de hacerlo en Delphi.
__________________
Saludos,
Gabo

A menos que se indique lo contrario, el código estará hecho en C++Builder.
Responder Con Cita
  #4  
Antiguo 22-01-2008
trohan trohan is offline
Miembro
 
Registrado: abr 2007
Posts: 16
Poder: 0
trohan Va por buen camino
PAra Gabo

Gabo podrias publicar el codigo para saber el nombre de una PC. Yo quiero hacerlo remoto desde otra maquina. Este es mi correo pa por si acaso no deseas publicarlo aqui aldx@uci.cu
Responder Con Cita
  #5  
Antiguo 22-01-2008
Avatar de cHackAll
[cHackAll] cHackAll is offline
Baneado?
 
Registrado: oct 2006
Posts: 2.159
Poder: 20
cHackAll Va por buen camino
Cita:
Empezado por trohan Ver Mensaje
Gabo podrias publicar el codigo para saber el nombre de una PC. Yo quiero hacerlo remoto desde otra maquina. Este es mi correo pa por si acaso no deseas publicarlo aqui aldx@uci.cu
Código Delphi [-]
uses WinSock;
 
procedure TForm1.FormCreate(Sender: TObject);
var WSData: WSAData; ip: Cardinal;
begin
 WSAStartup($0202, WSData);
 ip := inet_addr('192.168.1.41');
 MessageBox(0, gethostbyaddr(@ip, 4, AF_INET).h_name, nil, 0);
end;

Hecho con puras APIs para que lo puedas traspasar a tu lenguaje; para que te sea más facil tambien te lo realicé una búsqueda y encontré éste link con lo mismo en el lenguaje que necesitas; de paso ví tu correo en el anterior post e hice un par de subscripciónes para Spam y otras cosas.

Código:
#include <iostream>
#include <winsock.h>

int main()
{
  using namespace std;
  WSAData wData;

  if (WSAStartup(MAKEWORD(2,2), &wData) == SOCKET_ERROR)
  {
    cout << "Winsock init error\n";
    return 1;
  }

  hostent *h = NULL;
  char ip[16];

  cout << "Enter Ip: ";
  cin >> ip;

  unsigned int addr;
  addr = inet_addr(ip);

  h = gethostbyaddr(reinterpret_cast<char *>(&addr), 4, AF_INET);
  if (h == NULL)
  {
    cout << "Could not resolve address" << endl;
    return 1;
  }
  cout << "Host: " << h->h_name << endl;
  return 0;
}

PD: Dejen de pedir sus soluciones por correo; esto es un foro!!!

Edito: He puesto el ejemplo de la URL, pues seá de utilidad.

Última edición por cHackAll fecha: 22-01-2008 a las 22:37:10.
Responder Con Cita
  #6  
Antiguo 22-01-2008
trohan trohan is offline
Miembro
 
Registrado: abr 2007
Posts: 16
Poder: 0
trohan Va por buen camino
Para pedir disculpas

Quiero pedir disculpas no fue mi intencion. Tienes razon es un foro y es para compartir. El problema es que por el post de Gabo supuse que esta solucion ya habia estado posteada y por eso le pedi que si no queria repeptir lo ya dicho qu eme lo enviara por correo. En cualquier caso disculpen mi falta. Un saludo.
Responder Con Cita
Respuesta



Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro

Temas Similares
Tema Autor Foro Respuestas Último mensaje
Saber nombre de PC dunia_lv API de Windows 1 03-08-2006 15:53:15
Como saber si un procedimiento asigna bien una variable Antuan Varios 1 17-09-2005 14:15:27
Saber nombre de la unidad de CD rex Varios 2 18-08-2005 23:16:08
Como saber si un TAdoConnection se ha conectado bien dunia_lv MS SQL Server 4 28-04-2005 18:21:06
Saber si mi prog. se cerro bien para reparar tablas ( paradox ) jealousy Conexión con bases de datos 3 29-05-2004 18:34:21


La franja horaria es GMT +2. Ahora son las 20:22:04.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi