Hilfe ( Lies X Position)

[xman236]

Was ich wissen moechte ist nur wie man eine Function, die eine Werte zurueckgibt in der Klasse verwendet..

Delphi-Quellcode:

function TBogen.LiesXPosition: Integer;
begin
  LiesXPosition := zX   ;
end;

Diese Function moechte ich benutzen. Wie soll ich das machen?

[Sir Rufo]

Zitat:

Zitat von xman236

Was ich wissen moechte ist nur wie man eine Function, die eine Werte zurueckgibt in der Klasse verwendet..

Delphi-Quellcode:

function TBogen.LiesXPosition: Integer;
begin
  LiesXPosition := zX   ;
end;

Diese Function moechte ich benutzen. Wie soll ich das machen?

Was macht denn eine "function" im Allgemeinen?

[xman236]

Zum Beispiel, das was so steht :

Delphi-Quellcode:

procedure TBogen.SetzePosition (XPos, YPos: Integer);
begin
  Loeschen;
  zX := XPos; zY := YPos;
  Zeichnen;
end;

habe ich so benutzt

Delphi-Quellcode:

procedure TFrmMain.Button4Click(Sender: TObject);
begin
     test.Loeschen;
     test.SetzePosition (200, 200);
     test.Zeichnen;
end;

test ist in dem Fall TBogen.

Wie kann ich jetzt das benutzen?

Delphi-Quellcode:

function TBogen.LiesXPosition: Integer;
begin
  LiesXPosition := zX   ;
end;

[Sir Rufo]

Das ist ja auch so in Ordnung, denn

SetzePosition ist eine procedure

Delphi-Quellcode:

procedure TBogen.SetzePosition( XPos, YPos : integer );

Und eine procedure führt irgendwelche Befehle aus und das wars.

Eine function führt auch irgendwelche Befehle aus ... aber gibt auch Informationen zurück!

btw: kann es sein, dass du das für morgen früh brauchst (Hausaufgaben)?

[xman236]

Ohh.. erwisch :) ja ich brauche bis morgen..

Ja SetzePosition habe ich fertig, aber wie kann ich Lies Xposition benutzen.. T.T

Delphi-Quellcode:

Delphi-Quellcode: markieren 
function TBogen.LiesXPosition: Integer; 
begin 
  LiesXPosition := zX   ; 
end;

Diesen Befehl hier..

[xman236]

Mittlerweile habe ich es versucht

Delphi-Quellcode:

procedure TFrmMain.Button5Click(Sender: TObject);
var
  test: TBogen;
  x : integer;
begin
  test := TBogen.Create(zeichenfenster,100,100,100,70,clGreen) ;

    x := test.LiesXPosition ;

  end;

Ist das ok? Aber wo kann ich die x werte eingeben?

[Sir Rufo]

Zitat:

Zitat von xman236

Ohh.. erwisch :) ja ich brauche bis morgen..

In deinem letzten Beitrag hatte dir Wolfgang Mix etwas dazu gesagt:

Zitat:

Zitat von Wolfgang Mix

@xman236

Nach unserem längeren netten Chat noch einige Tipps:

- Wenn Du beim nächsten mal eine Hausaufgabe zu lösen hast, melde Dich rechtzeitig im Forum und nicht am Abend davor. Das Forum ist nicht dazu gedacht, Hausaufgaben zu lösen. Dann wird Dir auch jeder hier im Forum gerne helfen.

- Arbeite die Tutorials von Delphi-Treff durch. Dann wirst Du die Grundlagen schneller verstehen.

- Arbeite anfangs nur mit einfachen Objekten. Fast alle einfachen Aufgaben lassen sich mit TButton, TLabel und TEdit erledigen.

- Beschreibe Dein Vorhaben genauer. Kaum einer hat hier wirklich begriffen, was Du wirklich vorhattest.

- Wenn das Deine erste Hausaufgabe ist, bestelle Deinem Lehrer schöne Grüße. Der muß Euch mehr Grundlagen auf den Weg geben.

-- Lasse Dich nicht einschüchtern, wir haben alle einmal ganz klein angefangen.

-- Komme bald rechtzeitig wieder, wir helfen gerne. ;-)

Gruß

Wolfgang

[Sir Rufo]

Zitat:

Zitat von xman236

Mittlerweile habe ich es versucht

Delphi-Quellcode:

procedure TFrmMain.Button5Click(Sender: TObject);
var
  test: TBogen;
  x : integer;
begin
  test := TBogen.Create(zeichenfenster,100,100,100,70,clGreen) ;

    x := test.LiesXPosition ;

  end;

Ist das ok? Aber wo kann ich die x werte eingeben?

Die Function LiesXPosition liefert Dir einen Wert ... du kannst dort nichts eintragen.
Darum heißt die ja auch sinnigerweise LiesXPosition und nicht SchreibXPosition!

Du kannst also die X-Position des Bogens lesen und dann z.B. ausgeben lassen

Delphi-Quellcode:

procedure TFrmMain.Button5Click(Sender: TObject); 
var 
  x : integer; 
begin 
  x := test.LiesXPosition;
  ShowMessage( IntToStr( x ) );
end;

[xman236]

Jaaa !! Genau ich moechte die x Werte liefern.
Wie macht man das?

[Sir Rufo]

Zitat:

Zitat von xman236

Jaaa !! Genau ich moechte die x Werte liefern.
Wie macht man das?

NEIN NICHT DU LIEFERST SONDERN DU BEKOMMST!