Hola amigos
Ya solucione el detalle de pasar el valor de la propiedad de mi componente
.
Código Delphi
[-]
procedure TSubKeyProperty.Edit;
begin
frmSubKey := TfrmSubKey.Create(Application);
try
frmSubKey.Caption := 'Selecciona SubKey';
frmSubKey.stKey.Caption := TRegEditor(GetComponent(0)).Key;
frmSubKey.ShowModal;
if frmSubKey.ModalResult = mrOK then begin
SetStrValue(frmSubKey.stSubKey.Caption);
designer.Modified;
end;
finally
frmSubKey.Free;
end;
end;
Usé lo que me recomendaron
GetComponent(0) pero con el nombre de la propiedad del componente (
Key).
Salud OS y gracias