[vtdeleon]

Empezado por modulay

...

Código Delphi [-]
...
...
  constructor Tbarco1.crear(dimens,x,y,ancho,alto : integer);
  begin
    inherited Create(nil);
    self.vert := false;
    self.dim := dimens;
    self.pro := Point(0,0);
    self.pop := Point(0,0);
    self.Width := ancho;
    self.Height := alto;
    self.Left := x;
    self.Top := y;
self.caption := '';
end;
end.

...

Que extra~o, habia hecho "casi" exactamente esto y no me funciono. Seguro me "comi" algo

Saludos