FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
#1
|
||||
|
||||
Dll de delphi en C#
Hola buenas tardes, les molesto porque tengo un problema y necesito de su ayuda:
Tengo una DLL realizada en delphi 6 para encriptar y desencriptar string con el siguiente codigo: El cual funciona perfectamente en delphi pero al intentar usarlo en C# con el siguiente codigo: Código:
using System; using System.Collections.Generic; using System.ComponentModel; using System.Data; using System.Drawing; using System.Text; using System.Windows.Forms; using System.Runtime.InteropServices; namespace prueba { public partial class Form1 : Form { [DllImport("Rijndael.dll")] public static extern String Encriptar(string Dato, string Clave1, string Accion); public Form1() { InitializeComponent(); } private void button1_Click(object sender, EventArgs e) { textBox2.Text = Encriptar(textBox1.Text, textBox3.Text, "1"); } private void button2_Click(object sender, EventArgs e) { textBox2.Text = Encriptar(textBox1.Text, textBox3.Text,"0"); } } } No se controló System.AccessViolationException Message="Intento de leer o escribir en la memoria protegida. A menudo, esto indica que hay otra memoria dañada." Source="prueba" StackTrace: en prueba.Form1.Encriptar(String Dato, String Clave1, String Accion) en prueba.Form1.button1_Click(Object sender, EventArgs e) en C:\Documents and Settings\wloose\Escritorio\prueba123\prueba\Form1.cs:línea 27 en System.Windows.Forms.Control.OnClick(EventArgs e) en System.Windows.Forms.Button.OnClick(EventArgs e) en System.Windows.Forms.Button.OnMouseUp(MouseEventArgs mevent) en System.Windows.Forms.Control.WmMouseUp(Message& m, MouseButtons button, Int32 clicks) en System.Windows.Forms.Control.WndProc(Message& m) en System.Windows.Forms.ButtonBase.WndProc(Message& m) en System.Windows.Forms.Button.WndProc(Message& m) en System.Windows.Forms.Control.ControlNativeWindow.OnMessage(Message& m) en System.Windows.Forms.Control.ControlNativeWindow.WndProc(Message& m) en System.Windows.Forms.NativeWindow.DebuggableCallback(IntPtr hWnd, Int32 msg, IntPtr wparam, IntPtr lparam) en System.Windows.Forms.UnsafeNativeMethods.DispatchMessageW(MSG& msg) en System.Windows.Forms.Application.ComponentManager.System.Windows.Forms.UnsafeNativeMethods.IMsoCompo nentManager.FPushMessageLoop(Int32 dwComponentID, Int32 reason, Int32 pvLoopData) en System.Windows.Forms.Application.ThreadContext.RunMessageLoopInner(Int32 reason, ApplicationContext context) en System.Windows.Forms.Application.ThreadContext.RunMessageLoop(Int32 reason, ApplicationContext context) en System.Windows.Forms.Application.Run(Form mainForm) en prueba.Program.Main() en C:\Documents and Settings\wloose\Escritorio\prueba123\prueba\Program.cs:línea 17 en System.AppDomain.nExecuteAssembly(Assembly assembly, String[] args) en System.AppDomain.ExecuteAssembly(String assemblyFile, Evidence assemblySecurity, String[] args) en Microsoft.VisualStudio.HostingProcess.HostProc.RunUsersAssembly() en System.Threading.ThreadHelper.ThreadStart_Context(Object state) en System.Threading.ExecutionContext.Run(ExecutionContext executionContext, ContextCallback callback, Object state) en System.Threading.ThreadHelper.ThreadStart() supongo que el error es por incompatibilidad en las variable pero me resulta extraño por que uso variable tipo PChar en la DLL que son compatible con string en C# (el array de char termina con 0x00) alguno me podria ayudar o orientarme cual es el problema. Desde ya muchas gracias |
#2
|
||||
|
||||
Aporto un dato mas, estuve haciendo pruebas:
Solo no me tira error cuando el dato que entrega la función es estatico ejemplo: Si encambio si el resultado debe intercatuar con la entrada (es lo que quiero) me tira el error que mencione en el pos anterior |
#3
|
||||
|
||||
Hola,
No te ofreceré la solución a tu problema, pero, al menos podré demostrar cómo utilizar una DLL escrita en Delphi tanto en Delphi como en CSharp. Se trata de una DLL "Cifrador.dll" que cuenta, precisamente, con una sola función que puede usarse para cifrar y descifrar cadenas. Nada. Para compilar la DLL será necesario contar, pues, con la última versión (Beta) de los componentes DCPcrypt para Delphi de David Barton. Por otro lado hago uso de la unidad "UCifrador.pas" que hace poco adjunté en otro Hilo en que tratamos de estos componentes. En cuanto a la aplicación cliente que utiliza la DLL "Cifrador.dll" escrita en CSharp he utilizado el programa CSharp Develop. Para la aplicación cliente escrita en Delphi he utilizado Delphi 7. Pero, en fin, lo mejor es que le eches un vistazo. En el archivo que enlazo a continuación se incluye el código fuente de la DLL "Cifrador.dll", el código fuente de la aplicación escrita en Delphi y el de la escrita en CSharp. Sin embargo también podrán encontrarse los binarios, tanto de la DLL como de las aplicaciones. Tú échale un vistazo al asunto y nos cuentas qué sacas en claro, los problemas que te encuentres, en fin, que ya sabes dónde estamos. Usar DLL de Delphi tanto en Delphi como en CSharp, 493 KB en formato Zip * Nota: Para ejecutar la aplicación (escrita en CSharp) ya compilada será preciso el .NET FrameWork Redistributable Package 2.0 (ahí queda eso). Última edición por dec fecha: 27-11-2006 a las 16:45:22. |
#4
|
||||
|
||||
Si de encriptar y desencriptar en .net se trata, lo mejorcito que he visto es:
http://www.codeproject.com/dotnet/xcrypt.asp
__________________
Héctor Geraldino Software Engineer |
#6
|
||||
|
||||
Hola,
Es posible que sea lo que dices, pero, en el "ejemplo" que preparé no hago uso de esa palabra clave y todo parece funcionar bien... échale un vistazo. Comprendo que no era la solución que precisabas, pero, tal vez puedas adaptarlo a tus necesidades. |
#7
|
|||
|
|||
DEC: Ya no se encuentra el enlace
Revivo este hilo -que ya hace bastante estaba empolvado-
DEC: el enlace de tu ejemplo no existe, ¿lo tendras en algun otro lado? Andamos explorando por el lado de C#
__________________
ESTO ES UN FORO ... NO UN MÓVIL ¿Por qué no escribir de una manera comprensible para que los humanos lo podamos entender? |
#8
|
|||
|
|||
Hola acertij022, tengo el mismo problema que plateaste, pero en mi caso no le veo la solución, uso los mismos componentes que tu en la dll delphi para encriptar y desencriptar pero no me funciona desde c#, podrías poner el código exacto en c# con el que pudiste correr la aplicación, Gracias de antemano
|
|
|
Temas Similares | ||||
Tema | Autor | Foro | Respuestas | Último mensaje |
Consulta Delphi 6, Delphi 2005 y Delphi 2006 | Leviatan | Varios | 6 | 18-08-2007 16:02:08 |
|