Why class and init are in the different units?
TForm1 = class(TForm)
procedure FormCreate(Sender: TObject);
private
{ private declarations }
public
{ public declarations }
x,y: integer;
tester1: TTest;
end;
...
procedure init(a,b: integer; MainForm: TForm1);
Why not to move init to the TForm1?
Such problems are often happen when either you don't own a piece of code
and therefore can't modify it or your code is designed bad.
Best regards,
Paul Ishenin.
--
_______________________________________________
Lazarus mailing list
[email protected]
http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus
