FiveTech Software tech support forums

...        Ownerdraw StructurenPointer      Pointer to Structure Ownerdraw Structure have CtlType    := oStruc:CtlTypeCtlID      := oStruc:CtlIDitemID     := oStruc:itemIDitemAction := oStruc:itemActionitemState  := oStruc:itemStatehwndItem   := oStruc:hwndItemhDC        := oStruc:hDCaRect   ...

... = "O","Object",oSelf) = "Object" nIdCtl = 109 VAR2CHAR( aStruc ) = "__itemSetObj( {{CTLTYPE, 3}, {CTLID, 109}, {ITEMID, 0}, {ITEMACTION, 1}, {ITEMSTATE, 4096}, {HWNDITEM, 1770774}, {HDC, 1157698194}, {ARECT, {3, 3, 35, 70}}, {ITEMDATA, `ęƒ}}, {{TDRAWITEMSTRUCT,}} ...

You need to use relational databases like this:

ITEMS.DBF
ITEMID <---primary key (auto incrementing)
DESCRIPTION
CATAGORYID
BRANDID

CATAGORY.DBF
CATAGORYID <--- primary key (auto incrementing)
CATAGORYNAME

BRAND.DBF
BRANDID <--- primary key (auto incrementing)
BRANDNAME

Antonio super genial como siempre :D :shock: https://media1.tenor.com/images/6df96c461076833d1b12435f46fe7520/tenor.gif?itemid=18787833 Muchas gracias lo probare :mrgreen: Saluditos :wink: Aida, Aqui tienes una primera versión funcionando. La incluiremos en FWH 21.03 tgif.prg ...

... datos correspondientes a DRAWITEMSTRUCT. https://docs.microsoft.com/en-us/window ... itemstruct Las DATAs de oItemStruct son: CtlType, CtlID, itemID, itemAction, itemState, hwndItem, hDC, aRect, itemData, nTop, nLeft, nBottom, nRight, nWidth, nHeight. Todas las DATAs son de sólo lectura. Su ...

... to DRAWITEMSTRUCT. https://docs.microsoft.com/en-us/windows/win32/api/winuser/ns-winuser-drawitemstruct oItemStruct DATAs are CtlType, CtlID, itemID, itemAction, itemState, hwndItem, hDC, aRect, itemData, nTop, nLeft, nBottom, nRight, nWidth, nHeight. All the datas are readonly. Usage can ...

... de poder encontrar el prompt de un item a partir del valor de la estructura typedef struct tagMEASUREITEMSTRUCT { UINT CtlType; UINT CtlID; UINT itemID; UINT itemWidth; UINT itemHeight; ULONG_PTR itemData; } MEASUREITEMSTRUCT, *PMEASUREITEMSTRUCT, *LPMEASUREITEMSTRUCT; que es pasada como parámetro ...

... eng03class local odb1,odb2 odb1:=::odb1 odb2:=::odb2 ::oTree:bChanged := {|oTree,oItem|eng0303(self) } // ... return FUNCTION eng0303(obl1) local itemid1,version1 oitem:=obl1:oTree:GetSelected() itemid1:=LEFT(oitem:cprompt,nitemidlen) version1:=SUBSTR(oitem:cprompt,nitemidlen+3,10) obl1:odb1:cquery:="select ...

... http://www.ecapmexico.net/website/index.php?option=com_k2&view=item&id=365:macros-para-dar-formato-a-textos-y-a-celdas-en-excel&Itemid=59 http://office.microsoft.com/es-hn/excel-help/cambiar-el-color-de-fondo-de-las-celdas-mediante-vba-HA001136627.aspx http://www.xltoday.net/vba_ejemplos_colores-asp ...

Hi, Table: itemid qty 001 1.1 002 2.1 003 3.1 004 4.1 ... FrPrn:SetUserDataSet("masterdata",'itemid;qty'},; {|| odbprn2:GoTop()} ,; {|| odbprn2:SKIP(1)},; {|| odbprn2:SKIP(-1) },; {|| odbprn2:EOF() },; {|aField|odbprn2:FIELDGET(afield)}) ...

... oCol:AddResource("checkoff") oCol:bBmpData := { ||1} ocol:nwidth:=40 oCol := obrow:AddCol() oCol:bStrData := { ||odb2:itemid} oCol:cHeader := "物料编码" ocol:beditvalue:={||odb2:itemid} oCol:nedittype:= {||if(ledit .and. LEN(ALLTRIM(odb1:stockid))>0.and.odb2:qty==0,EDIT_GET_BUTTON,0)} ...

... done. The table is composed of records and each record is made up of 5 fields: 1. Customer ID - (Foreign Key into customers table) 2. SalesDate 3. ItemId 4. ItemDescrip 5. Amount As you are xbrowsing the Customers table, at some keyboard or mouse action, imagine that all the sales records on the ...

Aqui te dejo el enlace

http://www.vailton.com.br/index.php/com ... Itemid=541

Saludos

obrow:=bseek:={|v|odb2:SEEK(v,,{oquery:itemid+oquery:id2})}

Should be
obrow:bseek:={|v|oquery:SEEK(v,,{||oquery:itemid})}

Shuming Wang

obrow:=bseek:={|v|odb2:SEEK(v,,{oquery:itemid+oquery:id2})} tmysql query class METHOD Seek(Value,lSoftSeek,cFieldNames,llast) METHOD Seek( xValue,lSoftSeek,cFieldNames,llast) CLASS TMySQLQuery local nstart,nend,nretry:=0,Xvalue0:=Xvalue,ctype:=VALTYPE(xValue) ...