call procedure/function on other form

[donlego]

hi..

is there any way to call function / procedure on other form like

if i have function/procedure on form  error

i create procedure like this

procedure TFrmError.Run(arun: integer; acaption: string; errornya: tstringlist);
var FrmError:TUniForm;
begin
  screen.Cursor := crhourglass;
  FrmError := TFrmError.Create(nil);
  with FrmError do
  begin
    try

      Caption := acaption;
      if caption = '' then caption := 'Error';
      caption := application.Title;
      Memo1.Text := errornya.Text;

      Memo1.Color := color;
      if FileExists(ExtractFilePath(Application.ExeName) + 'img\error.png') then
        Image1.Picture.LoadFromFile(ExtractFilePath(Application.ExeName) + 'img\error.png');
      FormStyle := fsStayOnTop;

      ShowModal;
    finally
      screen.Cursor := crDefault;
      FreeAndNil(FrmError);
    end;
  end;
end;

how i call that form procedure or function from another form ?

 

 

 

thanks

[Sherzod]

Hi,

 

Which edition and build are you using ?!

 

Best regards,

[donlego]

I use last unigui trial on unigui website with delphi xe7