|
||
|
摘要：
建立企业奖励机制 王永庆家人合影合理的激励机制是，王永庆对员工施加巨大的压力，同时对部属的奖励也极为慷慨。台塑的激励方式有两类。一类是物质的，一类是精神的。台塑的金钱奖励以年终奖金与改善奖金最有名。王永庆私下发给干部的奖金称为“另一包”（因为是公开奖金之外的奖金）。“另一包”又分两种：一种是台塑内部通称的黑包；另一种是给特殊有功人员的杠上开包。1986年黑包发放的情况是：课长、专员级新台币10万—20万；处长高专级20万一30万；经理级100万。同时给予特殊有功人员200万—400万的杠上开包。业绩突出的经理们每年薪水加红利可达四五百万元，少的也有七八十万元。此外还设有成果奖金。对于一般职员. 阅读全文
posted @ 2011-09-09 11:01 ╰★张志峰★╮ 阅读(353) 评论(0) 推荐(0)
摘要：
追根究底：对问题不追究到水落石出，绝不罢休 务本精神：凡事只求根本，只求合理，不问结果 瘦鹅理论：忍饥耐饿，坚韧不屈，等待机会的到来 基层做起：脚踏实地，按部就班，从基层做起，成功的机会就愈大 实力主义：学历不等于实力，实务经验愈丰富，成功的机会就愈大 切身感：制定让员工有切身感的管理制度，发挥员工最大潜能 价廉物美：坚持供应价廉物美的原料给下游客户，企业得以蓬勃发展 客户至上：买卖双方唇齿相依，给客户利益自己才能有最大利益 阅读全文
posted @ 2011-09-09 10:57 ╰★张志峰★╮ 阅读(245) 评论(0) 推荐(0)
摘要：
我遇到 NativeXML 在它的一个节点的属性上面写入属性，但是当读出的值中包含汉字的时候出现了乱码。检查代码如下NativeXml := TNativeXml.Create;try NativeXml.EncodingString := 'GB2312';// 'UTF-8'; NativeXml.Utf8Convert := True; NativeXml.BinaryEncoding := xbeBinHex; NativeXml.Clear; NativeXml.LoadFromFile(strFilePath); RootNode := Native 阅读全文
posted @ 2011-09-07 09:36 ╰★张志峰★╮ 阅读(1363) 评论(0) 推荐(0)
摘要：
1、活着一天，就是有福气，就该珍惜。当我哭泣我没有鞋子穿的时候，我发现有人却没有脚。 2、宁可自己去原谅别人，莫让别人来原谅你。 3、世界原本就不是属于你，因此你用不着抛弃，要抛弃的是一切的执著。万物皆为我所用，但非我所属。 4、别人可以违背因果，别人可以害我们，打我们，毁谤我们。可是我们不能因此而憎恨别人，为什么?我们一定要保有一颗完整的本性和一颗清净的心。 5、你有你的生命观，我有我的生命观，我不干涉你。只要我能，我就感化你。如果不能，那我就认命。 6、如果你准备结婚的话，告诉你一句非常重要的哲学名言「你一定要忍耐包容对方的缺点，世界上没有绝对幸福圆满的婚姻，幸福只是来自于无限的... 阅读全文
posted @ 2011-09-05 14:36 ╰★张志峰★╮ 阅读(270) 评论(0) 推荐(0)
摘要：
类方法也分私有和公有方法之分，下面是具体代码unit Unit2;interfaceuses Windows, Forms, Dialogs;type TA = class private class procedure aa; public class procedure bb; end;implementationclass procedure TA.aa;begin showmessage('aa');end;class procedure TA.bb;begin showmessage('bb');end;unit Unit1;interfaceuses 阅读全文
posted @ 2011-08-31 17:00 ╰★张志峰★╮ 阅读(679) 评论(0) 推荐(0)
摘要：
ShellExecute(0, 'open', PChar(strRepDir + strRepFileName), nil, nil, SW_SHOW); //打开word文档 阅读全文
posted @ 2011-08-30 11:43 ╰★张志峰★╮ 阅读(363) 评论(0) 推荐(0)
摘要：
unit U_WordConst; interface {*******Word窗体状态************} const wdWindowStateNormal = $00000000; {普通状态} {*******域的位置状态************} const wdCollapseStart = $00000001; wdCollapseEnd = $00000000; {*******方向单元操作************} const wdCharacter = $00000001; wdWord = $00000002; wdSentence = $0000000... 阅读全文
posted @ 2011-08-29 09:55 ╰★张志峰★╮ 阅读(3002) 评论(0) 推荐(0)
摘要：
[CSDN－Word教程]自动完成Word 日常任务 利用VBA 编程，可以使许多日常的任务自动完成，使用户的工作更有效率。11.7.1 在启动时显示打开对话框 一般情况下启动Word，Word 会认为是创建一个新文档。如果只是想打开一个旧文档进行编辑，在Word 启动时显示【打开】对话框可以节省许多时间。为此，可以创建生成一个宏。Public Sub openfile（）'建立一个宏，使在Word 启动时运行该宏Dialogs（wdDialogFileOpen）.ShowEnd Sub 将此代码加入模板中。为了使Word 每次启动时自动执行该宏，用鼠标右键单击桌面上Word 阅读全文
posted @ 2011-08-29 09:36 ╰★张志峰★╮ 阅读(1138) 评论(0) 推荐(0)
摘要：
日期：2005年12月4日 作者：archonwang 人气：1580 查看:[大字体 中字体 小字体] 【实现 DBGridEh 隔行分色显示】procedure TForm1.DBGridEh1GetCellParams(Sender: TObject; Column: TColumnEh;AFont: TFont; var Background: TColor; State: TGridDrawState);begin if DBGridEh1.SumList.RecNo mod 2 = 1 then Background := $00FFC4C4 else Backgrou... 阅读全文
posted @ 2011-08-26 15:53 ╰★张志峰★╮ 阅读(1678) 评论(0) 推荐(0)
摘要：
dbgrideh颜色设置(2010-06-30 10:30:59)转载标签：杂谈（1）分行不同颜色设置；在DBGridEh1DrawColumnCell中写； if ADOQuery1.RecNo mod 2=0 then begin DBGridEh1.Canvas.Font.Color := clRed; DBGridEh1.DefaultDrawColumnCell(Rect, DataCol, Column, State); end else begin DBGridEh1.Canvas.Font.Color := clGreen; DBGridEh1.DefaultDrawColum 阅读全文
posted @ 2011-08-26 15:28 ╰★张志峰★╮ 阅读(4068) 评论(0) 推荐(0) |
||
浙公网安备 33010602011771号