小小问题(50分)

  • 主题发起人 主题发起人 aven
  • 开始时间 开始时间
A

aven

Unregistered / Unconfirmed
GUEST, unregistred user!
Function IsUpper(ch:char):Boolean;
begin

end;

procedure TForm1.ForceCase(TargetField:String;ToUpper:Boolean);
begin
end;
双击那些控件才有以上的语句
 
这不要双击控件吧,声明后不就可以了吗?
 
不是delphi中的component,所以没有那个控件双击可以生成以上语句
你要在TForm的声明部分声明该过程或函数
procedure ForceCase(TargetField:String;ToUpper:Boolean);
然后按一个快捷键,(是那个现在记不清了,等我查一下),在implementation
部分就会自动出现
procedure TForm1.ForceCase(TargetField:String;ToUpper:Boolean);
 
快捷键:
Ctrl+Shift+C
呵呵,如果没有记错的话。
 
自己先声明一下,然后点右键,选 class complete(大概意思),
就会生成了。
delphi 的控件中没见过这种。
 
补充一下:
if 想使用快捷键“Ctrl+Shift+C”的话,
需要配置一下输入法的热键设置,
否则,该快捷键会被输入法截获
 
呵呵,我不用这种“快捷键”的,你用“快捷键”检索一下会知道怎么设置!
我想用Ctrl+c,再Ctrl+v也不是特麻烦吧??
 
50分刚好够大家分了
 

Similar threads

S
回复
0
查看
910
SUNSTONE的Delphi笔记
S
S
回复
0
查看
887
SUNSTONE的Delphi笔记
S
后退
顶部