Create a simple spreadsheet viewer using ADO.& Q4 M1 Q: s1 @
1. Start Delphi and create a new application.2 Z4 J+ T9 f8 e8 Z V
' m3 e, h9 a# W& U1 r1 C/ @
2. Drop an ADODataSet onto the form.4 x1 w/ G+ h4 Z/ C) {5 u/ g
9 @1 V7 R! N2 x0 e# a6 {1 ^
3. Set the CommandType property to cmdTableDirect0 m9 H$ z2 `. }( Y
7 f$ u1 Z9 @, d' x7 H' x1 Y$ A8 `An ADODataSet is similar to the BDEDataSet used to access database tables. With ADO, you describe the data source and then use data-aware controls to display the data in your application. The first property to set is the CommandType. This property tells the ADO engine what type of command you are going to be calling.0 m7 Z0 _& Y! _: F6 r# _
$ e: s3 T; D2 v% Q3 l0 B* K4. Set the ConnectionString property.# s/ d9 S6 R, t2 a
* A4 e: d4 ~" ]& y
The ConnectionString property tells ADO how to connect to the datasource. Click the ellipse to display the ConnectionString dialog. We are going to build the string ourselves so select Use Connection String and click the Build button to display the Data Link Properties dialog. The first choice to make is what data provider are we going to use to get the data. To access Excel we use the Microsoft Jet OLEDB 4.0 Provider, select it and click Next. The next piece is what are we going to connect to. In this case we want to access an Excel file. Use the Browse button and find an Excel file on your system or use Forecast.xls provided in the ADOExcel.zip file. Before we can test the connection we need to enter an Extended Property to the connection string. Click OK to go back the ConnectionString dialog and type 'Extended Properties=Excel 8.0;' without the quotes at the end of the connection string (remember, all ConnectionString entries must be separated by semi-colons. This tells ADO that we need Excel support and use the type library associated with Excel 8.0. Go ahead and click Build again and then Test the connection. If you get Test Connection Succeeded, you did everything right. Close the ConnectionString dialog. The last property to set is the CommandText property. 1 f2 e7 X8 g: a9 X9 C8 Q- i ( h) U2 E$ ?9 N( J5. Set the CommandText property./ S, m6 d* S# s' t0 U4 h
) {# D/ U; J# S4 eThis property now becomes a combobox that allows you to select the tables defined in the datasource. Choose the name of the spreadsheet with a $ appended to it. 7 t L; D# Q1 V8 d9 M- A/ G & \2 N6 q' a8 w0 c# }! h# M6. Drop a Datasource component from the Data Access tab and a DBGrid from the Data Controls tab.0 @! k; b$ X% [& E
& R0 `8 f, F" @ z8 \9 TNow we want to hook up the ADODataset to a grid for display. Connect the Grid to the datasource by setting the DataSource property to DataSource1 and connect the DataSource to the ADODataset by setting the DataSet property to ADODataSet1. - W# ^* k. v% {- z! v2 m, w6 w1 Y, Z+ ~ 8 o5 Y0 J9 A4 Q$ R# i7. Set the Active property of the ADODataSet to True. % C5 N2 h" Y% w0 J; R8 t( o& F1 Z, z( @3 u: K( X8 u3 Z
We can now test the query in design mode by activating the ADODataSet. The data from the spreadsheet will be displayed in the grid.. T' F4 d& [6 G$ r2 ?
险恶的地狱火半岛、昏暗的赞加沼泽、风景秀美的纳格兰、峻峭的刀峰山、虚幻的虚空风暴、死气沉沉的影月谷,人也好,动物也好,元素、亡灵、恶魔也罢,只要我能汲取力量,我是不会吝啬手中的箭支的.玛瑟里顿的身上插满了我的箭,格鲁尔的徽章被我据为己有,和瓦丝琪比谁的射术精,和凯尔萨斯-逐日者为了各自精灵的荣耀而大打出手,亲手了结了暗夜精灵的背叛者:伊利丹-怒风,以及,和燃烧军团的头领基尔加丹; f8 m0 X; q6 z 冒险岛076外挂5 x. x! N$ x$ o2 y: H QQ华夏外挂 0 l$ O. u9 B' g& L! }, H" l问道外挂 I( U& X4 s' ]0 I. K' |& c! w5 ~5 M传奇外传外挂5 Z; a, F4 }2 ?* U8 ]* n, m0 t# H 星尘传说外挂作者: xming777 時間: 2009-10-17 04:18 AM 標題: 人生总会有遗憾
生活当中也是如此,如果每天都能拥有地下城与勇士阳光般的心情,一切的一切都将变得更加美好。我们每天都要经历很多事情,开心的,不开心的,都在心里打转。心里的事情一多,就会变得杂乱无序,然后心也跟着烦躁起来。一些苦闷的情绪和不愉快的记忆,如果充斥在心里,就会使人委靡不振。所以,拥有阳光的心情,能够使黯然的心变得亮堂。有了阳光般的心情,我们能够平静地接受奇迹世界现实,能对自己说声顺其自然,能够坦然地面对困苦,能够积极地看待人生,学会凡事都往好处想。这样,阳光就会流进心里来,驱走恐惧,驱走黑暗,驱走所有的阴霾。身上散发着阳光般气息,品的全是阳光的味道,永远带给身边的人快乐的心情,快乐在此蔓延。# E. j0 ^) Z$ Y3 t
3 b; G( a1 A, ^* w- x6 p9 b 我们都知道,不是所有的冒险岛梦想都能成为美好的现实。但美丽的梦想同样可以装点出生活的美丽,因为我们有了阳光的心情。我们在乎的不再是处面那个莫测的世界了,满眼是那种变幻的奇妙的美丽,满心是宠辱不惊的那种悠闲和快乐,也许我们的人生仍然充满波折,可是我们的心里已没有患得患失和懊恼和大悲大喜的起落情绪。日子如流水匆匆地逝去,站在现在展望未来回顾过去永恒之塔,总有一些留下,总有一些逝去。当我们以一种阳光的心情打开记忆时,看那些留在岁月里的心结便宛如天上飘动的云朵,卷卷舒舒,而许多美好的或者不美好的感觉就会扑面而来,因为有了好的心情,所以便可以从容面对。 # @& x( n: N- F+ \% I& w$ ~# f5 A! C8 F. ^* n' b/ i+ ?
很多时候我们很难说是QQ英雄岛理想的支持还是生活所迫,致使我们当时做出那样的抉择。所以人生总会有遗憾,不要一味地找寻过去,要放眼未来。美好的生活应该是时时拥有一颗轻松自在的心,不管外界如何变化,自己都能有一片清静的天地。清静不在热闹繁杂中,更不在一颗所求太多的心中,放下过去,开阔心胸,心里自然会拥有阳光。 作者: jian715 時間: 2009-11-5 05:37 PM 標題: 北海至成都、重庆、三亚往返航线9月9日复航
民航资源网2009年9月7日消息:9月9日起,北海至成都、重庆、三亚往返航线复航。北京到赫尔辛基机票 z Z9 P* O2 ?% E# K7 `# t8 Y 该航线由四川航空集团鹰联航空有限公司(United Eagle Airlines Co., Ltd.,简称“鹰联航空”)承担飞行任务,由空中客车A319(138座)飞行执飞。具体时间为:早上6点50分从成都起飞,8点40分到达北海;9点20分从北海起飞,10点50分抵达重庆;11点40分从重庆起飞,13点10分到达北海;13点50分从北海起飞,14点40分抵达三亚;15点30分从三亚起飞,16点20分到达北海;22点20从北海起飞,24点10分到达成都。飞行班期由9月9日-10月23日,每周一、三、五、七飞行。北京至赫尔辛基机票 ( N" {1 O+ x, h) p# r 北海目前航线飞往北京、上海、广州、深圳等地,基本集中在三大枢纽和东部城市,急需开辟西部地区的航线。北海是我国中西部地区出海大通道的主要城市,有着与西南地区迥然不同的滨海度假资源,一直来都吸引着大量中西部地区的商客和游客,北海市航空市场的不少客源也来自于成都、重庆、昆明等城市。这几年,由于民航体制改革,各种形势的变化,北海开通西部地区的直航航班相继停航。西部地区乘客来北海只能通过深圳、广州进行无缝中转,或到达南宁机场经陆地再转至北海,给旅客出行造成了相当不便。为此,北海机场和地方政府积极配合,主动联系,利用政府补贴资金,开通北海——成都、重庆、三亚航线,不仅可以利用成都、重庆中转西北地区的西安、兰州、太原、银川、乌鲁木齐,拉萨等城市,有效解决中西部地区乘客来北海无直达航线的困难,而且更重要的是可以迅速打破北海航线的“东重西轻”不合理格局。北京到赫尔辛基留学生机票: l Z! s) u, T5 B1 V; U) _
: T( ~! {! h: ~8 r/ p! L' H r1 b 下一步,北海机场还将计划开通北海至昆明、越南砚港航线,初步形成结构合理的航线网络,从而为北海改变终端港现状和构建北部湾旅游枢纽机场奠定良好的航线基础。北京至赫尔辛基特价机票作者: xming777 時間: 2010-1-17 02:05 AM 標題: 以便按时叫醒你