Pascal Script Help in 3rd party development

Farhan · 2008-09-12 18:28

The question to ask is that that how how can
i Figure out that my script is exectued if i just Get the procedure from
the script and run it.I know i can Find it By ONAFTEREXECuTE Event But
When I TRIED to Run the Script Function it will Report as soon as Form is Created .The
Script is as Follows:

var
  MyForm: TForm;
  Btn: TButton;

procedure BtnClick(Sender: TObject);
begin
  if Btn.Caption = 'Play' then
 Begin
  Btn.Caption := 'Pause'
 End
  else
 Begin
  Btn.Caption := 'Play';
 End;
end;

Function ONRun():String;
Begin
  Result := '';

  MyForm := TForm.Create(nil);
  MyForm.FormStyle := fsStayOnTop;
  MyForm.Width := 200;
  MyForm.Height := 200;
  MyForm.Position := poScreenCenter;
  MyForm.Show;
  MyForm.Caption := 'Test Form';
  Btn := TButton.Create(MyForm);
  Btn.Parent := MyForm;
  Btn.Left := 2;
  Btn.Top := 2;
  Btn.Width := 75;
  Btn.Height := 25;
  Btn.Caption := 'Click me';
  Btn.OnClick := @BtnClick;

  Result := 'Done';

End;

as because i want to get Result from the script after execting the function ONRun.and The Script Should Send me 'Done' String Reply After Form is closed and script Function is executed.Or Any Suggestions for this if i m wrong.

The Event ONAFTEREXECuTE fire as soon as it creates the window that will be created by script.and when i close the form that is created by the script i Cant see any event fire.Please help me out.Just Try it your self.Thanks. waiting for your reply.I am Using The Latest Svn Version of Pascal Script.

den4b · 2008-09-14 13:37

Here I provide support only for my programs, and it does not include 3rd party components which happened to be used within my programs.

You need to go to RemObjects.com and ask them this question.

den4b Forum

#1 2008-09-12 18:28

Pascal Script Help in 3rd party development

#2 2008-09-14 13:37

Re: Pascal Script Help in 3rd party development

Board footer