Codeoptimierung

[himitsu]

steht doch da :angle2: (ich schieb's jetzt einfach mal auf 'ne Überdosis PHP)

[blablab]

"Für die Verwendung von Include-Dateien gilt eine Einschränkung: Sie können nicht in einem Anweisungsblock eingebunden werden. Dies liegt daran, dass zwischen den Schlüsselwörtern begin und end alle Anweisungen eines Anweisungsblocks aus derselben Quelldatei stammen müssen."

So wie's aussieht gehts mit INCLUDE nicht :(

[himitsu]

Zitat:

Zitat von blablab (Beitrag 1039474)

"Für die Verwendung von Include-Dateien gilt eine Einschränkung: Sie können nicht in einem Anweisungsblock eingebunden werden. Dies liegt daran, dass zwischen den Schlüsselwörtern begin und end alle Anweisungen eines Anweisungsblocks aus derselben Quelldatei stammen müssen."

Das ist eine Fehlinformation.

Man kann Inklude überall einfügen.
Einzige Ausnahmen sind mitten in Text/Strings.

Delphi-Quellcode:

{$include global.inc}

procedure Test;
{$include var.inc}
begin
  {$include local.inc}
  ShowMessage('hier ein {$include text.inc}');
end;

Einzig und alleine text.inc würde nicht eingefügt/ersetzt.

(also diesbezüglich kann man sogar mal dem DP-Code-Highlighter glauben schenken)

[blablab]

Cool, Danke!

Also in der Hilfe stand dass es nicht geht und als ichs ausprobiert hab kam ein Fehler. Aber ich hatte glaub ich ein "end" zu viel in der Inc-Datei. Ich hätte nicht zu früh aufgeben sollen :-D

[himitsu]

Jupp, da muß man auch aufpassen (wie gesagt, Delphi hat da ein paar Probleme beim Debuggen und der Fehleranalyse).

Wichtig ist nur, daß der IncludeEintrag wie ein "reserviertes" Wort behandelt werden sollte und daß in der Datei korrekter/eigenständiger Delphi-Code stehen muß.

Das erkennt man vorallem an Folgendem:
Dieses

Delphi-Quellcode:

ShowMessage({$include meine.txt});

geht nur, wenn in der .txt auch ordentlich formatiertet Delphicode drinsteht

meine.txt:

Code:

'dies ist ein'
+ 'langer text'

[Stevie]

Zitat:

Zitat von blablab (Beitrag 1039404)

Hallo!

Ich habe einen Codeabschnitt der in mehreren Funktionen verwendet wird und aus einer Variable 3 neue Variablen berechnet. Mein Problem ist jetzt, dass ich nur 2 Möglichkeiten gefunden hab:
1) Ich kopiere den Codeabschnitt in jede Funktion rein und hab Probleme falls sich was ändert
2) Ich mach aus dem Codeabschnit eine neue Prozedur,

Delphi-Quellcode:

procedure Zwischenberechnung(const a; out b, c, d);

die dann immer aufgerufen wird und der Code braucht dann ~10% mehr Zeit.

Ich bin mit beiden Möglichkeiten unzufrieden. :) Die zusätzliche Zeit wär mir ja eigentlich egal, aber gleich 10% mehr für die exakt gleiche Funktionalität nervt mich schon ...
Gibt es eine weitere Möglichkeit???

Grüße
blablab

Generell würde ich immer dazu raten, Teilaufgaben auch in eigene Methoden/Prozeduren auszulagern. Das erhöht die Lesbarkeit und Wartbarkeit deines Codes. Handelt es sich dabei um extremst zeitkritische Aufgaben, die es nicht erlauben, die Zeit für einen Methoden-/Prozeduraufruf in Kauf zu nehmen, muss man sich eine andere Lösung (wie bereits gezeigt, inline, über include Dateien, etc) überlegen. Fraglich ist halt, ob deine Zwischenberechnung so zeitkritisch ist.

Zitat:

Zitat von Michael A. Jackson

The First Rule of Program Optimization: Don't do it. The Second Rule of Program Optimization (for experts only!): Don't do it yet.

[Win32.API]

Wie oft wird die Funktion aufgerufen? Welchen Typ haben die Parameter? Bei SizeOf(Parameter) > 4 (32bit) hilft es die Parameter als const zu deklarieren.

[himitsu]

Zitat:

Zitat von Win32.API (Beitrag 1039485)

Bei SizeOf(Parameter) > 4 (32bit) hilft es die Parameter als const zu deklarieren.

> 8 (64 Bit)

Selbst bei Angabe von Const wird z.B. ein Int64 nicht als Referenz übergeben :!:

[Win32.API]

Grml :stupid:

Dann deklariere sie am besten als var (Pointer), das sollte auf jeden Fall funktionieren. Bei 4 Byte Parametern (32 bit) hast Du so (evtl) ein bisschen Overhead.