DEFINE FONT aFONT NAME "Segoe UI Light" SIZE 0,-14
REDEFINE XBROWSE oBrw ID 201 OF ODLG ;
COLUMNS 02,34,4,22,31,23,6,7,8,24,21 ;
HEADERS "Date" + CRLF + "Création","Style", "N°" + CRLF + "Devis","Client","Date" + CRLF + "Impression","Téléphone","Total" + CRLF + "HT","Total" + CRLF + "TTC","Total" + CRLF + "Acomptes",;
"Référence","Taux" + CRLF + "Tva";
FOOTERS ;
FONT aFont ;
COLORS {|| { CLR_BLUE, CLR_WHITE } } ;
COLSIZES asize ;
array TVISU lines AUTOSORT
#include "FiveWin.ch"
#include "XBrowse.ch"
function Main()
local oDlg, oFld, oBrw1, oBrw2
local aDat1, aDat2, aFont
aDat1:={{"Row1-Col1","Row1-Col2","Row1-Col3"},;
{"Row2-Col1","Row2-Col2","Row2-Col3"},;
{"Row3-Col1","Row3-Col2","Row3-Col3"},;
{"Row4-Col1","Row4-Col2","Row4-Col3"}}
aDat2:={{"ROW1-COL1","ROW1-COL2","ROW1-COL3"},;
{"ROW2-COL1","ROW2-COL2","ROW2-COL3"},;
{"ROW3-COL1","ROW3-COL2","ROW3-COL3"},;
{"ROW4-COL1","ROW4-COL2","ROW4-COL3"}}
DEFINE FONT aFONT NAME "Segoe UI Light" SIZE 0,-16
DEFINE DIALOG oDlg RESOURCE "Test"
REDEFINE FOLDER oFld ;
PROMPTS "One", "Two" ;
DIALOGS "One", "Two" ;
ID 100 OF oDlg
REDEFINE XBROWSE oBrw1 ID 10 OF oFld:aDialogs[ 1 ] ARRAY aDat1 AUTOCOLS FONT aFont
REDEFINE XBROWSE oBrw2 ID 10 OF oFld:aDialogs[ 2 ] ARRAY aDat2 AUTOCOLS FONT aFont
oBrw1:aCols[ 2 ]:nEdittype := EDIT_BUTTON
oBrw1:aCols[ 2 ]:bEditBlock := { || MsgYesNo( "Please select" ) }
oBrw2:aCols[ 2 ]:nEdittype := EDIT_GET
ACTIVATE DIALOG oDlg CENTERED
return nil
::oBrw:Refresh()
if ::oBrw:lAdjusted // 2013-06-11
::oBrw:Refresh()
endif
[Browse]
MVIndicator=1
MVSeparatorH=2
MVSeparatorV=1
MVRidimension=2
MVMove=2
MVPijama=2
MVEffectWin7=1
MVColor1=7031871
MVColor2=204
MVBackGrid=1
MVBrwFont=Tahoma:12:Normal;Tahoma:12:Normal;Tahoma:12:Normal;
MVState=XS1:{{"_nCreationOrders",{1,2,3,4,5,6,7,8,9,10,11}},{"_nRowHeight",28},{"_nWidths",{100,30,70,80,90,80,100,100,100,100,100}},{"_lHides",{.F.,.F.,.F.,.F.,.F.,.F.,.F.,.F.,.F.,.F.,.F.}},{"_cGrpHdrs",{,,,,,,,,,,}},{"_cHeaders",{"Attività","Tipo","Data","Numero","Causale","Conto
Return to FiveWin for Harbour/xHarbour
Users browsing this forum: Google [Bot], nageswaragunupudi and 115 guests