PDA

Ver la Versión Completa : DLL Delphi


pepelu
27-11-2006, 18:19:45
estoy desarrollando una dll desde delphi cuyas funciones deben ser llamadas desde C, C++.

Se trata de cambiar el contenido de un tipo de dato C desde mi funcion delphi

Mi codigo Delphi es el siguiente...

Function CambiaValor(Datos:Pchar):integer;stdcall
var
Bucle:Integer;
CadenaFinal:Array[0..100] of Char;
Caracter:char;

begin


StrPcopy(CadenaFinal,'Esta es la cadena con la que se va a rellenar...');

Cambiamos el contenido de Datos con los de la variable CadenaFinal

For Bucle := 0 to 100 do begin
Caracter := CadenaFinal[Bucle];
if Caracter = #0 then break; // Si es final de cadena, salimos
Datos[Bucle] := Caracter;
end;



Result := 1;



En Mi codigo C, defino la variable..
char *Cadena;

Si inicializo la variable con algun valor, antes de llamar la funcion por ejemplo si hago :
Cadena = " " y luego llamo a mi funcion CambiaValor(Cadena) , funciona perfectamente
pero si llamo a mi funcion sin inicializar la variable,, entondes peta...

La pregunta es ,, ¿Como puedo inicializar esta variable desde mi funcion delphi, con algun valor...
He probado con FillMemory, CopyMemory pero no me funciona o no lo estoy haciendo bien.....


Gracias y saludos

Ñuño Martínez
27-11-2006, 18:30:32
Pero, cuando peta... ¿cómo peta? O sea: peta, vale, pero... ¿de qué manera? :rolleyes:

Creo que me has entendido, ¿no? ;)

[edit] Sé cual es el problema, estoy convencidísimo, pero hasta que no des más información no te lo digo.

seoane
27-11-2006, 18:35:00
Un momento, la variable Cadena la defines en C como un puntero, pero ¿a donde apunta ese puntero?, y lo mas importante, ¿cual es el tamaño del buffer al que apunta?.

Ñuño Martínez
27-11-2006, 18:52:44
Un momento, la variable Cadena la defines en C como un puntero, pero ¿a donde apunta ese puntero?, y lo mas importante, ¿cual es el tamaño del buffer al que apunta?.

Justo lo que estaba yo pensando...:rolleyes: