盒子论坛 v2.1

DragAcceptFiles(Handle ,true);

procedure DropFile(var Msg :TWMDropFiles );message WM_DROPFILES;

procedure TSDIAppForm.DropFile(var Msg :TWMDropFiles );
var
  FileName,
  Extension,s,
  newname,s1,s2:string;
  i,j,DropCount,spl:Integer;
  pp:PTWytxTree;
  cnode:TTreeNode;
  b:boolean ;
begin
SetLength(FileName,256);
DropCount:=DragQueryFile(HDROP(Msg.Drop),$FFFFFFFF,nil,0 );
for i:=0 to DropCount-1 do
begin //1
DragQueryFile(HDROP(Msg.Drop),i,PChar(FileName),Length(FileName) );
j:=pos(#0,filename);
if j>0 then
begin//3
   s1:=copy(filename,1,j-1);
end;//3
Extension:=ExtractFileExt(s1);
Extension:=LowerCase(Extension) ;
SetLength(Extension,4);
if(Extension=csExtHtm) then
begin//2
  //就开始播放
end;//2
end;//1
DragFinish(HDROP(Msg.Drop));
end;

----------------------------------------------

作者：

bluelazysb (月影传说)	★☆☆☆☆	-
	盒子活跃会员

2004/2/12 15:32:05

2楼：

hoho
谢谢！
就是这个了！
----------------------------------------------
-

作者：

willing (willing)	★☆☆☆☆	-
	禁用账号

2004/12/13 10:16:33

3楼：

……
被禁用帐号，帖子内容自动屏蔽！
……
----------------------------------------------

作者：

zerohk (零度空间)	★☆☆☆☆	-
	普通会员

2005/2/25 23:14:36

4楼：

好东西,值得珍藏
----------------------------------------------
零度空间

作者：

vagrant2005 (vagrant2005)	★☆☆☆☆	-
	普通会员

2005/3/21 8:34:20

5楼：

作者：

seowhy123456 (seowhy123456)	▲▲▲▲▲	-
	禁用账号

2011/8/1 22:16:25

7楼：

……
被禁用帐号，帖子内容自动屏蔽！
……
----------------------------------------------
发布广告,禁用帐号!

作者：

seowhy123456 (seowhy123456)	▲▲▲▲▲	-
	禁用账号

2011/8/1 22:23:15

8楼：

……
被禁用帐号，帖子内容自动屏蔽！
……
----------------------------------------------
发布广告,禁用帐号!

作者：

seowhy123456 (seowhy123456)	▲▲▲▲▲	-
	禁用账号

2011/8/1 22:36:23

9楼：

……
被禁用帐号，帖子内容自动屏蔽！
……
----------------------------------------------
发布广告,禁用帐号!

作者：

seowhy123456 (seowhy123456)	▲▲▲▲▲	-
	禁用账号

2011/8/19 23:49:54

10楼：

……
被禁用帐号，帖子内容自动屏蔽！
……
----------------------------------------------
发布广告,禁用帐号!

作者：

likediy5200 (likediy)	▲▲▲▲▲	-
	普通会员

2011/9/18 22:35:06

11楼：

Nowadays BURBERRY Coats for Girls are contemporary and Trendy

You can position on it traveling to accomplish application the alarming mornings, to glimpse added businesslike or against affairs with one accretion with your friends. The arroyo is about a able off-season accoutrement artifact that will crave to not Burberry coats 2011 be absent aural your wardrobe. For the bounce season, the arroyo coat, a allotment of the trends appear by designers, consists of a army look, but is in actuality comfortable, about feminine. Equally arresting could possibly be the ascendant appearance - added shades of beige, cream, coral, in actuality abreast to organically produced covering ton. As a novelty, the black coats will in actuality accomplish you angle out in a in fact crowd, abnormally if you in actuality appropriately Burberry coats on sale accessorize them: an agreeable brooch, black chaplet (yes, even abounding added than a arroyo coat), and scarves that analyze to your lipstick. Burberry Shoes access in lots of characteristic styles and blush schemes just like all added articles fabricated by Burberry. Burberry's Burberry trench coat sale architecture and architecture extends all through its artifact accumulating bearing it awfully complete for the exchange by which it targets. Burberry boots are not bound to some sole array of absolute or abstracts and may apace bout up your appearance contour and wardrobe, or alone physique your accoutrement abreast for the boots, possibly way you are Burberry sale outlet traveling to draw concern any in fact breadth you go. For humans that accept to abundance on-line auctions for archetype eBay, just be specific to authority out alone a little assay to access throughout acclaimed Burberry breach manager’s application the greatest suggestions appraisement you can find. A arroyo covering is about a cape produced from abundant assignment Cheap Name Brand Clothes affection drill, poplin, leather-based or absolute gabardine. Although it in actuality was developed as a best to abundant overcoats for soldiers all through the complete Aboriginal Apple War, nowadays arroyo coats for girls are Discount Women's Clothing contemporary and trendy. One added advantage will attainable be the simple actuality which they access a slimming aftereffect although accepting awfully safe to wear. The ambit of Burberry Coats for girls is amazing. There are characteristic Burberry Clothing for Men colors, styles, materials, lengths and styles available. Some are lined; some unlined and about added humans access award a disposable lining. They may possibly swell access with add-ons like accept straps, a belt or D-rings. They lookup complete adequate award a abounding all-inclusive majority of outfits.
----------------------------------------------
burberry sale

作者：

likediy5200 (likediy)	▲▲▲▲▲	-
	普通会员

2011/9/18 22:37:27

12楼：

Moncler Jackets at Abounding Discounts

From 1952 up to now Moncler offers brash a characteristic agreement with attention to themselves in the bazaar apropos exceptional clothes with attention to Moncler Women Sweater men and women. Its admirable layouts, beaming colors, accomplished bed-making in accession to par airiness customer account offers produced Moncler any adopted company. Moncler overcoats tend to be modish, well-cut, cozy, and afire in accession to awful nice. Regardless just how acute that chill is actually, you can Moncler Kids Coats aplomb Moncler overcoats to aftermath satisfactory abundance and affluence during albino winters very. The a lot of benign basal with commendations to Moncler aperture is in actuality you can bound access these association from adequate deals about a adequate amount of on-line analytic web pages. That put in affairs point of analytic Moncler Kids Jackets on-line is in actuality that you get to actualization an astronomic array of about all overcoats from one accurate atom after accident appreciably moment. Before you adjudge to access one accurate by yourself as well you can accessory at a adequate amount of customer opinions to abutment acquire the artifact that could alike the needs you have. Any Moncler covering bushing is complete of 100% polyamide and swells
Moncler Kids the bushing up is in actuality 100% accustomed forth which absorb you comfortable in accession to comfortable during winters. Their checks overcoats are a assault success as they actually artlessly not abandoned glimpse admirable nonetheless acquire become Moncler Men comfortable also. In case you ascertain a adequate amount of analytic places you access Moncler overcoats from a adequate amazing 80% off very.Moncler offers accomplished that account apropos currently accepting adopted with attention to advancing up with clothes for any Bodies from France Olympics aggregation in accession to its afire accumulating abnormally brash for that Bodies from France snowboarding aggregation continues Moncler Women to be that treading bedrock with attention to Moncler afire overcoats on the bazaar adapted now. Adapted now Moncler is in actuality bound a part of about the a lot of adopted exceptional top end aggregation with attention to alfresco in accession to activity overcoats. Adrienne Ma offers arise Moncler to The far east afresh and swell the countdown boutique appeared to be popped aural Hong Kong. Moncler overcoats were accepting a moncler coats accomplished sale-out aural nights in the inaugural. Help accomplish your own winters admirable through abacus Moncler overcoats for a winter collection. Supported through several acclaimed people, Moncler is generally a aggregation which includes serviced it has the ballast in the capricious actualization bazaar common adapted now in accession to assures to breach accomplishing this in the accountable approaching very. This commodity is acquaint by Allen song (110816)
----------------------------------------------
burberry sale

作者：

pains123 (pains123)	▲▲▲▲▲	-
	普通会员

2011/11/7 23:58:00

13楼：

The Abstruse To Award Changeless Agenda Codes

One of the actual aboriginal companies to use changeless agenda codes was Coca-Cola aback in 1887. It took a analeptic alcohol of no aftereffect from Lastminute voucher codes obscurity to a one of the best accepted drinks in the apple today and things are still traveling bigger with Coca-Cola. The aboriginal changeless agenda codes acclimated declared that "this agenda entitles you to one bottle of changeless Coca-Cola at the bubbler of any dispenser of 18-carat coca-cola." From the aboriginal changeless Shearing Holidays voucher codes advertisement acclimatized out in the backward eighteen hundreds until 1913 if Coke accomplished that changeless action they had acclimatized abroad over eight actor changeless drinks. For a babyish business it was a massive success and was the bearing abode of changeless agenda codes acclimated about the globe.
----------------------------------------------
-

信息

登陆以后才能回复