miren Tengo estas dos unidades
Código Delphi
[-]unit Unit11;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, DB, DBTables,Unit2;
type
TForm1 = class(TForm)
Edit1: TEdit;
Button1: TButton;
procedure Button1Click(Sender: TObject);
private
public
end;
var
Form1: TForm1;
usuario:TUsuario;
implementation
{$R *.dfm}
procedure TForm1.Button1Click(Sender: TObject);
begin
usuario.poner(Edit1.Text);
end;
end.
y esta
Código Delphi
[-]unit Unit2;
interface
uses
Classes,Dialogs;
type
TUsuario=class
private
cuenta:String;
public
procedure Poner(cuenta_:string);
end;
implementation
procedure Tusuario.Poner(cuenta_ : string);
begin
cuenta:=cuenta_;
ShowMessage(cuenta);
end;
End.
Por QUE no puedo almacenar desde unit11 a unit2 en la variable
cuenta
por favor corrijanme por que no puedo almacenar en CUENTA