Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)
-   -   Delphi Mehere Items in einer Zeile einem Array hinzufügen (https://www.delphipraxis.net/74130-mehere-items-einer-zeile-einem-array-hinzufuegen.html)

xZise 28. Jul 2006 16:13


Mehere Items in einer Zeile einem Array hinzufügen
 
Ich möchte gerne mehere Items (um genau zu sein sind es 3) in einer Zeile einem Array hinzufügen.
So sieht das in Langer Version aus:
Delphi-Quellcode:
myArray[0] := 'a';
myArray[1] := 'b';
myArray[2] := 'c';
So, dass ich es in einer Zeile übergeben kann:
Delphi-Quellcode:
var
  myArray : TEQCArray //>>> TEQCArray = array [0..2] of Char;
begin
  Machwas({übergeben});
end;

procedure Machwas(eqcarray : TEQCArray);

SnuffMaster23 28. Jul 2006 16:17

Re: Mehere Items in einer Zeile einem Array hinzufügen
 
Wenn in jedem Feld des Arrays nur ein Byte stehen soll kannst dus so machen:
Delphi-Quellcode:
type TMyArray = array[0..X] of Byte;
PMyArray = ^TMyArray
und dann den Zeiger in nen anderen Typ casten (z.B. Cardinal) und nen zusammengabastelten Wert zuweisen.

Oder statt dem Array einfach nen String nehmen (das "Array" ist dann allerdings einsbasiert).

Dax 28. Jul 2006 16:48

Re: Mehere Items in einer Zeile einem Array hinzufügen
 
Oder du machst es so:
Delphi-Quellcode:
procedure Machwas(eqcarray : array of Char);

//

Machwas(['a', 'b', 'c']);


Alle Zeitangaben in WEZ +1. Es ist jetzt 01:01 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