Download Embarcadero RAD Studio XE3

[The.Ghost]

Download Embarcadero RAD Studio XE3

کد:

http://altd.embarcadero.com/download/radstudio/xe3/delphicbuilder_xe3_win.iso

کد:

JAFD-DAANLD-PWV5AD-KECS

حجم 3.12GB

[lord_viper]

Embarcadero RAD Studio XE3 Architect Multilingual

English/French/German/Japanese

کد:

Web Installer (53 MB): http://altd.embarcadero.com/download/radstudio/xe3/radstudio_xe3_win_esd.zip

Full DVD ISO (3.12 GB): http://altd.embarcadero.com/download/radstudio/xe3/delphicbuilder_xe3_win.iso

Dummy-Serial: MAFA-A3D7PD-FJBBAE-FACN

The serial number is only valid for installation, it will unlock and install all features, not just the limited trial features.

The patch - as always - just enables RAD Studio to accept license files from keygens or modified by the user.

[The.Ghost]

کد:

http://altd.embarcadero.com/download/radstudio/xe3/delphicbuilder_xe3_win.iso

http://altd.embarcadero.com/download/prism/xe3/prism_xe3_win.iso

http://altd.embarcadero.com/download/html5builder/html_5_builder_win.zip


Ключ: JAFD-DAANLD-PWV5AD-KECS

[lord_viper]

CnWizards and Delphi XE3

شاید شما هم جزء کسانی باشید که بدون cnpack کدنویسی در دلفی برای شما لذت بخش نباشه نسخه جدید این پک برای xe3 آماده شده

CnWizards 0.9.9.635 Unstable version

[veyskarami]

واسه دلفی 7 کامپوننت جدید نداری؟

[lord_viper]

یکی از قابلیتهای جدید که به xe3 اضافه شده دایرکتیو inline هست

کد:

procedure MyProc(x:Integer); inline;
begin
    // ...
end;

function MyFunc(y:Char) : String; inline;
begin
   // ..
end;

این رهنمو به کامپایلر میگه کد مورد نظر رو از لحاظ اجرا بهینه کنه این کار باعث افزاریش سرعت اجرای اون تیکه کد میشه

برنامه زیر را در نظر بگیرید

کد:

{$APPTYPE CONSOLE}
uses
MMSystem;
function Max(const X,Y,Z: Integer): Integer;inline
begin
if X > Y then
if X > Z then Result := X
else Result := Z
else
if Y > Z then Result := Y
Reasons to Migrate to from Delphi 7 to Delphi 2009
Embarcadero Technologies - 28 -
else Result := Z
end;
const
Times = 10000000; // 10 million
var
A,B,C,D: Integer;
Start: LongInt;
i: Integer;
begin
Random; // 0
A := Random(4242);
B := Random(4242);
C := Random(4242);
Start := TimeGetTime;
for i:=1 to Times do
D := Max(A,B,C);
Start := TimeGetTime-Start;
writeln(A,', ',B,', ',C,': ',D);
writeln('Calling Max ',Times,' times took ',Start,' milliseconds.');
readln
end.

کد فوق باعث میشود تا تابع max حدود 10 میلیون بار اجرا شود
در یک سیستم با مشخصات Pentium M 1.8GHz with 2GB RAM با رهنمود و بدون آن 2 نتیجه به دست آمد
با inline زمان 25 میلی ثانیه
بدون inline زمان 68 میلی ثانیه

[lord_viper]

از قابلیتهای دیگری که به دلفی cxe3 اضافه شده ریپورت برای memory leak میباشد
memory leak هنگامی بوجود می اید که یک شیی بعد از ایجاد و استفاده حافظه تخصیص داده شده به آن آزاد نگردد
مثال:

کد:

var
   sl : TStringList;
begin
   sl := TStringList.Create;
   sl.Add('Memory leak!') ;
end;

در مثال فوق TStringList ایجاد شده بعد از استفاده با دستور sl.free; حافظه تخصیص یافته به آن آزاد نشده است
با استفاده از دستور ReportMemoryLeaksOnShutdown اگر هنگام بسته شدن برنامه memory leak در حافظه وجود داشته باشد پیغام Unexpected Memory Leak به نمایش در خواهد آمد

کد:

begin
   ReportMemoryLeaksOnShutdown := DebugHook <> 0;

   //source "by" Delphi
   Application.Initialize;
   Application.MainFormOnTaskbar := True;
   Application.CreateForm(TMainForm, MainForm) ;
   Application.Run;
end.