请问到哪儿可以找到ascii字符对应的虚拟码? 查msdn啊或是download个gexperts,里面有的 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 to eulb(执子之手,与子偕老) :在那儿下载? procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word; Shift: TShiftState);beginShowMessage(inttostr(ord(key)));end;记住写在KeyDown事件中,要不然F1,什么的就看不到了! 在Delphi帮助渐入关键字 Virtual key codes 可以看到所有虚拟码—————————————————————————————————MaximStr := '宠辱不惊,看庭前花开花落,去留无意; 毁誉由人,望天上云卷云舒,聚散任风。';if Not Assigned(I) then I := TI.Create(Nil);I.Maxim := MaximStr;I.Explain := '假如上述代码中出现“OA”、“3D”等字样,改为“=”或者去掉';I.Desire := '加不加分随你';————————————————————————————————— PostThreadMessage如何传递字符串数据,以及如何获取传递的数据 如何读取delphi做的代密码的.db文件? 请问-在LineTo时出现 [存储空间不足,无法处理此命令。]的错误提示怎么解决? 请家给解决一下这个问题!! 请问在DELPHI中如何定义一个全局变量!在另一个窗口中可以使用主窗口的变量,多谢!我是新手 请问用sql语句查询时如何使排序结果按规定顺序显示 怎么自定义类?高手请进,在线等待! 急,急,急关于delphi与后端数据库sql连接的问题,若能解决,给200分 怎么这个控件找不到阿 再次提问 请帮帮忙 好吗??? 判断的问题!高手这边看,才鸟送分来! 送分问题!
在那儿下载?
Shift: TShiftState);
begin
ShowMessage(inttostr(ord(key)));
end;记住写在KeyDown事件中,要不然F1,什么的就看不到了!
—————————————————————————————————
MaximStr := '宠辱不惊,看庭前花开花落,去留无意;
毁誉由人,望天上云卷云舒,聚散任风。';
if Not Assigned(I) then
I := TI.Create(Nil);
I.Maxim := MaximStr;
I.Explain := '假如上述代码中出现“OA”、“3D”等字样,改为“=”或者去掉';
I.Desire := '加不加分随你';
—————————————————————————————————