Array an Array anhängen

**himitsu**

Wenn du die Speichergröße des Arrays groß genug dimensioniert und die Größe der tatsächlichen Daten kennst, dann kannst du es einfach reinkopieren.

markieren

Delphi-Quellcode:

			//if DataCount + Length(arrEmpfang) > Length(arrGross) then

//  OutOfMemoryError;

Move(arrEmpfang[0], arrGross[DataCount], Length(arrEmpfang));

Inc(DataCount, Length(arrEmpfang));

wenn Array vergrößert werden muß:

zusammenfalten · markieren

Delphi-Quellcode:

			var arrGross, arrEmpfang: TBytes; {aka "array of Byte"}

  i: Integer;

begin

i := Length(arrGross);

SetLength(arrGross, i + Length(arrEmpfang));

Move(arrEmpfang[0], arrGross[i], Length(arrEmpfang));

// oder

i := Length(arrGross);

i2 := Length(arrEmpfang);

SetLength(arrGross, i + i2);

Move(arrEmpfang[0], arrGross[i], i2);

**hedie**

Funktioniert perfekt...

Danke

Array an Array anhängen

AW: Array an Array anhängen

AW: Array an Array anhängen

Forumregeln

hedie Registriert seit: 12. Dez 2005 Ort: Schweiz 1.024 Beiträge Delphi XE6 Starter	#2 AW: Array an Array anhängen 8. Jun 2010, 19:58 Funktioniert perfekt... Danke Claudio Tu was du nicht lassen kannst - http://endasmedia.ch
	Zitat