anchor.diff:  IMPLEMENTATION
   
   {$R *.lfm}
  +{$R *.res}
   
   { TwinSize }
   
  
positive.code: INTERFACE
  
  USES
    Classes, SysUtils, FileUtil, Forms, Controls, Graphics, Dialogs, StdCtrls,
    LResources;
  
  TYPE
  
  
negative.code: 
      txtSize.Lines.Clear;
      txtSize.Lines[0] := str;
      //htmWireSize.L:=str;
    END;
  
  END.
  