Hola,
Algo similar a esto, quizás:
Código Delphi
[-]
type
TClase = class
public
Directorios: string;
end;
TClaseMaestra = class(TForm)
private
AppDirectorios: TClase;
function GetDirectorios(): string;
public
property Directorios: string read GetDirectorios;
end;
implementation
function TClaseMaestra.GetDirectorios(): string;
begin
result := Self.AppDirectorios.Directorios;
end;