Delphi - Pasar datos entre forms

Hola! Mi problema es el siguiente:

Tengo una tabla de operarios con ClavePpal:Codic y una tabla de movimientos donde entre otras cosas guardo la Claveppal de operarios codic.

En el form de movimientos tengo un dbedit de Codic y mediante un boton accedo a un formulario de datos del operario donde el usuario busca al operario y pulsa aceptar que cierra el form. Cuando esta cerrado en el form de movimientos ha de aparecer el codigo de operario.
el formulario de operarios tiene dos botones de desplazamiento y cuando el usuario lo encuentra pulsa acaptar
Este es el codigo que he hecho yo:

Este es el codigo de form Operarios: CodicF es una variable global de tipo integer que en teoria es la que me recoge el valor del dbedit.
function ConsultarOperaris: Integer;
Begin
with TFMantenimentOperaris.Create(nil) do
begin
result:=0;
toolbar2.Visible := false;
toolbar1.Visible := true;
Show;
if ModalResult = MrOk then
begin
CodicF := TPpalCodic.Value;
result := CodicF;
end;
end;
end;

Y este es el codigo que llama a esta funcion desde el formulario Movimientos:

procedure TFMovimentsRegistre.AcOmplirOperariExecute(Sender: TObject);
var
codic:integer;
begin
codic := ConsultarOperaris;
EditCodicFuncionari.Text :=IntToStr(Codic);
end;