Club Delphi  
    Paypal   FTP   CCD     Buscar   Trucos   Trabajo   Foros

Go Back   Foros Club Delphi > Principal > Varios
Register FAQ Members List Calendar Guía de estilo Search Today's Posts Mark Forums Read

Coloboración Paypal con ClubDelphi

Reply
 
Thread Tools Search this Thread Display Modes
  #1  
Old 26/11/2004
maruenda maruenda is offline
Miembro
 
Join Date: Oct 2003
Location: elche
Posts: 173
Poder: 23
maruenda Va por buen camino
Thumbs down obtener valor de otro form

hola a tod@s. veamos...
tengo 3 formularios, A,B,C.
en la clausula uses de A llamo a B.
Y en la clausula uses de B llamo a C.

ahora quiero que en una etiqueta de C aparezca el valor de una etiqueta que hay en A.

Si pongo en uses de C una llamada a A, me da error por referencia circular.

he pensado en definir una funcion en A, que sea accesible para todos los formularios de la aplicacion. He probado poniendola en public de A, pero no funciona. Alguna ayuda sobre este tema ? gracias por adelantado.

Por cierto, la ayuda de delphi7 es de lo peor que he visto en mucho tiempo.
__________________
frenadol
Reply With Quote
  #2  
Old 26/11/2004
roman's Avatar
roman roman is offline
Moderador
 
Join Date: May 2003
Location: Ciudad de México
Posts: 20,269
Poder: 10
roman Es un diamante en brutoroman Es un diamante en brutoroman Es un diamante en bruto
Pon a A en el uses de C pero en la sección implementation.

// Saludos
Reply With Quote
  #3  
Old 26/11/2004
maruenda maruenda is offline
Miembro
 
Join Date: Oct 2003
Location: elche
Posts: 173
Poder: 23
maruenda Va por buen camino
Wink

gracias roman. A la primera.
por cierto, que diferencia hay entre interface e implementation ?
__________________
frenadol
Reply With Quote
  #4  
Old 26/11/2004
roman's Avatar
roman roman is offline
Moderador
 
Join Date: May 2003
Location: Ciudad de México
Posts: 20,269
Poder: 10
roman Es un diamante en brutoroman Es un diamante en brutoroman Es un diamante en bruto
La sección interface es la parte pública de la unidad, donde se declaran los tipos de datos, funciones, procedimientos, etc. qe pueden ser vistos por cualquier otra unidad.

La sección implementation es la parte privada de la unidad, donde se establece la funcionalidad de ésta, implementando las funciones,
procedimientos y métodos declarados en la sección interface.

Esta sección también puede declarar tipos de datos, funciones y procedimientos pero sólo serán para uso interno ya que no son visibles a ninguna otra unidad.

// Saludos
Reply With Quote
  #5  
Old 26/11/2004
roman's Avatar
roman roman is offline
Moderador
 
Join Date: May 2003
Location: Ciudad de México
Posts: 20,269
Poder: 10
roman Es un diamante en brutoroman Es un diamante en brutoroman Es un diamante en bruto
Por cierto. Aunque lo anterior haya solucionado el problema te comento que muchas veces el que una unidad de formulario tenga que incluir a otra unidad de formulario es reflejo de que algo no anda bien en el diseño: tus formularios dependen unos de los otros y cambios en la codificación de uno afectarán a otros haciendo el mantenimiento de la aplicación una tarea de héroes.

// Saludos
Reply With Quote
  #6  
Old 26/11/2004
unreal4u's Avatar
unreal4u unreal4u is offline
Miembro
 
Join Date: Nov 2004
Location: Temuco, Chile
Posts: 105
Poder: 22
unreal4u Va por buen camino
sáquenme entonces de una duda:

¿por qué no incluir B y C dentro de A? Creo que igual debería funcionar... ¿o no? Además, se evitan estos problemas de diseño de esta manera...
__________________
Código Delphi [-]
procedure Gracias; 
begin
 if Respuesta_a_Mensaje = TRUE then showmessage('Ojalá que te sirva')
 else showmessage('Gracias por responder... :-)');
end; // (c) unreal4u
Reply With Quote
Reply


Thread Tools Search this Thread
Search this Thread:

Advanced Search
Display Modes

Posting Rules
You may not post new threads
You may not post replies
You may not post attachments
You may not edit your posts

vB code is On
Smilies are On
[IMG] code is On
HTML code is Off
Forum Jump


All times are GMT +2. The time now is 21:10.


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