LayoutManager() und Brows

Grafische Primitive, XbaseParts und Darstellungsfragen allgemein.

Moderator: Moderatoren

Antworten
Benutzeravatar
satmax
1000 working lines a day
1000 working lines a day
Beiträge: 831
Registriert: Do, 02. Dez 2010 19:34
Wohnort: Biberbach in Österreich
Hat sich bedankt: 1 Mal
Danksagung erhalten: 1 Mal
Kontaktdaten:

LayoutManager() und Brows

Beitrag von satmax »

Hallo,

Code: Alles auswählen

oDlg:oBrow:LayoutAlign   := XBPLAYOUT_LEFT + XBPLAYOUT_TOP
zeigt bei mir keine Wirkung:

Code: Alles auswählen

oDlg:oBrow := tdSqlBrow(6.0, 1, 7, 93, .F.,/* lEdit*/.T.,.T.,.t., ;
                    oDa, oDlg:oCurs,aFields,,,,,;
                    ,,,,,;
                    oDlg:bSkip)
                    
oDlg:oBrow:LayoutAlign   := XBPLAYOUT_LEFT + XBPLAYOUT_TOP
Geht das bei Browser Objekten nicht oder muss man hier noch etwas anderes beachten?
Gruß
Markus
Benutzeravatar
Tom
Der Entwickler von "Deep Thought"
Der Entwickler von "Deep Thought"
Beiträge: 9345
Registriert: Do, 22. Sep 2005 23:11
Wohnort: Berlin
Hat sich bedankt: 100 Mal
Danksagung erhalten: 359 Mal
Kontaktdaten:

Re: LayoutManager() und Brows

Beitrag von Tom »

Vielleicht noch ein oBrowse:Configure() hinterherschieben? Das Browse ist ja schon erzeugt.
Herzlich,
Tom
Benutzeravatar
satmax
1000 working lines a day
1000 working lines a day
Beiträge: 831
Registriert: Do, 02. Dez 2010 19:34
Wohnort: Biberbach in Österreich
Hat sich bedankt: 1 Mal
Danksagung erhalten: 1 Mal
Kontaktdaten:

Re: LayoutManager() und Brows

Beitrag von satmax »

Leider nicht, was etwas verändert ist

oDa:LayoutAlign := XBPLAYOUT_LEFT + XBPLAYOUT_TOP

aber das wirkt sich dann auf den gesamten Dialog aus, nicht nur auf das Brows.
Gruß
Markus
Benutzeravatar
Jan
Marvin
Marvin
Beiträge: 14641
Registriert: Fr, 23. Sep 2005 18:23
Wohnort: 49328 Melle
Hat sich bedankt: 21 Mal
Danksagung erhalten: 87 Mal
Kontaktdaten:

Re: LayoutManager() und Brows

Beitrag von Jan »

Bei mir klappt das mit Browses. Aber ich arbeite auch mit Xbase++ pur, ohne TopDown.

Jan
Mitglied der XUG Osnabrück
Mitglied der XUG Berlin/Brandenburg
Mitglied des Deutschsprachige Xbase-Entwickler e. V.
Benutzeravatar
satmax
1000 working lines a day
1000 working lines a day
Beiträge: 831
Registriert: Do, 02. Dez 2010 19:34
Wohnort: Biberbach in Österreich
Hat sich bedankt: 1 Mal
Danksagung erhalten: 1 Mal
Kontaktdaten:

Re: LayoutManager() und Brows

Beitrag von satmax »

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.
Gruß
Markus
Antworten