Hi,
DIA Feature in Bird 1.12 seems to be desactivated before the release.
To reactivate it, uncomment the call to setDIA function in Builder2.pas. And replace the setDIA function by this one :
<
em>
p
rocedure SetDia(frm:FormPtr;resize:Boolean);
v
ar
e : Err;
ver : UInt32;
h : WinHandle;
r : RectangleType;
v : UInt16;
b
egin
RctSetRectangle(r,0,0,160,160);
// get current form
frm:=FrmGetActiveForm;
e:=FtrGet(ord('p')shl 24+ord('i') shl 16+ord('n') shl 8+ord('s'),1,ver);
if e=0 then
if ver>0 then
if GetDiaState<>2 then
begin
h:=FrmGetWindowHandle(frm);
WinSetConstraintsSize(h,240,240,240,240,160,160);
FrmSetDIAPolicyAttr(frm,1);
//SetDiaState(1);
PinSetInputTriggerState(1);
//r.extent.x:=240;
//r.extent.y:=240;
end;
if resize then
begin
h:=FrmGetWindowHandle(frm);
//WinSetBounds(h,r);
end;
e
nd;
The patched .pas :
builder2.pas