Como buscar dados de outra unit?

Question

Como fa�o para buscar o valor  de uma vari�vel de outra unit?Ex.Vari�vel texto1 da unit1 tem que ser igual a texto2 de unit2....

Marcelo Saviski · Answer

Pode fazer normalmente, basta declrara aa units em que as vari�veis est�o no uses da unit que precisa fazer a compara��o:

unit Unit1;

interface
  var texto1: string;

implementation
...........

unit Unit2;

interface
  var texto2: string;

implementation
...........

unit Unit3;

interface
  
  uses Unit1, unit2;
  function Compara: Boolean;

implementation

function Compara: Boolean;
begin
  Result := Texto1 = Texto2;
end;
...........

Pode fazer [color=green:68da86cd1d] Result := Unit1.Texto1 = Unit2.Texto2;[/color:68da86cd1d]
se preferir ou se ouver uma variavel com mesmo nome na Unit atual

Michele · Answer

N�o sei se entendi direito, mas pelo que entendi de dentro da unit2 posso atribuir um valor para texto1.

unit Unit2; 

interface 
  var texto2: string; 

implementation
Texto1:=10;

e n�o entendi o que �

Result := Texto1 = Texto2;

Marcelo Saviski · Answer

Result := Texto1 = Texto2;� a mesma coisa que:if Texto1 = Texto2 then  result := Trueelse  Result := False;Result � o resultado da fun��o, � o valor que vai ser passado quando vc chamar: Compara;mas vc n�o precisa de uma fun��o, pode colocar o c�digo direto aonde vc ir� trata-loex; em um bot�o:if Texto1 = texto2 then showMessage(�s�o iguais�) else ShowMessage(�s�o diferentes�);...

F�rum Como buscar dados de outra unit? #190990