Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Buscar en los Foros
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Mostrando resultados del 1 al 4 de 4
La búsqueda tomó 0,00 segundos.
Buscar: Mensajes Hechos Por: cHackAll
Foro: Trucos 05-10-2008
Respuestas: 5
Visitas: 6.670
Escrito Por cHackAll
// Actualización al truco... uses...

// Actualización al truco...

uses WinSock;

//...

function EnumHosts(const lpWorkgroup: PChar = nil; const lpNetResource: PNetResource = nil; const Level: Cardinal = 0): TStrings;
var
hEnum,...
Foro: Trucos 03-06-2008
Respuestas: 5
Visitas: 6.670
Escrito Por cHackAll
Un par de aclaraciones; la llamada deberia haber...

Un par de aclaraciones; la llamada deberia haber sido

procedure TForm1.Button1Click(Sender: TObject);
begin
AddHosts(nil, ListBox1.Items);
end;

Segunda, el anterior comentario es totalmente...
Foro: Trucos 03-06-2008
Respuestas: 5
Visitas: 6.670
Escrito Por cHackAll
Considerando la necesidad de enumerar los equipos...

Considerando la necesidad de enumerar los equipos que se encuentran en varias redes diferentes dentro de una LAN hice la siguiente variación del truco;

procedure AddHosts(Node: PNetResource; List:...
Foro: Trucos 27-01-2008
Respuestas: 5
Visitas: 6.670
Escrito Por cHackAll
Enumerar los recursos de una LAN

var Items: array [0..32767] of TNetResource;
procedure AddResources(NodeName: string; List: TStrings);
var hEnum, Count, Size: Cardinal;
begin
Items[0].lpRemoteName := PChar(NodeName);
Count :=...
Mostrando resultados del 1 al 4 de 4

 
Saltar a Foro

La franja horaria es GMT +2. Ahora son las 22:35:27.


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