摘要: GetResourceHandler 事件 procedure Chromium1GetResourceHandler(Sender: TObject; const browser: ICefBrowser; const frame: ICefFrame; const request: ICefRe 阅读全文
posted @ 2017-05-13 13:55 Values 阅读(776) 评论(0) 推荐(0) 编辑
摘要: Form1.MakeFullyVisible(screen.Monitors[1]);with Form1do begin{ Position form }Top := 0 ;Left := 0 ;{ Go full screen}BorderStyle := bsNone ;WindowState... 阅读全文
posted @ 2016-01-03 11:06 Values 阅读(860) 评论(0) 推荐(0) 编辑
摘要: procedure tform1.OpenSerialPort;varcc:TCommConfig;Temp:string;beginTemp:='Com'+inttostr(RadioGroup1.ItemIndex+1);hSerialPort:=CreateFile(PChar(Temp),G... 阅读全文
posted @ 2015-12-03 13:30 Values 阅读(350) 评论(0) 推荐(0) 编辑
摘要: 要用SQLConnection连接SQLite要用到SQLConnection,SQLQuery(SQLDataSet也可以),DataSetProvider,ClientDataSet,DataSource注意:如果你先将SQLQuery(SQLDataSet)Open,再Open ClientD... 阅读全文
posted @ 2014-11-19 17:34 Values 阅读(1171) 评论(0) 推荐(0) 编辑
摘要: var DetailGridView: TcxCustomGridView; MasterGridView: TcxCustomGridView;begin DetailGridView:= cxGrid1DBTableView1.Controller.FocusedRow.AsMasterData... 阅读全文
posted @ 2014-11-13 16:17 Values 阅读(188) 评论(0) 推荐(0) 编辑
摘要: XE5以上执行同步(阻塞)execute是得加入rtcFMX_GUI单元,否则会导致程序无响应,异步(非阻塞)call则不会 阅读全文
posted @ 2014-10-08 11:30 Values 阅读(475) 评论(0) 推荐(0) 编辑
摘要: public class Animal{ private string _name;//动物名称 public string Name { get { return _name; } set { _name = value; } } publ... 阅读全文
posted @ 2014-08-04 09:30 Values 阅读(564) 评论(0) 推荐(0) 编辑
摘要: 1 procedure SetRowNumber(var ASender: TcxGridTableView; AViewInfo: TcxCustomGridIndicatorItemViewInfo; 2 var ACanvas: TcxCanvas; var ADone: boolea... 阅读全文
posted @ 2014-07-17 17:25 Values 阅读(619) 评论(0) 推荐(0) 编辑
摘要: ... 阅读全文
posted @ 2014-06-27 09:36 Values 阅读(570) 评论(0) 推荐(0) 编辑
摘要: Delphi Internal Error L681Although this specific example doesn't reproduce the problem in a small project, this caused the problem in a larger project... 阅读全文
posted @ 2014-06-26 16:49 Values 阅读(470) 评论(0) 推荐(0) 编辑