Delphi-PRAXiS
Seite 3 von 3     123   

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Programmieren allgemein (https://www.delphipraxis.net/40-programmieren-allgemein/)
-   -   2 Fragen zu Result (https://www.delphipraxis.net/12415-2-fragen-zu-result.html)

Die Muhkuh 27. Nov 2003 13:45

Re: 2 Fragen zu Result
 
Zitat:

Zitat von Luckie
Wenn du Zugriff auf Objekte der Form brauchst, dann mach deine Funktion zu einer Methode deiner Form-Klasse.

Wie denn? :oops:

himitsu 27. Nov 2003 13:49

Re: 2 Fragen zu Result
 
http://www.FrankNStein.de/Smiley-Wolke.gif Na ihr,

ganz identisch sind die beiden Schreibweisen mit Funktionsname und Result nun auch nicht. :wink:

Hier kommt 2 raus:
Delphi-Quellcode:
Funktion Test: Integer;
  Begin
    Result := 1;
    Result := Result + 1;
  End;

Und das ergibt eine super schöne Endlosschleife: :mrgreen:
Delphi-Quellcode:
Funktion Test: Integer;
  Begin
    Test := 1;
    Test := Test + 1;
  End;
http://www.delphipraxis.net/images/common/divider.jpg
http://www.FrankNStein.de/Smiley-Kuss.gif * * http://www.FrankNStein.de/Smiley-Spinne.gif * * * http://www.FrankNStein.de/Smiley-Winken.gif

Luckie 27. Nov 2003 13:49

Re: 2 Fragen zu Result
 
Code:
type
  TForm1 = class(TForm)
  private
    { Private-Deklarationen }
    [b]function Devide(a, b: Integer): Integer[/b];
  public
    { Public-Deklarationen }
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

[b]function Tform1.Devide(a, b: Integer): Interger;
begin
  result := a div b;
end;[/b]
Innerhalb der Funktion hast du jetzt Zugriff auf Objekte des Formulares.

Die Muhkuh 27. Nov 2003 15:43

Re: 2 Fragen zu Result
 
@Luckie


oh so einfach!



@himitsu

Stimmt!


Alle Zeitangaben in WEZ +1. Es ist jetzt 22:14 Uhr.
Seite 3 von 3     123   

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz