管理系统设计最易忽略的问题点
前言随着管理系统的普及 , 大部分企业已经实现了系统信息化 。 但是每家公司的系统 , 就像万花筒一样百花齐放 , 各有各的特点 。 但无论如何 , 我们必须遵从以下几点 。
- 系统主界面尽量简洁简单 。 如果主界面过于复杂 , 则用户的体验差 , 培训的成本也大幅增长 。 有时候用户面对工作千头万绪 , 如果他能将自己喜欢的图片放在操作界面上 , 他会感到很愉悦 , 这样工作效率大大提高 。
文章插图
将主界面弃掉复杂的流程简图 , 由用户写定义主界面
2. 设计系统的时候 , 要考虑用户可能点开两个以上的线程程序 , 以减少客户端的内存使用率 。 那如何解决这个问题呢?不同的语言有不同的方法 。 现在我给出的是Delphi的解决方法 。
首先建一个单元文件wdrunonce , 将如下代码放入 , 然后在项目处引用单元文件就行了 。
文章插图
放在DELPHI引用单元就可以了
unit wdRunOnce;
{*******************************************
* brief: 让程序只运行一次
* autor: liangyan
* date: 2005-12-28
【管理系统设计最易忽略的问题点】********************************************}
interface
uses
Windows, Messages;
(* 程序是否已经运行 , 如果运行则激活它 *)
function AppHasRun(AppHandle: THANDLE): Boolean;
implementation
const
MapFileName = '{CAF49BBB-AF40-4FDE-8757-51D5AEB5CCCF}';//{CAF49BBB-AF40-4FDE-8757-51D5AEB5BBBF}'
type
//共享内存
PShareMem = ^TShareMem;
TShareMem = record
AppHandle: THandle; //保存程序的句柄
end;
var
hMapFile: THandle;
PSMem: PShareMem;
procedure CreateMapFile;
begin
hMapFile := OpenFileMapping(FILE_MAP_ALL_ACCESS, False, PChar(MapFileName));
if hMapFile = 0 then
begin
hMapFile := CreateFileMapping($FFFFFFFF, nil, PAGE_READWRITE, 0,
SizeOf(TShareMem), MapFileName);
PSMem := MapViewOfFile(hMapFile, FILE_MAP_WRITE or FILE_MAP_READ, 0, 0, 0);
if PSMem = nil then
begin
CloseHandle(hMapFile);
Exit;
end;
PSMem^.AppHandle := 0;
end
else begin
PSMem := MapViewOfFile(hMapFile, FILE_MAP_WRITE or FILE_MAP_READ, 0, 0, 0);
if PSMem = nil then
begin
CloseHandle(hMapFile);
exit;
end;
end;
end;
procedure FreeMapFile;
begin
UnMapViewOfFile(PSMem);
CloseHandle(hMapFile);
end;
function AppHasRun(AppHandle: THandle): Boolean;
var
TopWindow: HWnd;
begin
Result := False;
if PSMem <> nil then
begin
if PSMem^.AppHandle <> 0 then
begin
SendMessage(PSMem^.AppHandle, WM_SYSCOMMAND, SC_RESTORE, 0);
TopWindow := GetLastActivePopup(PSMem^.AppHandle);
if (TopWindow <> 0) and (TopWindow <> PSMem^.AppHandle) and
IsWindowVisible(TopWindow) and IsWindowEnabled(TopWindow) then
SetForegroundWindow(TopWindow);
Result := True;
end
else
PSMem^.AppHandle := AppHandle;
end;
end;
initialization
CreateMapFile;
finalization
- 三星折叠屏新机渲染图曝光 采用双铰链双折叠设计
- 设计模式6之代理模式
- 华为科普:芯片是如何设计的
- 直充设计随身携带——OLIGHT i1R2粉色款钥匙手电赏玩
- 十八年前曾惊艳世界的手机设计,如今看上去仍然很美
- AEG坚守“设计美学与卓越性能相融合”的大师哲学
- 三折时代到来?三星Z Fold3和Z Flip2三折设计?
- 王城:从事软件设计,需要慢慢的雕琢
- 辅助行走的老人智能搀扶机器人设计
- 高脚|Zilio A&C发布了三款具有实用设计的极简主义家具产品