Hilfe ( Lies X Position)

[xman236]

Delphi-Quellcode:

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

So heisst zuerst die Function im Baukasten.

Jetzt moechte ich diese Function in meiner eigenen Klasse benutzen.

Wie kann ich das machen?

Delphi-Quellcode:

procedure TFrmMain.Button5Click(Sender: TObject);
begin
     Bogen.LiesXPosition:50;
end;

So habe ich mir gedacht aber es funtioniert nicht.

Diese Function muss naemlich die aktuelle X Werte ausgeben.

[Luckie]

Was heißt "funktioniert nicht"? Die Fehlermeldung kennt mein Delphi nicht.

Delphi-Quellcode:

procedure TFrmMain.Button5Click(Sender: TObject);
var
  Bogen: TBogen;
begin
  Bogen := TBogen.Create;
  try
    x := Bogen.LiesXPosition;
  finally
    Bogen.Free;
  end;  
end;

Meinst du so was?

[xman236]

Was macht deine Function? Was ist ihre Aufgabe?

[Luckie]

Keine Ahnung, das ist doch dein Code. Ich habe nur syntaktisch korrekt die Methode benutzt.

Aber die Fehlermeldung willst du uns beharrlich verschweigen oder?

[DP-Maintenance]

Dieses Thema wurde von "Luckie" von "Open-Source" nach "Object-Pascal / Delphi-Language" verschoben.
Hat nichts mit OpeeSource zu tun.

[Sir Rufo]

Zitat:

Zitat von xman236

Was macht deine Function? Was ist ihre Aufgabe?

was raucht ihr gerade?

Luckie zeigt dir, wie man die - von Dir vorgestellte - Funktion evtl. verwenden könnte, und Du fragst, was die Funktion macht?

und

Delphi-Quellcode:

x := Bogen.LiesXPosition:50;

steh ich jetzt im Wald oder wo kann man in Delphi das so benutzen :gruebel:

[Luckie]

Copy and Paste error.

[xman236]

Ich glaube du hast mich falsch verstanden. Es liegt wahrscheinlich auch an meinem Deutsch :)

Ich moechte mit Lies X Position die aktuelle X Werte meines Koerpers ausgeben.

Und die Fehlungmeldung, die ich kriege, wenn ich so eingebe :

Delphi-Quellcode:

procedure TFrmMain.Button5Click(Sender: TObject);
begin
   test.LiesXPosition:=50;
end;

ist ,dass die linke Seite nicht zugewiesen werden kann.

und 50 habe ich als Beispiel hingeschrieben , weil im Baukasten meine ursprungliche Function eine Integer verlangt.

Delphi-Quellcode:

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

[Sir Rufo]

Zitat:

Zitat von Luckie

Copy and Paste error.

ok ... ich wurde gerade schon nervös und habe mich nach VHS-Kursen zu Delphi umgesehen :mrgreen:

[Sir Rufo]

Eine Funktion kann nur Werte liefern!