agid])) { foreach ($g_flag_thread[$flagid] as &$val) { flag_thread_filter($val); } flag_thread_set($flagid, $g_flag_thread[$flagid]); } } return $g_flag_thread[$flagid]; } // 设置缓存 $key = flagid / $val = flagid下tid数组 function flag_thread_set($key, $val) { global $g_flag_thread; FALSE === $g_flag_thread and $g_flag_thread = website_get('flag_thread'); empty($g_flag_thread) and $g_flag_thread = array(); $g_flag_thread[$key] = $val; return website_set('flag_thread', $g_flag_thread); } // 删除flag下tid缓存 function flag_thread_delete_cache($flagid) { global $g_flag_thread; FALSE === $g_flag_thread and $g_flag_thread = website_get('flag_thread'); empty($g_flag_thread) and $g_flag_thread = array(); if (isset($g_flag_thread[$flagid])) { unset($g_flag_thread[$flagid]); website_set('flag_thread', $g_flag_thread); } return TRUE; } // Delete by tid / 通过tid删除flag下的主题和对应flagid缓存 function flag_thread_delete_by_tid($tid) { global $g_flag_thread; FALSE === $g_flag_thread and $g_flag_thread = website_get('flag_thread'); if (empty($g_flag_thread)) { $g_flag_thread = array(); } else { $thread = well_thread_read_cache($tid); $arrlist = flag_thread_find($tid, 1, $thread['flags']); $flagarr = $ids = array(); foreach ($arrlist as $val) { $flagarr[] = $val['flagid']; $ids[] = $val['id']; if (isset($g_flag_thread[$val['flagid']])) unset($g_flag_thread[$val['flagid']]); } website_set('flag_thread', $g_flag_thread); // 主键更新 flag_update($flagarr, array('count-' => 1)); // 主键删除 flag_thread_delete($ids); } return TRUE; } // 主键删除通过$flagid删除flag下的主题和对应flagid缓存 function flag_thread_delete_by_flagid($flagid) { global $g_flag_thread; FALSE === $g_flag_thread and $g_flag_thread = website_get('flag_thread'); $read = flag_read_cache($flagid); if (empty($read)) return TRUE; $arrlist = flag_thread_find_by_flagid($flagid, 1, $read['count']); if (empty($arrlist)) return TRUE; $flagarr = $ids = array(); $n = 0; foreach ($arrlist as $val) { ++$n; $flagarr[] = $val['flagid']; $ids[] = $val['id']; if (isset($g_flag_thread[$flagid])) unset($g_flag_thread[$flagid]); } website_set('flag_thread', $g_flag_thread); // 主键更新 flag_update($flagarr, array('count-' => $n)); // 主键删除 $r = flag_thread_delete($ids); return $r; } ?>DW中设置自动列宽编程频道|福州电脑网

DW中设置自动列宽

系统教程880 更新时间：2026-04-05 12:12:38

2024年4月5日发(作者：)

看到《如何在DW中设置自动列宽》，从我的类库中扣了一段代码回复了，后来又从

旧硬盘中找到原来老外写的对象，上传给大家吧

$PBExportHeader$n_

$PBExportComments$Performs autowidth on grid datawindow columns

forward

global type n_dwautowidth from nonvisualo b j e c t

end type

end forward

type os_size from structure

long cx

long cy

end type

global type n_dwautowidth from nonvisualo b j e c t autoinstantiate

end type

type prototypes

Function ulong GetDC(ulong hWnd) Library ""

Function ulong SelectObject(ulong hdc, ulong hWnd) Library ""

Function boolean GetTextExtentPoint32A(ulong hdcr, string lpString,

nCount, ref os_size size) Library ""

Function long ReleaseDC(ulong hWnd, ulong hdcr) Library ""

end prototypes

type variables

Constant Integer WM_GETFONT = 49

Window iw_parent

Datawindow idw_data

Integer ii_original[]

end variables

forward prototypes

long

本文发布于:2024-04-05，感谢您对本站的认可！

本文链接:https://www.fzithome.com/xitong/1712324484a424311.html

老外对象设置回复自动

发布评论取消回复

评论列表（有0条评论）

DW中设置自动列宽

发布评论取消回复

最近发表

相关推荐

标签列表

DW中设置自动列宽

发布评论 取消回复

最近发表

相关推荐

标签列表

发布评论取消回复