Funktionsrückgabe freigeben

[Guido Eisenbeis]

.
Hey cool! Richtig viele Antworten! Und brauchbar dazu. Dickes Lob an alle!

@IngoD7

ShellApi ist richtig.


@Heiko und brechi
Die von euch genannte Möglichkeit (war ja die gleiche) scheint zu funktionieren. Allerdings ist der Aufwand dann nicht wesentlich geringer, als der bei der Pozedur-Lösung.


Wie aus den Antworten deutlich zu sehen ist, wird die Funktions-Lösung von den Meisten abgelehnt und die Prozedurlösung ist der absolut deutliche Favorit.

Nachdem ich nun eure Antworten durchgelesen und eure Vorschläge getestet habe, bin ich (nach wie vor) überzeugter Anhänger der Procedure-Lösung! Zum Einen ist der Aufwand gegenüber der Funktions-Lösung nur unwesentlich größer. Zum Anderen ist die Procedure-Lösung deutlich besser lesbar, besser verwaltbar und besserer Programmierstil!

OK, Käs-gess!

Vielen Dank an alle!


@Angel4585

Bliebe noch eine Frage: Wie zum Kuckuck sieht dein "Tu was.." aus? Im Ernst, wie willst du zum Beispiel eine Zuweisung durchführen, ohne die Funktion erneut aufzurufen?

Beispiel:

Delphi-Quellcode:

function IchGebeEinObjectZurueck : TMeinObject;
begin
Result:=TMeinObject.Create;
end;
.
.
begin
with IchGebeEinObjectZurueck do
  try
    // Icon aus Exe auslesen und Image zuweisen
    Image1.Picture.Graphic := ???
  finally
    Free;
    end;
end;

Und trozdem auch dir vielen Dank!

Grüße,
Guido.