仓酷云

 找回密码
 立即注册
搜索
热搜: 活动 交友 discuz
查看: 485|回复: 8
打印 上一主题 下一主题

[学习教程] ASP编程:研讨心得------->Seskin控件包中Ses...

[复制链接]
冷月葬花魂 该用户已被删除
跳转到指定楼层
楼主
发表于 2015-1-16 22:44:26 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式

马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。

您需要 登录 才可以下载或查看,没有帐号?立即注册

x
我想详细了解ASP整站代码与PSP整站代码有什么优缺点,那个更好,更安全,更用容易维护,和管理。。。汉字|办理|控件|成绩|心得公司接纳Seskin控件包来开辟。却发明SeskinEdit在利用汉字是有成绩。次要是由汉字光阴标定位禁绝。鼠标选字也选禁绝。
因而看了其代码。发明它在盘算文本长度时接纳的函数TextLength有成绩。
实在TCanvas供应了一个TextLength办法,在往文本长度时汉字没有成绩。
以是把这里交换上去就好了。
交换后的se_controls单位中的TSeCustomEdit的代码以下
TSeCustomEdit=class(TSeCustomControl)
private
FText:WideString;
FLMouseSelecting:boolean;
FCaretPosition:integer;
FSelStart:integer;
FSelLength:integer;
FFirstVisibleChar:integer;
FPopupMenu:TSeCustomPopupMenu;
FAutoSelect:boolean;
FCharCase:TEditCharCase;
FHideSelection:Boolean;
FMaxLength:Integer;
FReadOnly:Boolean;
FOnChange:TNotifyEvent;
FPasswordChar:WideChar;
FPasswordKind:TPasswordKind;
FTextAlignment:TAlignment;
FActionStack:TEditActionStack;
FPopupMenuDropShadow:boolean;
FPopupMenuShowAnimationTime:integer;
FPopupMenuBlendValue:integer;
FPopupMenuShadowWidth:integer;
FPopupMenuShowAnimation:TSeAnimationRec;
FPopupMenuBlend:boolean;
FContextMenuOptions:TSePopupMenuOptions;
procedureUpdateFirstVisibleChar;
procedureUpdateCaretePosition;
procedureUpdateCarete;

procedureWMGetDlgCode(varMsg:TWMGetDlgCode);messageWM_GETDLGCODE;
procedureWMCopy(varMessage:TMessage);messageWM_COPY;
procedureWMPaste(varMessage:TMessage);messageWM_PASTE;
procedureWMCut(varMessage:TMessage);messageWM_CUT;
procedureWMUnDo(varMessage:TMessage);messageWM_UNDO;
procedureWMContexMenu(varMessage:TMessage);messageWM_CONTEXTMENU;
procedureWMLButtonDblClk(varMessage:TWMLButtonDblClk);message
WM_LBUTTONDBLCLK;
{unicode}
procedureWMImeStartComposition(varMessage:TMessage);message
WM_IME_STARTCOMPOSITION;
procedureWMImeComposition(varMsg:TMessage);messageWM_IME_COMPOSITION;
{VCLmessages}
procedureCMEnabledChanged(varMsg:TMessage);messageCM_ENABLEDCHANGED;
procedureCMFontChanged(varMessage:TMessage);messageCM_FONTCHANGED;
procedureCMTextChanged(varMsg:TMessage);messageCM_TEXTCHANGED;

functionGetSelText:WideString;
functionGetVisibleSelText:WideString;
functionGetNextWordBeging(StartPosition:integer):integer;
functionGetPrivWordBeging(StartPosition:integer):integer;
functionGetSelStart:integer;
functionGetSelLength:integer;
functionGetText:WideString;
procedureSetText(constValue:WideString);
procedureSetFont(Value:TFont);
procedureSetCaretPosition(constValue:integer);
procedureSetSelLength(constValue:integer);
procedureSetSelStart(constValue:integer);
procedureSetAutoSelect(constValue:boolean);
procedureSetCharCase(constValue:TEditCharCase);
procedureSetHideSelection(constValue:Boolean);
procedureSetMaxLength(constValue:Integer);
procedureSetPasswordChar(constValue:WideChar);
procedureSetCursor(constValue:TCursor);
procedureSetTextAlignment(constValue:TAlignment);
procedureSetPasswordKind(constValue:TPasswordKind);
procedureSetPopupMenuBlendValue(constValue:integer);
procedureSetPopupMenuDropShadow(constValue:boolean);
procedureSetPopupMenuShadowWidth(constValue:integer);
procedureSetPopupMenuShowAnimation(constValue:TSeAnimationRec);
procedureSetPopupMenuShowAnimationTime(constValue:integer);
procedureSetPopupMenuBlend(constValue:boolean);
procedureSetContextMenuOptions(constValue:TSePopupMenuOptions);
protected
functionGetEditRect:TRect;virtual;
functionGetPasswordCharWidth:integer;virtual;
functionGetCharX(A:integer):integer;
functionGetCoordinatePosition(x:integer):integer;
functionGetSelRect:TRect;virtual;
functionGetAlignmentFlags:integer;

procedurePaintBuffer;override;

procedurePaintText;virtual;
procedurePaintBackground(Rect:TRect;Canvas:TCanvas);virtual;
procedurePaintSelectedText;virtual;
procedureDrawPasswordChar(SymbolRect:TRect;Selected:boolean);virtual;

functionValidText(NewText:WideString):boolean;virtual;
functionCanAutoSize(varNewWidth,NewHeight:Integer):Boolean;override;

procedureBorderChanged;override;
procedureHasFocus;override;
procedureKillFocus;override;
procedureMouseDown(Button:TMouseButton;Shift:TShiftState;x,y:
int</p>ActiveServerPage技术为应用开发商提供了基于脚本的直观、快速、高效的应用开发手段,极大地提高了开发的效果。在讨论ASP的安全性问题之前,让我们来看看ASP是怎么工作的。
沙发
发表于 2015-1-19 16:12:35 | 只看该作者
我认为比较好的方法是找一些比较经典的例子,每个例子比较集中一种编程思想而设计的。
小女巫 该用户已被删除
板凳
发表于 2015-1-24 13:52:12 | 只看该作者
另外因为asp需要使用组件,所以了解一点组件的知识(ADODB也是组件)
飘飘悠悠 该用户已被删除
地板
发表于 2015-2-1 16:20:14 | 只看该作者
如何更好的使自己的东西看上去很不错等等。其实这些都不是问题的实质,我们可以在实践中不断提升自己,不断充实自己。
蒙在股里 该用户已被删除
5#
发表于 2015-2-7 08:22:48 | 只看该作者
ASP的语言不仅仅只是命令格式差不多,而是包含在<%%>之内的命令完全就是VB语法。虽然ASP也是做为单独的一个技术来提出的,但他就是完全继承了VB所有的功能。
乐观 该用户已被删除
6#
发表于 2015-2-21 06:25:05 | 只看该作者
接下来就不能纸上谈兵了,最好的方法其实是实践。实践,只能算是让你掌握语言特性用的。而提倡做实际的Project也不是太好,因为你还没有熟练的能力去综合各种技术,这样只能使你自己越来越迷糊。
海妖 该用户已被删除
7#
发表于 2015-3-6 19:50:31 | 只看该作者
ASP.Net和ASP的最大区别在于编程思维的转换,而不仅仅在于功能的增强。ASP使用VBS/JS这样的脚本语言混合html来编程,而那些脚本语言属于弱类型、面向结构的编程语言,而非面向对象,这就明显产生以下几个问题:
第二个灵魂 该用户已被删除
8#
发表于 2015-3-13 07:08:36 | 只看该作者
从事这个行业,那么你可以学ASP语言,简单快速上手,熟练dreamweav排版,写asp代码,熟练photoshop处理图片,打好基础就行了
若天明 该用户已被删除
9#
发表于 2015-3-20 16:11:11 | 只看该作者
我想问如何掌握学习节奏(先学什么再学什么)最好详细点?
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

QQ|Archiver|手机版|仓酷云 鄂ICP备14007578号-2

GMT+8, 2025-1-9 02:12

Powered by Discuz! X3.2

© 2001-2013 Comsenz Inc.

快速回复 返回顶部 返回列表