Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Buscar en los Foros
Actualizar esta página Resultados de Búsqueda
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Mostrando resultados del 1 al 1 de 1
La búsqueda tomó 0,00 segundos. Buscar: Mensajes Hechos Por: Casimiro Notevi
Foro: Trucos 20-06-2006
Respuestas: 5
Visitas: 5.416
Escrito Por Casimiro Notevi
Yo lo tengo un poco más simplificado: function...

Yo lo tengo un poco más simplificado:


function LetraNIF( NIF:integer): Char;
const S = 'TRWAGMYFPDXBNJZSQVHLCKET';
begin
result := S[(NIF mod 23)+1];
end;
Mostrando resultados del 1 al 1 de 1

 
Saltar a Foro

La franja horaria es GMT +2. Ahora son las 08:08:36.

Club Delphi - Archivo - Top

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