Aktuell geht es mit TD nicht.
Workaround Border abschalten:
also:
Code: Alles auswählen
lBorder:=.f.
oDlg:oBrow := tdSqlBrow(6, 1, 7, 93, .F.,.T.,.T.,.t., oDa, oDlg:oCursTourPos,aFieldsLaden,,,,,;
,,,,, oDlg:bSkipEvalLaden,,,,,,,lBorder)
Allerdings kommt dann der nächste BUG in tdSqlBrow()
Sonst geht das wirklich schon sehr gut mit dem LayoutManager!
Also in tdcSqlBrow.prg noch folgende Änderung (oGb auf oParent):
Code: Alles auswählen
ELSE // no border
// oBrow := tdcSqlBrow():new(nRow,nCol,nRowHt,nColWd,lJump,lEdit,lSort,;
// lColMove,oGb,oCursor,aCols,cCompname,aPres,lTabStop,;
// lVisible,cCursMode,lHscroll,lSizeCol,lSofTrak,lVscroll,;
// bSkipEval,cDefPict,bInsKey,nBGclr,bDefColClrBlk,;
// nAltRowClr,nSBclr,oConn,cSortBtn,lNavMode2)
oBrow := tdcSqlBrow():new(nRow,nCol,nRowHt,nColWd,lJump,lEdit,lSort,;
lColMove,oParent,oCursor,aCols,cCompname,aPres,lTabStop,;
lVisible,cCursMode,lHscroll,lSizeCol,lSofTrak,lVscroll,;
bSkipEval,cDefPict,bInsKey,nBGclr,bDefColClrBlk,;
nAltRowClr,nSBclr,oConn,cSortBtn,lNavMode2)
Clayton macht das ins nächste Update rein.