Prozeduraufruf klappt nicht

**torf160**

Hallo,

ich hoffe ich bin im richtigen Forum und Ihr könnt mir weiterhelfen.

Bei einem Prozeduraufruf möchte ich ein Array und ein Stringgrid übergeben. Obwohl ich von der Sache her alles gleich mache, klappt das bei einem Aufrauf, bei dem anderen aber nicht. Delphi bricht mit einer Fehlermeldung ab:
"Die Typen der tatsächlichen und formalen Var-Parameter müssen übereinstimmen"

So sind die Typen deklariert:

zusammenfalten · markieren

Delphi-Quellcode:

			type TMyBestell = Record

    Bezeichnung   : string[60];

    BestellNr     : string[20];

    Klemmband     : integer;

    Bild          : string[20];

    Preis         : array[0..MaxNenn] of real;

    AngebotsPreis : array[0..MaxNenn] of real;

  end;

  TBestellung = ARRAY[1..MaxArtikel] of TMyBestell;

  TMyStaerke  = Record

    StaerkeWert : string[20];

    Zuschlag    : integer;

  end;

  TStaerke = ARRAY[1..MaxStaerke] of TMyStaerke;

Die Variablen sind in derselben Unit so deklariert:

markieren

Delphi-Quellcode:

			var

  FU       : TBestellung;

  Staerke  : TStaerke;

Die Prozeduren und die Aufrufe sehen so aus:

markieren

Delphi-Quellcode:

			procedure BestelldatenInArray(var MyArray : TBestellung; grd : TStringGrid);

procedure StaerkeInArray(var MyArray : TStaerke; grd : TStringGrid);

BestelldatenInArray(FU, StringGrid1);

StaerkeInArray(Staerke, StringGrid5);

Die Prozedur BestelldatenInArray funktioniert, bei der Prozedur StaerkeInArray kommt die Fehlermeldung.

Woran liegts???

Schon mal vielen Dank für Eure Mühe.

torf160

Prozeduraufruf klappt nicht

Prozeduraufruf klappt nicht

Forumregeln