摘要：&fmt=6 V:h.263 A:mp3&fmt=16 F4VHD V:h.264 A:aac 阅读全文

摘要：// 调整本进程优先级，有以下三句就够了HANDLE hPS = OpenProcess(PROCESS_ALL_ACCESS, false, GetCurrentProcessId()); SetPriorityClass(hPS, HIGH_PRIORITY_CLASS); CloseHandle(hPS); //define #define NORMAL_PRIORITY_CLASS 0x00000020 #define IDLE_PRIORITY_CLASS 0x00000040 #define HIGH... 阅读全文

摘要：想写一个批处理文件去调用多个批处理文件，按照以前写的调用多个程序的方法a.exeb.exec.exe写了一个startAll.bat--------------------内容----------a.batb.batc.bat然后发现，a.bat执行完了后，这个批处理文件就直接停止了。查询资料后发现应该使用call于是更改为startAll.bat--------------------内容----------Calla.batCall b.batCall c.bat搞定之 阅读全文

摘要：just for as2:大家都知道在flash的按钮事件中写上Stage["displayState"] = "fullScreen";就可以使flash全屏，写Stage["displayState"] = "normal";可以使flash非全屏，但是在google chrome存在bug，如果是在按钮的onPrees事件中使flash全屏，全屏后没有释放鼠标，导致鼠标在flash界面上不能触发鼠标消息。而在自己编写可执行程序中加载的flash里面使用onrelease事件使flash全屏则不成功，必须使用o 阅读全文

摘要：constructor ***.Create()begin // ListView的消息钩子 FNewProc := MakeObjectInstance(SelfListViewProc); FOldProc := Pointer(GetWindowLong(FListView.Handle, GWL_WNDPROC)); SetWindowLong(FListView.Handle, GWL_WNDPROC, LongInt(FNewProc));end;procedure ***.SelfListViewProc(var Msg: TMessage);begin if Assi... 阅读全文

摘要：procedure TGroupItem.ListView1AdvancedCustomDrawItem(Sender: TCustomListView; Item: TListItem; State: TCustomDrawState; Stage: TCustomDrawStage; var DefaultDraw: Boolean);var NodeRect: TRect; NodeLabelRect:TRect; imageWidth,ImageHeight, RectWidth,RectHeight: Integer;begin if Sender <> FListVie 阅读全文

摘要：以前做项目时遇到的读取xml中的一个不存在的元素时老是抛出异常，最开始是使用try...except捕获后使用默认值赋值，但如果元素多的话这样就很烦了，当初的解决方式是采用下面的方式，改变Variants单元中的全局变量NullStrictConvert。var tempNullStrictConvert:Boolean;begin tempNullStrictConvert := Variants.NullStrictConvert; Variants.NullStrictConvert := False; //使空的Variants可以不抛出异常的转换 ///***do some... 阅读全文