{ %VERSION=1.1 } type to2 = interface function bufwrite(eat : boolean = true) : integer;stdcall; end; begin end.