![]() |
![]() |
![]() |
![]() |
![]() |
FTP | ![]() |
![]() |
CCD | ![]() |
![]() |
Buscar | ![]() |
![]() |
Trucos | ![]() |
![]() |
Trabajo | ![]() |
![]() |
Foros | ![]() |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
![]() |
|
Herramientas | Buscar en Tema | Desplegado |
|
#1
|
|||
|
|||
cifrado de hill y manejo de cadenas
ola a todos!
estoy realizandi un cifrado de hil en delphi 7 : la parte en la que me atoro es enseparar la cadena en parejas ejemplo cadena:=sistemas; debe de quedar asi: cadena:=si st em as; entonce tomo la primer pareja que es 'si', entonces le asigno varibles a cada caracter c1:='s'; y c2:='i'; osea que lo hago asi c1:=cadena[1]; c2:=cadena[2]; entonces ya tengo las variables y las encripto y me arroja el resultado asi: edit3.text:=hm; entonces no me sale el codigo pára que valla recorriendo la cadena y me valla asignando a c1 y c2 de los caracteres de la cadena, para que despues c1:=s; c2:=t; despues de encriptarlo c1 y c2 cambien a c1:=e; y c2=m; y me imprima edit3.text:=hmemxuta ojala y me halla explicado gracias por su ayuda de antemano |
#2
|
||||
|
||||
Hola isaacrg, por lo que he entendido tu problema esta en recorrer e ir tomando dos caracteres cada ves, puedes hacerlo de esta forma:
Saluditos
__________________
Disfruten cada minuto de su vida a lado de sus seres queridos como si fuese el ultimo, uno nunca sabe lo que puede pasar. |
#3
|
|||
|
|||
hola gracias CARO por tu ayuda la verdd en este momento no puedo comrobar el codigo pero llegando a casa lo intentare asi..
entonces si tengo otra duda te volvere a responder GRACIAS!! |
#4
|
|||
|
|||
Problema con Cadena
Cadena:='holamundos';
AuxCadena := Cadena; While AuxCadena<>'' do begin C1 := AuxCadena[1]; C2 := AuxCadena[2]; // ............................... //Tomamos todo menos los dos primeros caracteres AuxCadena := Copy(AuxCadena, 3, Length(AuxCadena)); edit3.Text:=AuxCadena; end; hola Caro disculpa pero tengo una duda del codigo que me diste... si coloco la linea de edit3.text:=AuxCadena; se supone que me arroja asi:: AuxCadena:'lamundos'; y no me arroja nada.... creo que me enrede feo . gracias |
#5
|
|||
|
|||
¡He aquí la solución a todos tus problemas! Jajaja acá te muestro como separar un texto en parejas de caracteres:
Creo que eso es lo que querías. Saludos! EDITO: eso es lo que entendí yo, pero no sé si es lo que pedías. Última edición por BrunoBsso fecha: 20-03-2010 a las 00:37:21. Razón: Guada te amo |
#6
|
|||
|
|||
Cifrado Resuelto
Gracias por su ayuda encontre mi duda y ya termine el cifrado.
Ahora alguien digame si el tema se elimina solo? o asi hay que dejarlo. gracias una vez mas por la ayuda |
![]() |
|
|
![]() |
||||
Tema | Autor | Foro | Respuestas | Último mensaje |
Cifrado AES-256 | seoane | Varios | 19 | 25-10-2013 19:04:55 |
Manejo de cadenas de texto. | mcasso | Varios | 3 | 18-03-2010 07:23:24 |
Mensaje cifrado | Faust | Humor | 1 | 06-11-2008 19:36:42 |
HTTP ¿cifrado? N.P.I | lag_0 | Internet | 3 | 13-04-2007 09:04:29 |
Manejo de cadenas en c++ builder | Picard | C++ Builder | 9 | 30-05-2004 00:24:10 |
![]() |
|