Delphi. Передача параметров в процедуру

[*stRong*]

Доброе время суток! Не могу понять, как реализовать программу, принцип работы которой таков:

Есть 2 формы, в одной форме есть программа, состоящая в основном из процедур с входными параметрами, а во второй форме есть поле memo.

При запуске проекта должна показываться вторая форма. В поле memo мы должны вводить какую-то команду, чтобы в юните первой формы изменялись входные параметры процедуры и программа запускалась измененной. Короче, вот простыми словами:

Например в юните первой формы есть процедура:

 procedure TForm1.line(i,j:integer);
  begin 
   Image1.Canvas.MoveTo(i,j);
   Image1.Canvas.LineTo(i+40,j+40);
  end;
  
   begin
    line(i,j);
   end.

А во второй форме, в поле мемо должны прописать команду, например

drawline(10,20);

Так вот, эта самая команда должна передать свои параметры (10,20) в параметры процедуры Line первой формы. Т.е. мы изменяем программу первой формы, вводя команды во вторую. Подскажите, пожалуйста, как можно это реализовать? Программа первой формы уже написана, интересует передача параметров из мемо в процедуры первой формы.
Заранее спасибо.

[Mad_Cat]

ну например так
в uses 2 формы добавляем unit с формой 1

s:=Memo.Lines[0]
com:=Copy(s,1,pos('(',s)-1);
if com = 'drawline' then 
begin
delete(s,1,pos('(',s));
param1:=Strtoint(copy(s,1,pos(',',s)-1));
delete(s,1,pos(',',s));
param2:=Strtoint(copy(s,1,pos(')',s)-1));
form1.line(param1,param2);
end;