AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Programmierung allgemein Algorithmen, Datenstrukturen und Klassendesign Delphi Item aus einem Record als Parameter einer Prozedur?
Thema durchsuchen
Ansicht
Themen-Optionen

Item aus einem Record als Parameter einer Prozedur?

Ein Thema von aurikel_Max · begonnen am 20. Aug 2010 · letzter Beitrag vom 21. Aug 2010
Antwort Antwort
Benutzerbild von rollstuhlfahrer
rollstuhlfahrer

Registriert seit: 1. Aug 2007
Ort: Ludwigshafen am Rhein
1.529 Beiträge
 
Delphi 7 Professional
 
#1

AW: Item aus einem Record als Parameter einer Prozedur?

  Alt 20. Aug 2010, 19:58
du könntest innerhalb einer weiteren Prozedur entscheiden lassen, welcher Wert zurückgegeben wird. Da es sich hier aber wohl um verschiedene Typen handelt, wird es schwer, nur eine Prozedur zum sortieren zu verwenden. Ich finde es wesentlich einfacher, hier für jedes Feld, wie Delphi-intern auch, nur eine Vergleichsprozedur anzulegen und das QuickSort in der Hauptprozedur auszuführen.

Ich hoffe du verstehst das so. Wenn nicht, schau dir mal an, wie TList das Sortieren handhabt.

Bernhard
Bernhard
Iliacos intra muros peccatur et extra!
  Mit Zitat antworten Zitat
aurikel_Max

Registriert seit: 9. Okt 2009
86 Beiträge
 
#2

AW: Item aus einem Record als Parameter einer Prozedur?

  Alt 20. Aug 2010, 20:08
du könntest innerhalb einer weiteren Prozedur entscheiden lassen, welcher Wert zurückgegeben wird. Da es sich hier aber wohl um verschiedene Typen handelt, wird es schwer, nur eine Prozedur zum sortieren zu verwenden.
Bernhard
Ich hoffe, ich verstehe dich nun nicht falsch, aber hab ich nicht die gleichen Typen, bei zB. Stadt (String) und Name (String)?
Ich hab verschiedene Prozeduren für Strings, Integers und Reals.
Max
  Mit Zitat antworten Zitat
mkinzler
(Moderator)

Registriert seit: 9. Dez 2005
Ort: Heilbronn
39.868 Beiträge
 
Delphi 11 Alexandria
 
#3

AW: Item aus einem Record als Parameter einer Prozedur?

  Alt 20. Aug 2010, 20:17
Er meint es in etwa so:
Delphi-Quellcode:
procedure TBlub.sortBy( what: string);
begin
    if UpperCase(what) = 'NAMEthen sortByName;
    if UpperCase(what) = 'STADTthen sortByStadt;
...
Markus Kinzler
  Mit Zitat antworten Zitat
aurikel_Max

Registriert seit: 9. Okt 2009
86 Beiträge
 
#4

AW: Item aus einem Record als Parameter einer Prozedur?

  Alt 20. Aug 2010, 20:20
Er meint es in etwa so:
Delphi-Quellcode:
procedure TBlub.sortBy( what: string);
begin
    if UpperCase(what) = 'NAMEthen sortByName;
    if UpperCase(what) = 'STADTthen sortByStadt;
...
Ah .. ich verstehe, Danke. Nun, ich werd mir nun mal etwas beim Star Trek Enterprise schauen überlegen.

Schönen Abend noch.
Max
  Mit Zitat antworten Zitat
mkinzler
(Moderator)

Registriert seit: 9. Dez 2005
Ort: Heilbronn
39.868 Beiträge
 
Delphi 11 Alexandria
 
#5

AW: Item aus einem Record als Parameter einer Prozedur?

  Alt 20. Aug 2010, 20:22
Oder noch besser mit (Integer-)Konstanten, welche du dann mit Case abfragen kannst
Markus Kinzler
  Mit Zitat antworten Zitat
Benutzerbild von DeddyH
DeddyH

Registriert seit: 17. Sep 2006
Ort: Barchfeld
27.655 Beiträge
 
Delphi 12 Athens
 
#6

AW: Item aus einem Record als Parameter einer Prozedur?

  Alt 20. Aug 2010, 20:24
Ich würde einen Enum-Type erstellen und den übergeben. Ist aber wahrscheinlich Geschmackssache.
Detlef
"Ich habe Angst vor dem Tag, an dem die Technologie unsere menschlichen Interaktionen übertrumpft. Die Welt wird eine Generation von Idioten bekommen." (Albert Einstein)
Dieser Tag ist längst gekommen
  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 02:56 Uhr.
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 by Thomas Breitkreuz