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

delphi 2010̫ǿÁË£¬Ö§³ÖÖÐÎıäÁ¿

procedure TForm1.Button1Click(Sender: TObject);
var ²âÊÔ:String;
begin
  ²âÊÔ:='abc';
  ShowMessage(²âÊÔ);
end;

¿¿£¬Ì«Ç¿ÁË¡£
ÎÒ²ÅÖªµÀ£¬Ï൱ÂäÎ飬ÊDz»ÊÇ£¿
ÖªµÀ¾Í²»ÂäÎéÁË

¹þ¹þ

ÕâÑù¶¼Ðа¡

ÊÜÂ¥Ö÷Æô·¢£¬ÎÒÊÔÁËһϣ¬´°Ìå¡¢¿Ø¼þÒ²ÄÜÓúº×Ö£¡£º
¹À¼ÆÀàʲôµÄ¶¼¿ÉÒÔ°É£¬ÓÐÒâ˼£¡
Delphi(Pascal) code:
unit Unit1;

interface

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls;

type
T´°Ìå1 = class(TForm)
°´Å¥1: TButton;
procedure °´Å¥1Click(Sender: TObject);

private
{ Private declarations }
public
{ Public declarations }
end;

var
´°Ìå1: T´°Ìå1;

implementation

{$R *.dfm}

procedure T´°Ìå1.°´Å¥1Click(Sender: TObject);
begin
ShowMessage('Oh yeah!');
end;

end.


ѧϰÒ×ÓïÑÔÁË?

À÷º¦°¡£¬ÄÇÎÒÓÃÓÿ´

ÕâÑùÒ²Ðеİ¡¡£¡£¡£¡£¡£¡£¡£¡£¡£¡£¡£

ÔÚdotnet»òjavaÀïÔç¾ÍÖ§³ÖÁË¡£



ÔÎËÀ£¬²âÊÔÁËÏ£¬¹ûÈ»ÐС£¡£¡£Å£X

²ÅÖªµÀ£¬¿ÉϧûתD10

ÖÁÉÙ´ÓD2007¿ªÊ¼¾ÍÖ§³ÖÖÐÎıäÁ¿ÃûÁË£¬µ«D2007²»Ö§³ÖÖÐÎÄÀàÃû
ʵ¼ÊÉÏÊǶÔUnicode×Ö·û¼¯µÄÖ§³Ö
Delphi(Pascal) code:

procedure TForm1.FormCreate(Se


Ïà¹ØÎÊ´ð£º

PythonÖеÄUnicodeÔÚDelphiÈçºÎ»¹Ô­³ÉGb2312£¿

ÒÑÖªPython ÖУº
s = unicode("²âÊÔ", "gb2312")
s = u'\u6d4b\u8bd5'
print s
²âÊÔ

ÔÚDelphiÀïÃæÈçºÎ½«\u6d4b\u8bd5ÕâÑùµÄ»¹Ô­³ÉGb2312µÄºº×ÖÄØ£¿
ÕÒµ½¸ö·½·¨
......

Delphi ʹÓÃshockwaveflash¿Ø¼þµÄÎÊÌâ

ÎÒдÁ˸öС³ÌÐò£¬ÉÏÃæÌí¼ÓÁËÒ»¸öshockwaveflash¿Ø¼þ£¬È»ºóÔÚmovieÀïдÈëswfÎļþµÄ·¾¶£¬È»ºóÖ´ÐÐûÓÐÎÊÌâ¡£
µ±ÎÒ°ÑÕâ¸ö³ÌÐò×ªÒÆµ½Áíһ̨µçÄÔÖ´ÐÐʱ£¬ shockwaveflash ¿Ø¼þÏÔʾ¿Õ°×¡£Ò²¾ÍÊÇûÓмÓÔØÄǸöswfÎļþ¡£ ......

delphi ÔõÑù½«ucs2±àÂëת»»³ÉÖÐÎÄ

½ÓÊÕµ½µÄÎı¾ÄÚÈÝÊÇucs2±àÂë¸ñʽ£¬ÇëÎÊÔõÑùת»»³ÉÖÐÎÄ
°´ÎÒµÄÀí½â£¬UCS-2ÊÇ×Ö·û¼¯£¬¾ßÌåµÄ±àÂëÓÐUTF-8£¬UTF-16 (LE/BE)µÈ¡£
Èç¹ûÄãÓÃDelphi 2009¼°ÒÔÉϰ汾£¬¿ÉÒÔ¿´¿´TEncodingÀà¡£
btw. Äã˵µÄת»»³ÉÖÐÎÄÊÇɶÒâË ......

delphi¶¯Ì¬Êý×éÈçºÎÈ¥µôÒ»¸öÔªËØ

procedure DynArrayDelete(var A;elSize:Longint;index,Count:Integer);
var
len,MaxDelete:Integer;
P:PLongint; //4 ¸ö×ֽڵij¤ÕûÐÎÖ¸Õë
begin
P:=PLongint(A);// È¡µÄ A µÄ ......

ÈçºÎÔÚdelphiÀïÓôúÂëʵÏÖ´´½¨VPNÁ¬½Ó?

ÎҵĴúÂëÈçÏÂ,Ôõô×ÜÌáʾÁ¬²»³É¹¦:
type
  GUID = record //ÉêÃ÷µ÷ÓÃRAS£¨´´½¨VPNÁ¬½ÓÓ㩺¯ÊýËùÐè½á¹¹Ìå
  Data1: integer;
  Data2: Shortint;
  Data3: Shortint;
  ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ