//初始化 if(initscr() == NULL) { perror("initcurs") exit(EXIT_FAILURE) } cbreak() noecho() keypad(stdscr, True) //建立菜單項 for(i=0 i<N_ITEMS i++){ items[i] = new_item(months[i], "") } //建立菜單 mymenu = new_menu(items) //設置為5行單列的菜單 set_menu_format(mymenu, 5, 1) set_menu_mark(mymenu, "*") //獲得菜單的行數很列數 scale_menu(mymenu, &mrows, &mcols) //建立窗口和子窗口 win = newwin(mrows + 2, mcols + 2, 3, 30) keypad(win, True) box(win, 0, 0) subwin = derwin(win, 0, 0, 1, 1) //設置菜單的窗口 set_menu_sub(mymenu, subwin) //在子窗口上放置菜單 post_menu(mymenu) refresh() wrefresh(win)
標簽: EXIT_FAILURE initcurs initscr cbreak
上傳時間: 2013-11-29
上傳用戶:小眼睛LSL
width = gdk_pixbuf_animation_get_width(ani) height = gdk_pixbuf_animation_get_height(ani) current_frame_list = gdk_pixbuf_animation_get_frames(ani) pixmap = gdk_pixmap_new(w->window, width, height, -1) clean_pixmap = gdk_pixmap_new(w->window, width, height, -1) if (w->style->bg_pixmap[GTK_STATE_NORMAL]) { GdkPixmap *bg = w->style->bg_pixmap[GTK_STATE_NORMAL] GdkGC *gc GdkGCValues values values.tile = bg values.fill = GDK_TILED gc = gdk_gc_new_with_values(w->window, &values, GDK_GC_FILL|GDK_GC_TILE) gdk_gc_set_ts_origin(gc, (w->allocation.width - width)/2, (w->allocation.height-height)/2) gdk_draw_rectangle(clean_pixmap,gc, True, 0, 0, width, height) gdk_gc_destroy(gc) } else { gdk_draw_rectangle(clean_pixmap, w->style->bg_gc[GTK_STATE_NORMAL], True, 0, 0, width, height) }
標簽: gdk_pixbuf_animation_get_height gdk_pixbuf_animation_get_width ani height
上傳時間: 2013-12-26
上傳用戶:thinode
本程序的開發環境為VS2005,數據庫為SQLSever2005 默認的連接字符串為:"DataSource=125.216.227.147 Initial Catalog=msdb Persist Security Info=True User ID=sa Password=111111" 管理系統為一個簡單的人事管理系統,幫助初學者盡快的掌握這種語言,進而有助于系統改進,對初學者來說是很不錯的選擇。
上傳時間: 2013-12-30
上傳用戶:lyy1234
Since the field of object oriented programming is probably new to you, you will find that there is a significant amount of new terminology for you to grasp. This is True of any new endeavor and you should be warned not to be intimidated by all of the new concepts.
標簽: programming you oriented probably
上傳時間: 2014-12-06
上傳用戶:aappkkee
Ajax實現的WEB下載,由于OA系統是基于WEB方式的,如果只判斷用戶是否點擊“下載文件”,就來判斷用戶是否成功下載了文件。這種方式很顯然行不通,怎么辦呢?我想到的就是用一控件,然后用回調事件來處理數據庫方面的問題(下載記錄問題) 有興趣的朋友可在 http://www.interdrp.com/ 下載分銷系統 用測試帳號進系統后,點測試程序,再點WEB下載 可以看見效果 https://www.interdrp.com/software/ReYoWebDownLoad.zip(點擊下載此控件) API說明 ReYoWebDL.copyright="銳洋軟件擁有版權 http://www.interdrp.com/" //必須 ReYoWebDL.url="http://dl.baofeng.com/storm3/Storm2009-0504-1.exe" //下載文件的路徑 ReYoWebDL.path ="" //保存文件地址 ReYoWebDL.ReYoStartDownload() //下載動作 ReYoWebDL.ReYoStopDownload() //停止下載 ReYoWebDL.size //下載文件大小 ReYoWebDL.bytes//已下載大小 ReYoWebDL.speed //下載速度 KB/S ReYoWebDL.done //下載是否完成 ReYoWebDL.cancle=True //是否取消下載 ReYoWebDL.urlsource //下載文件名 ReYoWebDL.percent //下載百分比
上傳時間: 2017-09-14
上傳用戶:lingzhichao
TdcHintEx Provides your users with a cool transparent hint. It replaces standard Delphi hint window. Just drop a TdcHintEx in your main form. Set Enabled to True. And run your application. Oh btw, please set ShowHint to True.. :) Drop me a line, and tell me what you think of it. Antony Hoon antony7777@telkom.net
標簽: hint transparent TdcHintEx Provides
上傳時間: 2014-01-12
上傳用戶:181992417
本設計開發了一款基于單片機的指紋識別電子密碼鎖系統。該系統以ATmeg16單片機作為模塊核心,通過串口通信控制ZAZ-010指紋模塊實現錄取指紋并存儲指紋數據,并通過HS12864-15C液晶顯示比對流程及比對結果,輔以直流繼電器與發光二極管模擬開鎖的動作。本系統具有體積小、性價比高、傳輸速度快、適合家庭及單位使用。
上傳時間: 2016-05-22
上傳用戶:lucifer048
本設計開發了一款基于單片機的指紋識別電子密碼鎖系統。該系統以ATmeg16單片機作為模塊核心,通過串口通信控制ZAZ-010指紋模塊實現錄取指紋并存儲指紋數據,并通過HS12864-15C液晶顯示比對流程及比對結果,輔以直流繼電器與發光二極管模擬開鎖的動作。本系統具有體積小、性價比高、傳輸速度快、適合家庭及單位使用。
標簽: LCD 128 64 指紋識別 單片機控制 程序 液晶顯示
上傳時間: 2016-05-22
上傳用戶:lucifer048
asp實現限制一個ip只能訪問一次的方法 <% '///////////////////////////////////////////////////// '// // '//作用:一個IP地址只允許訪問本頁一次 // '//引用:<!-- #include file="Check_Ip.asp" --> // '// // '///////////////////////////////////////////////////// 'Response.Charset = 936 '設置輸出編碼為簡體中文 'Response.Buffer = false '關閉緩沖區 Dim Fso,ts,IpList,Cfs '設置Cookies函數 Function SetCookie() Response.Cookies("IsBrow") = "Brow" Response.Cookies("IsBrow").Expires = Date+365 End Function '記錄IP地址函數 Function WriteIp(FileName, IpAddress) Set Fso = Server.CreateObject("Scripting.FileSystemObject") Set ts = Fso.OpenTextFile(Server.MapPath(FileName),8,True) ts.WriteLine IpAddress ts.Close Set ts = Nothing Set Fso = Nothing End Function '讀取IP地址函數 Function ReadIpList(FileName) Set Fso = Server.CreateObject("Scripting.FileSystemObject") If Not Fso.FileExists(Server.MapPath(FileName)) Then CreateFile("Iplist.txt") Exit Function End If Set ts = Fso.OpenTextFile(Server.MapPath(FileName)) Iplist = ts.ReadAll ts.Close Set ts = Nothing Set Fso = Nothing ReadIpList = Iplist End Function '創建文件函數 Function CreateFile(FileName) Set Fso = Server.CreateObject("Scripting.FileSystemObject") Set Cfs = Fso.CreateTextFile(Server.MapPath(FileName)) Cfs.Close Set Cfs = Nothing Set Fso = Nothing End Function '關閉當前IE窗口函數(注:IE6下通過,其他瀏覽器未測試) Function CloseWindow() 'Response.Write "<script>window.location='javascript:window.opener=null;window.close();'</script>" Response.Redirect "http://www.baidu.com" End Function Ip = Request.ServerVariables("REMOTE_ADDR") '獲取瀏覽者IP地址 Cookie = Request.Cookies("IsBrow") '獲取當前Cookies 'Response.Write Cookie If Request.ServerVariables("HTTP_X_FORWARDED_FOR") <> "" Then Response.Write "本站不允許使用代理訪問" Response.End() Else If Cookie = "Brow" Then CloseWindow() Else If Instr(ReadIpList("Iplist.txt"),Ip) <>0 Then CloseWindow() Else WriteIp "Iplist.txt" , Ip End If SetCookie() End If End If %>
上傳時間: 2016-07-14
上傳用戶:helei0915
void DFS(MGraph G, int i) { int j; visited[i] = True; printf("%c ", G.vexs[i]); for (j=0; j<G.numVertexes; ++j) { if (G.arc[i][j]!=INFINITY && !visited[j]) DFS(G, j); } }
上傳時間: 2016-12-28
上傳用戶:chenyameng