Club Delphi  
    Paypal   FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Varios
Registrarse FAQ Miembros Calendario Guía de estilo Buscar Temas de Hoy Marcar Foros Como Leídos

Coloboración Paypal con ClubDelphi

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 13-11-2005
Avatar de Lepe
[Lepe] Lepe is offline
Miembro Premium
 
Registrado: may 2003
Posts: 7.424
Poder: 31
Lepe Va por buen camino
Código Delphi [-]
 PROCEDURE SetVale(V:boolean);
BEGIN
V:=False;
END;
Por tu bien, declaralo así:
Código Delphi [-]
 PROCEDURE SetVale(Value:boolean);
BEGIN
V:=Value;
END;
Comentar que no le dabas el valor a V, sino que lo ponias a false.

En la librería, V no debería estar en la zona de interface, simplemente porque el usuario de la librería jamás va a acceder a la variable directamente, sino a través de Get y SetValue.

No he hecho la prueba, quizás ni siquiera se exporte esa variable, pero intuitivamente, al verla en la zona de interface, puede parecer que si se exporta. Es decir, deberás declararla en la zona de implementation.

Por otra parte, el error que tienes al usar la libreria es de nombres, en tu programa, no uses V para nada, Si necesitas una variable Boolean, declarala con otro nombre. En realidad, cuando usas la libreria, tienes que olvidarte de como está hecha, y solo prestar atención a GetValue y SetValue. Esa abstracción es indispensable para diseñar la dll correctamente, y también para poderla usar (OOP).

Como usuario de una libreria no tienes por qué saber como se llama esa variable, ni te hace falta.


Código Delphi [-]
 SetValue(checkbox1.checked);
 Checkbox2.Checked := GetValue;

Según actives o desactives el check1, se marcará el check2.

saludos
__________________
Si usted entendió mi comentario, contácteme y gustosamente,
se lo volveré a explicar hasta que no lo entienda, Gracias.
Responder Con Cita
  #2  
Antiguo 13-11-2005
Avatar de Lepe
[Lepe] Lepe is offline
Miembro Premium
 
Registrado: may 2003
Posts: 7.424
Poder: 31
Lepe Va por buen camino
Si me permites un detalle más, cuando hagas una dll, haz también un archivo .pas asociado a él. La libreria queda como ya la has hecho, el archivo .pas sería el siguiente:

Código Delphi [-]
Unit LibExport;

interface

 PROCEDURE SetVale(V:Boolean);
 FUNCTION GetVale:boolean;
implementation

 PROCEDURE SetVale(V);EXTERNAL 'Lib.dll';
FUNCTION GetVale:boolean; EXTERNAL 'Lib.dll';
end.

Imagina que tu librería vas a usarla en 2 programas distintos. Cuando vayas a usarla en el segundo programa, ya no recuerdas el nombre de las funciones ni los parámetros que lleva, entonces, tienes que abrir el primer programa, ver las declaraciones y copiar / pegar en el segundo programa.

Al hacer este .pas, en el segundo programa, solo añades la unidad LibExport y accedes a su contenido; ya puedes ver las declaraciones. De hecho es como lo hace la VCL.

saludos
__________________
Si usted entendió mi comentario, contácteme y gustosamente,
se lo volveré a explicar hasta que no lo entienda, Gracias.
Responder Con Cita
  #3  
Antiguo 13-11-2005
pepecharlie67 pepecharlie67 is offline
Miembro
 
Registrado: nov 2005
Posts: 48
Poder: 0
pepecharlie67 Va por buen camino
Ya lo he conseguido arreglar.Muchas gracias a los que se han molestado en ayudarme.Me habeis servido de mucha ayuda.Gracias!
Responder Con Cita
Respuesta


Herramientas Buscar en Tema
Buscar en Tema:

Búsqueda Avanzada
Desplegado

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


La franja horaria es GMT +2. Ahora son las 05:57:28.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2026, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi