AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Sprachen und Entwicklungsumgebungen Object-Pascal / Delphi-Language Delphi Funktionsaufruf mit Parameter vom Typ Record
Thema durchsuchen
Ansicht
Themen-Optionen

Funktionsaufruf mit Parameter vom Typ Record

Ein Thema von Max Senft · begonnen am 23. Dez 2005 · letzter Beitrag vom 23. Dez 2005
Antwort Antwort
Max Senft

Registriert seit: 14. Dez 2005
Ort: Blieskastel
3 Beiträge
 
#1

Funktionsaufruf mit Parameter vom Typ Record

  Alt 23. Dez 2005, 18:31
Hi @ll!

Ich habe eine kleine Frage an alle Delphianer da draußen...
ich bin gerade etwas am Tüfteln und da hab ich nu ne eigens Programmierte Funktion die nen Parameter vom Typ Record erwartet, natürlich alles selbst erzeugt.

Das Record sieht folgendermaßen aus:
Delphi-Quellcode:
TmyPoint = record
  X, Y: single;
end;
Die Prozedur ist in der Art
procedure myProc(APoint: TmyPoint); Die Frage ist nun, ob ich für den Prozeduraufruf erstmal ne Variable erstellen muss, und den einzelnen Recordvariablen die Werte zuweisen muss oder ob das irgendwie hübscher geht. Ist es möglich das ganze in der Art von
myProc(TmyPoint(0, 1)); // 0 = X, 1 = Y aufzurufen oder ist das bei Delphi überhaupt nicht vorgesehen?

Danke schonmal für eine Antwort.

Bye
Max Senft
  Mit Zitat antworten Zitat
Benutzerbild von Khabarakh
Khabarakh

Registriert seit: 18. Aug 2004
Ort: Brackenheim VS08 Pro
2.876 Beiträge
 
#2

Re: Funktionsaufruf mit Parameter vom Typ Record

  Alt 23. Dez 2005, 18:40
Das kann selbst mit der Operatorüberladung von Delphi 2006 nicht funktionieren, da ein expliziter Cast immer nur ein Argument hat. Du musst also eine ganz normale Funktion schreiben.
Delphi-Quellcode:
// GR32.pas
function FloatPoint(X, Y: Single): TFloatPoint;
begin
  Result.X := X;
  Result.Y := Y;
end;
Sebastian
Moderator in der EE
  Mit Zitat antworten Zitat
Max Senft

Registriert seit: 14. Dez 2005
Ort: Blieskastel
3 Beiträge
 
#3

Re: Funktionsaufruf mit Parameter vom Typ Record

  Alt 23. Dez 2005, 18:51
Hi!

Nunja, mir ist grad noch aufgefallen, dass sich die Frage für mein spezielles Problem im Programm gelöst hat, weil ich eh noch ne "Zwischenprozedur" aufrufen musste, die mir dann sowieso meinen benötigten Record-Typ zurückliefert.

Aber ansonsten ist meine Frage ja auch beantwortet. Geht sowas ähnliches denn in anderen Programmiersprachen? (rein interessehalber)

Bye
Max Senft
  Mit Zitat antworten Zitat
Benutzerbild von Khabarakh
Khabarakh

Registriert seit: 18. Aug 2004
Ort: Brackenheim VS08 Pro
2.876 Beiträge
 
#4

Re: Funktionsaufruf mit Parameter vom Typ Record

  Alt 23. Dez 2005, 19:03
Ein expliziter Cast mit mehreren Argumenten? Nein, denn das wäre einfach nur dämlich . Aber was hast du denn gegen eine harmlose Funktion ?
Sebastian
Moderator in der EE
  Mit Zitat antworten Zitat
Oxmyx

Registriert seit: 21. Sep 2004
499 Beiträge
 
#5

Re: Funktionsaufruf mit Parameter vom Typ Record

  Alt 23. Dez 2005, 19:09
Ja, in C++ geht das z.B. so:

Code:
class Point
{
    Point() {}
    Point(float _x, float _y) : x(_x), y(_y) {}
    ~Point() {}
    float x, y;
}

////////////
Aufruf:

myFunc(Point(0.0f, 1.0f));
  Mit Zitat antworten Zitat
Benutzerbild von Lemmy1
Lemmy1

Registriert seit: 28. Nov 2004
Ort: Ismaning
184 Beiträge
 
Delphi 2006 Professional
 
#6

Re: Funktionsaufruf mit Parameter vom Typ Record

  Alt 23. Dez 2005, 19:22
Seit Delphi 2006 geht das, indem man dem Record einen Constructor verpasst. Vorteil dabei ist, dass Record und Funktion dann fest verschweißt sind.
Daniel
www.nemu.com - The N64 Emulator
  Mit Zitat antworten Zitat
Antwort Antwort


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 05:28 Uhr.
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz