DelphiÎļþ²Ù×÷³£Óú¯Êý
====================================================
Delphi²Ù×÷ÎļþµÄÒ»°ã²½Ö裺
1£©¹ØÁªÎļþ£º
AssignFile(var F; FileName :string)£»
2£©³õʼ»¯Îļþ£º
Append(var F :Text);
//ֻд£¬ÓÚÎļþ×îºó×·¼ÓÊý¾Ý
Reset(var F [; RecSize :Word]);
//Ö»¶Á£¬Îļþ±ØÐë´æÔÚ£¬ÎļþÖ¸ÕëÖÃÓÚ¿ªÍ·
//µÚ¶þ²ÎÊýÖ¸¶¨Ö¸ÕëÒÆ¶¯µÄ´óС£¬¶ÔÓÚÎÞÀàÐÍÎļþÓÐЧ
//¶ÔÓÚÀàÐÍÎļþ£¬Ôò°´¾ßÌåÀàÐ͵ĴóС£¬¶øÎı¾ÎļþĬÈÏ128×Ö½Ú
Rewrite(var F :File [; Recsize :Word]);
//¸²¸Çֻд£¬ÈôÎļþÒÑ´æÔÚ£¬Ôòɾ֮֨½¨¿ÕÎļþд
3£©¶ÁдÎļþ£º
Eof(var F):Boolean; //End of File? ÎļþÖ¸ÕëÊÇ·ñ´¦ÓÚÎļþ½áβ
Eoln[(var F :Text)]:Boolean; //End of line?
Seek(var F; N :Longint); //¶ÔÓÚÎı¾ÎļþÎÞЧ
//ÒÆ¶¯ÎļþÖ¸ÕëN¸öµ¥Î»£¬NΪÕýÔòÏòÇ°ÒÆ£¬NΪ¸ºÔòÏòºóÒÆ
SeekEof[(var F :Text)]:Boolean;
//ͬEof£¬Çø±ðÔÚÓÚ±¾º¯ÊýºöÂÔ¿Õ°×·û
SeekEoln[(var F :Text)]:Boolean;
//ͬEoln£¬Çø±ðÔÚÓÚ±¾º¯ÊýºöÂÔ¿Õ°×·û
FilePos(var F):Longint; //Îļþ±ØÐë´ò¿ª
//»ñÈ¡ÎļþÖ¸Õ뵱ǰλÖã¬ÈôÔÚÎļþ¿ªÍ·Ôò·µ»Ø0
FileSize(var F):Integer; //Îļþ±ØÐë´ò¿ª
//»ñÈ¡Îļþ´óС£¬·µ»ØµÄ´óС²¢·Ç¸ù¾Ý×Ö½Ú¼ÆË㣬¶øÊǸù¾Ý´«µÝÊý¾Ýʱ¼Ç¼µÄ´óС¼ÆËã¡£¹ÊÓ¦ÏÈÉùÃ÷Ò»¸öÎÞÀàÐÍÎļþ²¢³õʼ»¯ÎªReset(F,1);ʹ¼Ç¼´óСΪ1×Ö½Ú£¬»òÕßÉùÃ÷charÀàÐÍ£¨1×Ö½Ú£©Îļþ£¬¼´£ºFile of char±äÁ¿
Read(F, v1 [, v2, v3...vn]);
//¶Áȡһ¸öÊý¾Ý´æ´¢ÓÚ²ÎÊýv1ÖУ¬ÈôÒ»´Î¶ÁÈ¡¶à¸öÊý¾Ý£¬Ôò¿É´ø¶à¸ö²ÎÊý¡£ÈôÉùÃ÷µÄÊÇÀàÐÍÎļþ£¬Ôò²ÎÊýµÄÀàÐͺÍÀàÐÍÎļþµÄÀàÐÍÒ»Ö£»ÈôÉùÃ÷µÄÊÇÎı¾Îļþ£¬Ôò²ÎÊý»ù±¾ÉÏ¿ÉÒÔÊÇÈκλù±¾Êý¾ÝÀàÐÍ¡£µ±¶ÁÈë¶à¸öÊýֵʱ£¬Read·½·¨½«¼Ù¶¨ÊýÖµÊÇÓÃÒ»¸ö»ò¶à¸ö¿Õ¸ñ¡¢ÖƱí·û£¨#9£©»ò»Ø³µ£¨#13#10£©¸ô¿ªµÄ£¬¶ø²»ÊǶººÅ¡¢·ÖºÅ»òÆäËü×Ö·û¡£
Readln([var F :Text;] v1 [, v2, ...,vn]);
//¶ÁȡһÐÐÊý¾Ý£¬Ö»ÊÊÓÃÓÚÎı¾Îļþ
Write(F, v1 [, v2,...,vn]); //ÍùÎļþÖÐÌí¼ÓÄÚÈÝ
Writeln([var F :Text;] p1 [, p2,...,pn]);
//дһÐÐÊý¾Ý£¬Ö»ÊÊÓÃÓÚÎı¾Îļþ
4£©¹Ø±ÕÎļþ£º
CloseFile(var F);
//½â³ýÎÄ
Ïà¹ØÎĵµ£º
function ExpCalc(exp: string): string;
var
vScript: Variant;
begin
vScript := CreateOleObject('ScriptControl');
vScript.Language := 'VBScript';
Result := vScript.Eval(exp);
end;
procedure TForm1.Button1Click(Sender: TObject);
var
s:string;
begin
s:=ExpCalc('100 *4.17/0.5*(55. ......
ÓÃVC++6.0±àдÁËÒ»¸ö¼òµ¥µÄdll£¬ÀïÃæ°üº¬Ò»¸ö¼õ·¨º¯Êýsubtract(int a,int b)£¬DllÃüÃûΪff.Dll
´úÂëÈçÏ£º
1.ff.cpp:
// ff.cpp : Defines the entry point for the DLL application.
//
#include "StdAfx.h"
#include "ff.h"
BOOL APIENTRY DllMain( HANDLE hModule,
......
Delphi ÖÐÈçºÎ°²×°×é¼þ?
delphiÖÐÈçºÎ°²×°×é¼þÓÐÎåÖÖÇé¿ö£º
1¡¢Ö»ÓÐÒ»¸öDCUÎļþµÄ×é¼þ¡£DCUÎļþÊDZàÒëºÃµÄµ¥ÔªÎļþ£¬ÕâÑùµÄ×é¼þÊÇ×÷Õß²»Ïë°ÑÔ´Â빫²¼¡£Ò»°ãÀ´Ëµ£¬×÷Õß±ØÐë˵Ã÷´Ë×é¼þÊʺÏDelphiµÄÄÄÖÖ°æ±¾£¬Èç¹û°æ±¾²»¶Ô£¬ÔÚ°²×°Ê±¾Í»á³öÏÖ´íÎó¡£Ò²ÕýÊÇÒòΪûÓÐÔ´Â룬¸øÊ¹ÓÃÕß´øÀ´Á˲»±ã£¬ÄǾÍÊÇÒ»µ©Delphi°æ±¾Éý¼¶£¬´Ë× ......
DelphiµÄSocket±à³ÌÒª·Ö¼¸²½£¿
2008-12-20 02:03:24
¡¡±êÇ©£ºDelphi Socket ±à³Ì¡¡¡¡¡¡[ÍÆË͵½¼¼ÊõȦ]
ClientSocket ºÍServerSocket
¼¸¸öÖØÒªµÄÊôÐÔ:
1.clientºÍserver¶¼ÓÐportÊôÐÔ£¬ÐèÒªÒ»Ö²ÅÄÜ»¥ÏàͨÐÅ
2.clientÓÐAddressÊôÐÔ,ʹÓÃʱÌîд¶Ô·½(server)µÄIPµØÖ· & ......