Array
(
)

Como Pegar o valor de uma variavel de uma outra unit ?

Pestana
   - 26 nov 2005

blz amigos,

Como fazer para pegar o valor de uma variavel que está em uma outra unit ?
Ex.: na unit1 tenho uma variavel chamado A que recebe o valor da variavel B que
se encontra na Unit2.


abraços.
Pestana.


Raserafim
   - 26 nov 2005

primeiramente vc precisa declarar a variável como global. isso é feito declarando na cessão interface. é o VAR que fica logo acima do implementation, onde fica declarada a variável com o nome do for,
agora basta ir no outro form e declarar a unit do primeiro form.

form1
#Código


unit Uform1;

interface
...
...
var
form1: Tform1;
A: integer;

implementation
...


form2
#Código

unit Uform2;

interface
...
...
var
form2: Tform2;
B: integer;

implementation

uses Uform1;
...


para atribuir o valor. no form2...
#Código

form1.A := B;



Pestana
   - 28 nov 2005

blz amigo,

deu certo o que eu estava querendo.


abraços!
Pestana.