Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Varios
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Coloboración Paypal con ClubDelphi

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 13-11-2007
Willo Willo is offline
Miembro
 
Registrado: jun 2006
Posts: 116
Poder: 19
Willo Va por buen camino
codigo de seguridad digital

Hola, existe algun algoritmo, componente (free) o algo que me permita generar una cadena de caracteres aleatoria-irrepetible en delphi 7?

necesito algo similar a los nombres de las carpetas que genera windows para sus datos :

C:\Documents and Settings\Arturo\Local Settings\Application Data\Identities\{85B94AD4-5297-4D0E-BE2E-40086DFFF154}


Gracias de antemano.

Saludos!
Responder Con Cita
  #2  
Antiguo 13-11-2007
Avatar de dec
dec dec is offline
Moderador
 
Registrado: dic 2004
Ubicación: Alcobendas, Madrid, España
Posts: 13.119
Poder: 34
dec Tiene un aura espectaculardec Tiene un aura espectacular
Hola,

Puedes generar, precisamente, GUIDs (Globally Unique Identifier) en tiempo de ejecución:

Código Delphi [-]
uses
  ComObj, ActiveX;

function CreateGuid: string;
var
  ID: TGUID;
begin
  Result := '';
  if CoCreateGuid(ID) = S_OK then
    Result := GUIDToString(ID);
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
  Edit1.Text := CreateGuid;
  // or: Edit1.Text := CreateClassID
end;

El código anterior lo he recogido de un "tip" de Torry's Delphi Pages.

Nota: en tiempo de diseño en el editor de Delphi puedes generar GUIDs usando las teclas: CTRL + SHIFT + G
__________________
David Esperalta
www.decsoftutils.com
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
Codigo Seguridad estilo RapidShare mariosaurio .NET 2 28-04-2007 02:55:09
Huella Digital jorge restrepo Varios 2 18-07-2006 17:13:58
como burlar codigo de seguridad aleatorio? lookmydoom PHP 6 06-07-2006 20:01:48
Huella Digital luis_sencion Gráficos 1 23-06-2004 16:35:52
[Seguridad] Nuevos agujeros de seguridad en varios sistemas Windows ... kinobi Noticias 1 16-09-2003 11:42:54


La franja horaria es GMT +2. Ahora son las 00:54:56.


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