Ò׽ؽØÍ¼Èí¼þ¡¢µ¥Îļþ¡¢Ãâ°²×°¡¢´¿ÂÌÉ«¡¢½ö160KB

delphiÖеÄðºÅÎÊÌâ

program question1;

{$APPTYPE CONSOLE}

uses
  SysUtils;
type Tpoint=Record
  x,y:single;
  end;
const p0:Tpoint=(x:0;y:0);
var p1,p2:Tpoint;

A:array of array of Integer;
I,j: Integer;

begin
  p1.x:=100;
  p1.y:=200;
  p2.x:=p1.x+10;
  p2.y:=p1.y+20;

  writeln(p1.x:0:1,' ',p1.y:0:2);
  Writeln(p1.x:2:2,' ',p1.y:2:2,' ',p1.x:2);

//Setlength(a,9);ºóÃæµÄÊǶԱÈÓÃµÄ ¿ÉÒÔ²»Óÿ´

SetLength(a,9);
for I:=Low(A) to High(A) do
  begin
    SetLength(A[I],I+1);
    for J:=Low(A[I]) to High(A[I]) do
    begin
      A[I,J]:=(I+1)*(J+1);
      Write(A[I,J]:3);
    end;
    Writeln;
  end;
  readln;
end.


ÎÊÌâ1£º
p1.x:0:1  ÕâÁ½¸öðºÅÊÇ×öʲôÓõģ¿
ÎÊÌâ2£º
p1.x:2:2 ºÍ p1.x:0:1 Êä³öµÄ½á¹ûÔõôÊÇÏàͬµÄ£¿ ¹À¼Æ1ÖªµÀÁË2¾ÍÖªµÀÁË ²»¹ýÎÒÊÇÐÂÊÖ ËùÒÔ啰àÂһϠлл½â´ð
ÎÊÌâ3£º
Write(A[I,J]:3);
ÕâÀïµÄ £º3 Ч¹ûÊÇ Ç°Ãæ¶àÁË3¸ö¿Õ¸ñ
p1.x:2
ÕâÀïµÄ £º2 Ч¹ûÊÇ1.0E+0002 Ôõô¾Í»áÕâÑùÄØ£¿

delphi ÐÂÈ˲»ÈÝÒ× ¸øµÄ²»¶à ÏÈллÁË

ÐÞÕýÏ£º

Write(A[I,J]:3);
ÕâÀïµÄ £º


Ïà¹ØÎÊ´ð£º

DELPHIÕâÖÖÇé¿öÔõô°ì£¿ - Delphi / Windows SDK/API

¾ÍÊÇÒ»¸ö·þÎñ¶ËºÍÒ»¸ö¿Í»§¶Ë£¬Àï±ßÓÐһЩ¹²Óõ¥Ôª £¬ÎÒÔÚ ¹¤³ÌµÄSEARCH PATHÀïÉèÖõÄ·¾¶£¬
Àï±ßÓиö½á¹¹Ì壬ÎÒÔÚ·þÎñ¶Ë´ò¿ª£¬¼ÓÁ˳ÉÔ±£¬µ«ÊÇÎÒÔÚ¿Í»§¶ËÆäËûµ¥Ôª·ÃÎʲ»µ½ÎÒмӵģ¬ÎÒÔÚ¿Í»§¶Ë´ò¿ªÄǸöµ¥Ôª£¬È·Êµ¼ÓÁ ......

VC Delphi ÄÚ´æËÙ¶È±È½Ï - VC/MFC / ·Ç¼¼ÊõÀà

VC ¿ØÖÆÌ¨³ÌÐò:
#include <iostream>
using namespace std;
int main()
{
const int def_buffer = 1024 * 4;
DWORD t;
BYTE b[def_buffer];
memset(b, 0, sizeof(b));
PBYTE p;
t = GetTickC ......

delphi ±¾µØ×°ÔØÇý¶¯ - Delphi / Windows SDK/API

delphi ÊÖ¶¯×°ÔØÇý¶¯ÎļþÌáʾ£º
RROR (1058): The driver is marked as disabled (Start=4) in its service database entry.
ÊDz»ÊÇÕâ¸öÇý¶¯±ØÐèÒªÓÃINFÀ´°²×°¡£¡£ÓÃ×Ô´øµÄINFÀ´×°ÊÇÕý³£µÄ¡£ÓÃÊÖ¶¯×°ÔؾÍÌáʾÈçÉÏ¡ ......

ÇóÒ»¶Îdelphi´úÂëתC#´úÂ룬¼±Ó㬿ÉÈËÃñ±ÒÖ§¸¶£¬Ð»Ð»

¼±Óá£ÁªÏµQQ£º8775262£¬Ð»Ð»¡£
ÐèÒª½øÐÐDllImportµÄµØ·½Ö±½ÓдDLLImport.·½·¨Ãû¡£
È磺DLLImport.GlobalAddAtom(¡­¡­);
Îļþ£ºUShare.pas
Delphi(Pascal) code:

unit UShare;
interface
uses Windows, Me ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ