Menú

Mostrar Mensajes

Esta sección te permite ver todos los mensajes escritos por este usuario. Ten en cuenta que sólo puedes ver los mensajes escritos en zonas a las que tienes acceso en este momento.

Mostrar Mensajes Menú

Mensajes - d(-_-)b

#431
Puedes empezar por C.

Citarya que por internet y tal se que se demora mucho

Mentira, todo depende del tiempo y las ganas de aprender que le dediques.

Tu mayor recurso es internet, Puedes buscar manuales, libros completo del lenguaje por el que te quieras iniciar.

saludos...
#432
Por cierto, Troyano, este nombre ya le queda feo, actualmetne le llamamos RAT.

No es ningun problema hacer un RAT en lenguajes NET, al menos el Cliente. La parte importante es el Servidor, pues queremos que se ejecute en cualquier windows sin depender de ningun framework, etc..

los lenguajes ideal para crear un Servidor es C/C++/Asm/Delphi. Sobre asm no necesariamente hay que hacerlo entero en Asm, se puede usar asm in line. asi contribuir a que el Servidor quede mas pequeño. Claro, en todo lo que se pueda.

saludos...
#433
Eso es bueno, ningun producto, jamas sera perfecto, ni el ser humano, y igual que cualquier programa estamos lleno de errores, y cual es nuestro parche, reconocer el error, aprender de el, y hacer cambios en la vida para que el parche tenga efecto.

en fin, no importa los errors que tenga widnows u otro programa, el ser humano no es perfecto por lo tanto nunca sera capa de crear algo perfecto, lo que si puede hacer es ir mejorando...

mientras otros se quejan por los bug, yo me alegro de que salgan parches. Mas no se puede pedir.

saludos...
#434
Es un exelente explorador de archivos, muy bonito.

saludos...
#435
Cita de: Khronos14 en  8 Octubre 2010, 21:20 PM
Buen aporte VillanoSam, tal vez te interese la función de la API de Windows SHGetFolderPath, con ella puedes obtener muchas más carpetas especiales del sistema.

Saludos.

Si gracias, de echo hace mucho que este code esta escrito, solo la captura es nueva.

------------------

por cierto VillanoSam y Dominicano son los mismo.

por ejemplo.
http://foro.elhacker.net/programacion_general/manuales_y_libros_de_delphi-t212733.0.html

saludos...
#436
Foro Libre / Re: Dilema ético.
8 Octubre 2010, 20:50 PM
Citaryo justifico la tortura en este caso, si un hijo de p** conoce donde está una bomba que matará a  varias personas, y el camino para que hable es torturarlo se le tortura,...

Torturar no sirve, esas gente que estan entrenadas para esos fines estan dispuestos a moris sean cuales sean las circunstancias.

Esmas, estallan bombas en su propio cuerpo. Y esas gente, por no decir nombre ni pais, son casi los unicos capaz de cosas como estas. y todos los casos rijen entorno a ellos.

si es verdad, acepto a que contribui a que el tema se fuera de lugar, no fue mi intencion, pero.....

saludos...
#437


Bueno aqui les dejo unas mini funciones que nos permite obtener el direcorio de windows, archivos de programas, system, etc.. sin importar en que unidad esta instalado el sistema operativo, estas funciones resultan muy utiles ya que si queremos copiar un archivo u otra cosa en tales directorio se copiara sin problemas, sin importar que el directorio raiz sea C, D, o lo que sea.

Código (delphi) [Seleccionar]
program GetPCInfo;

{$APPTYPE CONSOLE}

uses
 SysUtils, Windows, Registry, ShellApi;

Type
//Directorios y nombres
WinSysTemp = (WindowsDir, SystemDir, TempDir);
ComputerUser = (GComputerName, GUserName);

Const
//Nombres, tonterias pero util, LOL XD
U = 'User name: ';
C = 'Computer name: ';
W = 'Windows: ';
S = 'System: ';
T = 'Temp folder: ';
P = 'Program files: ';
DT = 'System date time: ';
SYSLANG = 'System language: ';
TEXT = 'elhacker.net by Dominicano. (-_-) XD';
LINE = '-----------------------------------------';

//Windows, system y carpeta temporal (Temp)
function GetDirectory(DirWST: WinSysTemp): String;
var
Path: Array[0..MAX_PATH] of Char;
SizePath: Cardinal;
begin
SizePath := sizeof(Path);
 Case DirWST of
  WindowsDir: GetWindowsDirectory(Path, SizePath);
  SystemDir: GetSystemDirectory(Path, SizePath);
  TempDir: GetTempPath(MAX_PATH, Path);
  end;
 Result := (Path);
end;

//Archivos de programa
//Si queremos obtener Archivos comunes, Usar CommonFilesDir
function GetProgramFilesDir: String;
var
Regedit: TRegistry;
begin
 Regedit := TRegistry.Create;
  try
    RootKey := HKEY_LOCAL_MACHINE;
    Regedit.OpenKey('\SOFTWARE\Microsoft\Windows\CurrentVersion', false);
    Result := Regedit.ReadString('ProgramFilesDir');
  Regedit.CloseKey;
  finally
 Regedit.Free;
end;
end;

//Idioma del systema
function GetUserLanguage: String;
var
Language: Array[0..150] of Char;
ID: LangID;
LangSize: Cardinal;
begin
 LangSize := SizeOf(Language);
 ID := GetUserDefaultLangID;
 VerLanguageName(ID, Language, LangSize);
 Result := (Language);
end;

//Computadora y usuario
function GetComputerUserName(CUN: ComputerUser): String;
var
csName: Array[0..230] of Char;
csSize: Cardinal;
begin
 csSize := Sizeof(csName);
 Case CUN of
  GUserName: GetUserName(csName, csSize);
  GComputerName: GetComputerName(csName, csSize);
  end;
 Result := (csName);
end;

//Fecha y hora del sistema
function SystemDateTime: String;
var
SysDateTime: TSystemTime;
begin
 GetLocalTime(SysDateTime);
 Result := DateTimeToStr(SystemTimeToDateTime(SysDateTime));
end;

//Mostramos resultados en pantalla
begin
Writeln(LINE + #10 + TEXT + #10 + LINE + #10);

Writeln(U + GetComputerUserName(GUserName));
Writeln(C + GetComputerUserName(GComputerName )+ #10);

Writeln(W + GetDirectory(WindowsDir));
Writeln(S + GetDirectory(SystemDir));
Writeln(T + GetDirectory(TempDir));
Writeln(P + GetProgramFilesDir + #10);

Writeln(DT+SystemDateTime);
Writeln(SYSLANG+GetUserLanguage);

Readln;
end.


saludos...
#438
Si de verdad gustara la programacion, no estarian buscando tareas echas, internet esta repleto de manuales, tutoriales, hay muchos libros, etc.. mas que suficiente para aprender a programar, eh incluso sin necesidad de recurrir a los foros, no es que no se puede recurir a los foros, porque para eso y mucho mas estan. de verdad.

y voy a dejar algo mucho mas claro, dice el refran que de los errores se aprende, si tenesis un problema, y no sos capaz de buscar la sulucion y aprender a resolverlo, desde luego es un habito mal para aprender a programar, porque asi nucas vas a madurar en el tema.

si estas haciendo una pared de una casa, y en tus intentos de hacer que la pared quede recta y la hace torcida, y no te esfuerza por hacerla recta, y busca que alguien te ayude, desde luego sera un mal albañil.

y eso se puede aplicar a la programacion, y a muchas cosas mas.

no quiere hacer sentir a nadie mal, pero si de verdad quieren programar obten por aprender de la forma mas adecuada.

saludos...
#439
Bueno en este caso tendran que espera que pase la vigencia de dicha patente.

saludos...
#440
Foro Libre / Re: Dilema ético.
8 Octubre 2010, 16:34 PM
Los estados unidos por ejemplo, son de los peores, son gente que solo ellos son los que quieren tener armas nucleares, y siempre vivien haciedno lo imposible para que otros paises no la poseen, no pueden con japon ni china porque creo y pienso que estan mas armados que ellos mismo. y van de tra de otros paises como iran, etc...ellos se creen que todos los que vivien en esos paises son terroristas y no es asi, alli viven gente normal y corriente como todos nosotros, en irak por ejemplo, morieron cientos de miles de personas inicentes incluidos niños, sin importarles nada, que derecho tenian de hacerles una guerra, en normal que en esos paises odien al estado unidence porque no resperan los derechos humanos mucho menso los de ellos, lo ven como terroristas como lo peor del mundo. pero la realdiad es que ellos los de USA son lo malos. maran millones de gente sin piedad alguna, la CIA el FBI, hacen cosas muy espantosas, van a esos paises a secuestar gente y los torturan para sacar informacion de algo en concreo, informacion que no existe, hacen mucha cosas que el mundo ni sabe.

el mismo ejemplo lo sigen otros paises.

entonces ¿quienes son los terroristas?

saludos...