form := NewForm(Applet, 'text').SetSize(800, 600);[/code]
VCL
form := TForm.Create(Application);
form.Caption := 'text';
form.width := 800;
form.height := 600;

еще пример:
KOL
procedure onMouseDown(Sender: PControl; var Mouse: TMouseEventData);
begin
  if Mouse.X > Mouse.Y then
     Sender.Text := 'X > Y';
end;

VCL
procedure onMouseDown(Sender: TObject; x,y:integer; shift:TShiftState);
begin
  if X > Y then
    TEdit(Sender).Text := 'X > Y';
end;

обрати внимание, что без полного разбора исходника с большой базой дополнительных знаний перевести одно в другое не выдет, поскольку нужно знать какие ф-ции к каким конкретно событиям привязаны, а так же точные соответствия между элементами пакета.