dyn. Array als Var-Parameter lässt sich nicht bearbeiten

[gordon freeman]

Hi Leute, ich habe mir folgendes gebastelt:

Delphi-Quellcode:

procedure TZeichenfinder.SucheZeichen(pBild:TBitmap;var Zeichen: array of TZeichen);
begin
  setlength(Zeichen,0); //<- Hier kommt der Fehler
//(...)
end;

An der Stelle bekomme ich den Fehler:

Zitat:

Zitat von Delphi

Inkompatible Typen

Aber Setlength verlangt doch einen String, bzw. einen dynamischen Array und einen Integer oder? :gruebel:

tia, mfg, gordon

[Klaus01]

Hallo,

vielleicht hilft Dir das weiter?

Grüße
Klaus

TYPE
TZeichen = RECORD
bla: char;
fasel : Integer;
END;

AZeichen = Array of TZeichen;

var
Form1: TForm1;

implementation

{$R *.dfm}

PROCEDURE zeichenFinder(var zeichen:AZeichen);
BEGIN
setlength(zeichen,0);
END;

[Flocke]

Wie Klaus01 geschrieben hat hilft's wahrscheinlich schon, wenn du die Typdeklaration einfach aus der Parameterliste rausnimmst:

Delphi-Quellcode:

type
  TZeichenArray = Array of TZeichen;

procedure TZeichenfinder.SucheZeichen(pBild:TBitmap;var Zeichen: TZeichenArray);
begin
  setlength(Zeichen,0); //<- Hier kommt der Fehler
//(...)
end;

[gordon freeman]

Konnte es noch nicht im Zusammenhang testen, aber die Fehlermeldung bleibt schon mal aus.
DANKE!

:dp: