09-09-2014, 02:11 PM
Dear Gintaras,
I cannot find what is wrong with this function, which it does not skip folders (qmitem flag 1). Many thanks, Best regards!
Function tempf2
I cannot find what is wrong with this function, which it does not skip folders (qmitem flag 1). Many thanks, Best regards!
Function tempf2
str si.getmacro(getopt(itemid) 1)
str caller.getmacro(getopt(itemid 1) 1);err caller=si
if ideb; min 0; err out "<>%s : <open ''%s /%i''>%s</open> - Called by : %s" NowT si _error.place si caller
men 2004 _hwndqm ;;Find...
int hlb=id(3006 _hwndqm)
int n=SendMessage(id(3006 _hwndqm) LVM_GETITEMCOUNT 0 0)
int i j k nt l
str sText s sitem sit
QMITEM q
DATE dt
long ldt
for i 0 n
,GetListViewItemText(hlb i &sit)
,if empty(sit); continue
,l=find(sit " ")
,sitem=iif(l<0 sit _s.left(sit l))
,j=qmitem(sitem 0 &q 128)
,out "%i %s %i" j sitem q.itype
,if j=0
,,_s.format("Member not found :[]%s - %s" sit sitem)
,,min 0; err out "<>%s : <open ''%s /%i''>%s</open> - %s" NowT si _error.place si _s
,,mac "Warning_QM"
,,continue
,dt= q.datemod
,ldt=dt
,s.format("%I64i %s" ldt sit)
,sText + s
,sText + "[]"