Delphi XE3?

[mkinzler]

Danke. Wir verwenden auch eine Securepoint-Firewall und ich habe das selbe Problem. Auch bei deaktiviertem Contenfilter.

[jaenicke]

Bei uns hat es zum Glück gereicht den Contentfilter zu deaktivieren. Und auch die Whitelist funktioniert, wenn der Hostname

Code:

installers.codegear.com.edgesuite.net

dort eingetragen wird. Da hatte sich beim ersten Test wohl ein http rein verirrt.

[greenmile]

Hier die Antwort zum offenen Geschwindigkeitstest:

Gegeben war eine leere Form (ohne Zusatz-Design) mit einer Listbox und einem Button. Beim Klick auf den Button wurde die Listbox geleert und anschließend mit 1000 Einträgen befüllt. Das Projekt wurde dann einmal mit XE2 und mit XE3 compiliert, anschließend auf einem MacBook Pro (2.4 Ghz i5, 4 GByte Speicher und LEIDER Lion) gestartet. Die Ergebnisse können sich sehen lassen:

- XE2: Ohne "Begin-/EndUpdate" ca 40 Sekunden
- XE2: Mit "Begin-/EndUpdate" ca 4 Sekunden
- Drag&Drop in Listbox ohne Funktion
- Button bleibt beim Größer ziehen da wo er war (keine Anchors)
- Beim Start sieht man für einen kurzen Moment (200 Msek?) eine leere Form, bevor die Controls sichtbar sind
- Aufruf einer TForm3D-Unterform dauert ca 4 Sekunden

- XE3: Ohne "Begin-/EndUpdate" ca 6 Sekunden
- XE3: Mit "Begin-/EndUpdate" <= 1 Sekunden
- Drag&Drop in Listbox funktioniert korrekt
- Button wandert beim Größer ziehen mit (mit Anchors)
- Beim Start sich die Controls sofort sichtbar
- Aufruf einer TForm3D-Unterform <= 1 Sekunden

Ich denke, damit ist die Performance-Frage geklärt.

[MEissing]

Zitat von greenmile:

Ich denke, damit ist die Performance-Frage geklärt.

Danke für den Kurztest

[greenmile]

Zitat von MEissing:

Zitat von greenmile:

Ich denke, damit ist die Performance-Frage geklärt.

Danke für den Kurztest

Hatte noch zwei wichtige Punkte vergessen:

XE2:
- Beim Start sieht man für einen kurzen Moment (<= 200 Msek?) eine leere Form, bevor die Controls sichtbar sind
- Aufruf einer TForm3D-Unterform dauert ca 4 Sekunden

XE3:
- Beim Start sich die Controls sofort sichtbar
- Aufruf einer TForm3D-Unterform <= 1 Sekunden

[mkinzler]

Es gibt auch ein interessantes neues Sprachfeature in XE3: Record Helpers. Anders wie der Name suggeriert funktionieren diese aber auch für elementar Typen wie Strings, Integer, Arrays, Sets, ...

https://forums.embarcadero.com/threa...76400&tstart=0

program TestHelper;

Delphi-Quellcode:

{$APPTYPE CONSOLE}

uses
  System.SysUtils;

type
  TStringHelper = record helper for String
    function Length: Integer;
    function ToInt: Integer;
  end;

  TIntegerHelper = record helper for Integer
    function ToString: String;
  end;

function TStringHelper.Length: Integer;
begin
  Result := System.Length(Self);
end;

function TStringHelper.ToInt: Integer;
begin
   Result := StrToIntDef( self, 0);
end;

function TIntegerHelper.ToString;
begin
  Result := IntToStr( self);
end;

var
  S, s2: string;
  I: Integer;
begin
  S := 'Test String';
  s2 := '125';
  Writeln(S, ', length: ', S.Length);
  Writeln(S2, ', ToInt: ', S2.ToInt);
  i := 167;
  s2 := i.ToString;
  Writeln(S2);
  ReadLn;
end.

[Bernhard Geyer]

Zitat von mkinzler:

Es gibt auch ein interessantes neues Sprachfeature in XE3: Record Helpers. Anders wie der Name suggeriert funktionieren diese aber auch für elementar Typen wie Strings, Integer, Arrays, Sets, ..

Damit hätten wir Auch Skalare als "Objekte" ohne die Nachteile die eine Objektverwendung mit sich bringen könnte.
Mal schauen ob das auch wirklich 100%ig funktioniert ...

[bernau]

Zitat von mkinzler:

Es gibt auch ein interessantes neues Sprachfeature in XE3: Record Helpers.
  s2 := i.ToString;

Ich vergleiche mal:

Delphi-Quellcode:

s2 := i.toString;
s2 := inttostr(i):

Sehe nicht direkt den Vorteil.

[mkinzler]

Zitat von mkinzler:

Es gibt auch ein interessantes neues Sprachfeature in XE3: Record Helpers. Anders wie der Name suggeriert funktionieren diese aber auch für elementar Typen wie Strings, Integer, Arrays, Sets, ...

Es werden auch einige Helper für diverse Typen mitgeliefert:

Zitat von http://theroadtodelphi.wordpress.com/2012/09/05/exploring-delphi-xe3-record-helpers-for-simple-types-system-sysutils-tstringhelper/:

Finally exist a few set of record helpers included in the RTL code which you can use

System.Classes – TUInt32Helper = record helper for UInt32
System.SyncObjs – TCriticalSectionHelper = record helper for TRTLCriticalSection
System.SyncObjs – TConditionVariableHelper = record helper for TRTLConditionVariable
System.Mac.CFUtils – CFGregorianDateHelper = record helper for CFGregorianDate
System.SysUtils – TGuidHelper = record helper for TGUID
System – TSingleHelper = record helper for Single
System – TDoubleHelper = record helper for Double
System – TExtendedHelper = record helper for Extended
Winapi.D2D1 – D2DMatrix3x2FHelper = record helper for TD2DMatrix3X2F
Vcl.Themes – TElementMarginsHelper = record helper for TElementMargins

[mkinzler]

Zitat von jaenicke:

Bei uns hat es zum Glück gereicht den Contentfilter zu deaktivieren. Und auch die Whitelist funktioniert, wenn der Hostname

Code:

installers.codegear.com.edgesuite.net

dort eingetragen wird. Da hatte sich beim ersten Test wohl ein http rein verirrt.

Lag wohl am Virenscanner. Ich habe diese temporär deaktiviert und der Download leif dann ruckzuck durch.