programar un (login) o logeo o inicio de secion

[Diego E.]

Hola einer, es muy sencillo lo que debes hacer es que en tu form 2 en el código abajo de implementation pongas:

uses NombreDeTuForm1

después de eso puedes usar el evento OnShow de tu form para que al mostrarse copie el nombre, tu form 2 quedaría algo asi:

unit NombreForm2;

interface

uses
  Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics,
  Vcl.Controls, Vcl.Forms, Vcl.Dialogs, Vcl.StdCtrls, Vcl.ExtCtrls;

...

implementation

uses Form1;

procedure TForm2.FormShow(Sender: TObject);
begin
    Form2.label1.caption := Form1.edit1.text;
end;