Almacenando datos en una variable de otra unidad
 

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
{ Private declarations }
public
{ Public declarations }
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

"cuenta" es una variable privada. Para poder acceder debería ser pública o existir una propiedad pública asociada a ella.

Almacenando datos en variables de otra unidad
 

Esa solucion tb ya la habia intentando
pero como veras Poner es un procedimiento de TUsuario entonces este procedimiento que es publico deberia permitir acceder a variables incluso PRIVADAS como cuenta

Pdta.Estoy usando delphi 2007

Hola,

Dices que no puedes acceder a la variable "cuenta", lo que es lógico, por ser privada, pero, dices también que no puedes cambiar su valor (supongo que dices esto) desde el método público que preparaste para tal fin. Ahora bien, ¿qué error obtienes? Sería importante que lo refieras aquí.

almacenando datos en variables de otra unidad
 

me sale error de escritura y una direccion de memoria

compilando primer mensaje
 

SI compilan el codigo de las 2 primeras unidades se daran cuenta a que error me refiero

Hola,

Claro. Pero, si lo copias tú aquí exactamente, nos ahorramos tener que hacer lo que dices. Es más sencillo que tú copies el texto íntegro del error aquí, a que todos nosotros tengamos que compilar el código para averiguar por nuestra propia cuenta de qué error se trata. ¿No te parece?

Tal como dice dec, lo correcto es que pongas tú el mensaje de error en lugar de que nosotors andemos adivinándolo.

Pero bueno, con mi ojo compilador te diré que falta la construcción del objeto Usuario. No puedes simplemente declarar una variable objeto y utilizarla, debes primero construirla.

// Saludos

Hola,

A no ser que se tratara de una clase "estática". Pero, en todo caso, puede que los tiros vayan por donde dices Román.

Tienes razón, delphi ya soporta eso ¿verdad? Pero, en todo caso tendría que declararse como tal ¿no?

// Saludos

Hola,

Sí; y además no estoy seguro de si una clase "estática", que es aquella que tiene al menos un método "estático" o "de clase", puede contar con miembros tal que variables... porque no me queda claro de qué modo se inicializarían. En PHP es posible contar con variables estáticas en clases estáticas, pero, si te digo la verdad tampoco me queda muy claro su inicialización...

Pero, vamos, que sí, que yo he salido un poco por los cerros de Úbeda, y que la clase que nos muestra el compañero no parece estática, así que no aplicaría lo que yo digo, sino es tomando por el extremo lo que tú has dicho. Y no es plan. :D

Efectivamente, la respuesta que te dieron es correcta! Debes llamar al constructor. Si no implementas uno nuevo, llamará al de la superclase. Por tanto el código quedaría algo así:

Del mismo modo, el error se produjo al llamar a un objeto de la clase (un TEdit), sin haber creado una instancia de TUsuario. Si hubieras puesto una cadena constante, habría "colado":

Un saludo.