Hallo,
da es sich um eine Klasse handelt,
übergebe die Variable deinem Unterprogramm als Parameter.
Delphi-Quellcode:
Datei: UEB.pas
TForm1 = class(TForm)
K_EB_DCM: TK_EB_DCM;
implementation
procedure TForm1.LoadData;
begin
_LoadData(K_EB_DCM);
end;
==========================
Datei U_EB_DCM.pas
interface
procedure _LoadData(theK_EB_DCM: TK_EB_DCM);
implementation
procedure _LoadData(theK_EB_DCM: TK_EB_DCM);
begin
theK_EB_DCM.Name:= 'hoika' ;)
end;
Heiko