Variablen über Formularen

[JP29]

ok das hab ich jetzt so weit verstanden nur die umsetzung mit den units noch nicht ganz also praktisch gesehen
ich zeig euch mal ein bischen von meinem quelltext und könnt ihr mir dort zeigen wie dir beiden units aufeinander zugreifen können...

unit 1:

Delphi-Quellcode:

unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls, ExtCtrls, Spin;

type
  TForm1 = class(TForm)
    GroupBox1: TGroupBox;
    Panel1: TPanel;
    GroupBox2: TGroupBox;
    GroupBox3: TGroupBox;
    Label1: TLabel;
    Label2: TLabel;
    Label3: TLabel;
    Label4: TLabel;
    Label5: TLabel;
    Label6: TLabel;
    ComboBox1: TComboBox;
    ComboBox2: TComboBox;
    ComboBox3: TComboBox;
    ComboBox4: TComboBox;
    Label7: TLabel;
    Label8: TLabel;
    GroupBox4: TGroupBox;
    SpinEdit1: TSpinEdit;
    Label9: TLabel;
    Button1: TButton;
    procedure ComboBox1Change(Sender: TObject);
    procedure ComboBox3Change(Sender: TObject);
    procedure ComboBox2Change(Sender: TObject);
    procedure ComboBox4Change(Sender: TObject);
    procedure Button1Click(Sender: TObject);
  private
    { Private-Deklarationen }
  public
    { Public-Deklarationen }
  end;

var
  Form1: TForm1;
  abholung: string;
  ruckgabe: string;
  dauer: integer;

implementation

uses Unit2;

{$R *.dfm}

und unit2:

Delphi-Quellcode:

unit Unit2;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, ExtCtrls, StdCtrls;

type
  TForm2 = class(TForm)
    Panel1: TPanel;
    ListBox1: TListBox;
    GroupBox1: TGroupBox;
    Image1: TImage;
    GroupBox2: TGroupBox;
  private
    { Private-Deklarationen }
  public
    { Public-Deklarationen }
  end;

var
  Form2: TForm2;
  abholung1: string;
  ruckgabe1: string;
  dauer1: integer;

implementation

uses unit1;

{$R *.dfm}

end.

...ist das jetzt so richtig ...

und kann ich jetzt auch mit einer procedure in form1 variablen in form2 verändern ??

und wie ist das wenn ich in beiden units variablen mit gleichem namen erstelle ... erkennt delphi das??

dankle schon mal im voraus...bis jetzt großes dankeschön an alle